45 |
fprintf(stdout,"Test solver: PCG with JACOBI\n"); |
fprintf(stdout,"Test solver: PCG with JACOBI\n"); |
46 |
Paso_test_matrix(A,b,&options); |
Paso_test_matrix(A,b,&options); |
47 |
|
|
48 |
|
fprintf(stdout,"Test solver: BICGSTAB with JACOBI\n"); |
49 |
|
A->solver=NULL; |
50 |
|
options.method=PASO_BICGSTAB; |
51 |
|
Paso_test_matrix(A,b,&options); |
52 |
|
|
53 |
fprintf(stdout,"Test solver: GMRES with JACOBI\n"); |
fprintf(stdout,"Test solver: GMRES with JACOBI\n"); |
54 |
A->solver=NULL; |
A->solver=NULL; |
55 |
options.method=PASO_GMRES; |
options.method=PASO_GMRES; |
146 |
Paso_SystemMatrix_free(A); |
Paso_SystemMatrix_free(A); |
147 |
MEMFREE(out); |
MEMFREE(out); |
148 |
} |
} |
149 |
|
|