/[escript]/trunk/paso/src/FGMRES.c
ViewVC logotype

Diff of /trunk/paso/src/FGMRES.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1636 by phornby, Fri Jul 11 13:12:46 2008 UTC revision 1637 by ksteube, Mon Jul 14 05:34:59 2008 UTC
# Line 163  err_t Paso_Solver_NLGMRES( Line 163  err_t Paso_Solver_NLGMRES(
163                  norm_of_residual=fabs(g[k]);                  norm_of_residual=fabs(g[k]);
164                  maxIterFlag = (k>=iter_max);                  maxIterFlag = (k>=iter_max);
165                  convergeFlag = (fabs(g[k]) <= abs_tol);                  convergeFlag = (fabs(g[k]) <= abs_tol);
166                  printf("FGMRES step %d: error %e (tol=%d)\n",                  printf("FGMRES step %d: error %e (tol=%e)\n",
167                         k,fabs(g[k]),abs_tol);                         k,fabs(g[k]),abs_tol);
168            }            }
169        }        }

Legend:
Removed from v.1636  
changed lines
  Added in v.1637

  ViewVC Help
Powered by ViewVC 1.1.26