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

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

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

revision 1476 by gross, Mon Apr 7 23:38:50 2008 UTC revision 1511 by gross, Mon Apr 14 23:09:38 2008 UTC
# Line 29  Line 29 
29    
30  #include "Common.h"  #include "Common.h"
31  #include "Solver.h"  #include "Solver.h"
32    #include "Util.h"
33  #ifdef _OPENMP  #ifdef _OPENMP
34  #include <omp.h>  #include <omp.h>
35  #endif  #endif
# Line 100  err_t Paso_Solver_NewtonGMRES( Line 101  err_t Paso_Solver_NewtonGMRES(
101           Status=Paso_Solver_NLGMRES(F,f,x,step,&gmres_iter,&gmres_tol,pp);           Status=Paso_Solver_NLGMRES(F,f,x,step,&gmres_iter,&gmres_tol,pp);
102           itc+=gmres_iter;           itc+=gmres_iter;
103           if ((Status==SOLVER_NO_ERROR) || (Status==SOLVER_MAXITER_REACHED)) {           if ((Status==SOLVER_NO_ERROR) || (Status==SOLVER_MAXITER_REACHED)) {
104              Status==SOLVER_NO_ERROR;              Status=SOLVER_NO_ERROR;
105              /*              /*
106               * update x:               * update x:
107               */               */

Legend:
Removed from v.1476  
changed lines
  Added in v.1511

  ViewVC Help
Powered by ViewVC 1.1.26