11 ## Solved over the rationals.
12 cgm = conjugate_gradient_method(A, b, x0, 1e-6, 1000);
13 pcgm = preconditioned_conjugate_gradient_method(A, M, b, x0, 1e-6, 1000);
14 diff = norm(cgm - pcgm);
16 unit_test_equals("PCGM agrees with CGM when M == I", ...
21 ## Needs to be symmetric!
22 M = [0.97466, 0.24345, 0.54850; ...
23 0.24345, 0.73251, 0.76639; ...
24 0.54850, 0.76639, 1.47581];
26 pcgm = preconditioned_conjugate_gradient_method(A, M, b, x0, 1e-6, 1000);
27 diff = norm(cgm - pcgm);
29 unit_test_equals("PCGM agrees with CGM when M != I", ...