/[escript]/branches/doubleplusgood/paso/src/PCG.cpp
ViewVC logotype

Diff of /branches/doubleplusgood/paso/src/PCG.cpp

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

revision 4261 by jfenwick, Wed Feb 27 06:09:33 2013 UTC revision 4280 by jfenwick, Wed Mar 6 06:45:32 2013 UTC
# Line 122  err_t Paso_Solver_PCG( Line 122  err_t Paso_Solver_PCG(
122  /*   ---------------------                                         */  /*   ---------------------                                         */
123  /*                                                                 */  /*                                                                 */
124  /*                                                                 */  /*                                                                 */
125    rs=TMPMEMALLOC(n,double);    rs=new double[n];
126    p=TMPMEMALLOC(n,double);    p=new double[n];
127    v=TMPMEMALLOC(n,double);    v=new double[n];
128    x2=TMPMEMALLOC(n,double);    x2=new double[n];
129    
130    /*     Test the input parameters. */    /*     Test the input parameters. */
131    
# Line 388  err_t Paso_Solver_PCG( Line 388  err_t Paso_Solver_PCG(
388           status = SOLVER_BREAKDOWN;           status = SOLVER_BREAKDOWN;
389      }      }
390      Performance_stopMonitor(pp,PERFORMANCE_SOLVER);      Performance_stopMonitor(pp,PERFORMANCE_SOLVER);
391      TMPMEMFREE(rs);      delete[] rs;
392      TMPMEMFREE(x2);      delete[] x2;
393      TMPMEMFREE(v);      delete[] v;
394      TMPMEMFREE(p);      delete[] p;
395      *iter=num_iter_global;      *iter=num_iter_global;
396      *resid=norm_of_residual_global;      *resid=norm_of_residual_global;
397    }    }

Legend:
Removed from v.4261  
changed lines
  Added in v.4280

  ViewVC Help
Powered by ViewVC 1.1.26