fdurastante/amg4psblas
1
0
Fork 0
mirror of https://github.com/sfilippone/amg4psblas.git synced 2026-10-06 22:55:12 +00:00
Code Issues Packages Projects Releases Wiki Activity

Added L1-Jacobi smoother

Browse Source
This commit is contained in:
fdurastante
2026-01-23 08:15:13 +01:00
parent 1c69b2f635
commit eb99c74fae
1 changed files with 12 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
cbind/test/pargen/amgecgpu.c
+12 -1
View File
@@ -492,7 +492,7 @@ int main(int argc, char *argv[])
/* Set up the preconditioner */
ph = amg_c_dprec_new();
amg_c_dprecinit(*cctxt, ph, ptype);
amg_c_dprecsetc(ph, "", "L1-JACOBI");
amg_c_dprecsetc(ph, "SMOOTHER_TYPE", "L1-JACOBI");
amg_c_dprecseti(ph, "SMOOTHER_SWEEPS", 2);
amg_c_dprecsetc(ph, "COARSE_SOLVE", "BJAC");
amg_c_dprecsetc(ph, "COARSE_SUBSOLVE", "L1-JACOBI");
@@ -533,6 +533,17 @@ int main(int argc, char *argv[])
psb_c_abort(*cctxt);
}
*/
/* Print the information on the preconditioner */
if (iam == 0)
{
info = amg_c_ddescr(ph);
if (info != 0)
{
fprintf(stderr, "From ddescr: %d\nBailing out\n", info);
psb_c_abort(*cctxt);
}
}
/* Set up the solver options */
psb_c_DefaultSolverOptions(&options);
options.eps = 1.e-6;