/[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 1511 by gross, Tue Apr 8 01:53:33 2008 UTC revision 1512 by ksteube, Tue Apr 15 00:54:25 2008 UTC
# Line 163  err_t Paso_Solver_NLGMRES( Line 163  err_t Paso_Solver_NLGMRES(
163                  norm_of_residual=abs(g[k]);                  norm_of_residual=abs(g[k]);
164                  maxIterFlag = (k>=iter_max);                  maxIterFlag = (k>=iter_max);
165                  convergeFlag = (abs(g[k]) <= abs_tol);                  convergeFlag = (abs(g[k]) <= abs_tol);
166  printf("FGMRES step %d: error %e (tol=%d)\n",k,abs(g[k]),abs_tol);  printf("FGMRES step %d: error %e (tol=%e)\n",k,fabs(g[k]),abs_tol);
167            }            }
168        }        }
169        /*        /*
Legend:
Removed from v.1511  
changed lines
  Added in v.1512
  ViewVC Help
Powered by ViewVC 1.1.26