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

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

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

revision 1860 by artak, Wed Oct 8 04:07:10 2008 UTC revision 1974 by jfenwick, Thu Nov 6 02:40:10 2008 UTC
# Line 72  err_t Paso_Solver_MINRES( Line 72  err_t Paso_Solver_MINRES(
72      double * r,      double * r,
73      double * x,      double * x,
74      dim_t *iter,      dim_t *iter,
     double *tol,  
75      double * tolerance,      double * tolerance,
76      Paso_Performance* pp) {      Paso_Performance* pp) {
77    
# Line 162  err_t Paso_Solver_MINRES( Line 161  err_t Paso_Solver_MINRES(
161            
162       Performance_stopMonitor(pp,PERFORMANCE_SOLVER);       Performance_stopMonitor(pp,PERFORMANCE_SOLVER);
163       Performance_startMonitor(pp,PERFORMANCE_MVM);       Performance_startMonitor(pp,PERFORMANCE_MVM);
164       Paso_SystemMatrix_MatrixVector_CSR_OFFSET0(ONE, A, v,ZERO,y);       Paso_SystemMatrix_MatrixVector_CSR_OFFSET0(PASO_ONE, A, v,PASO_ZERO,y);
165       Performance_stopMonitor(pp,PERFORMANCE_MVM);       Performance_stopMonitor(pp,PERFORMANCE_MVM);
166       Performance_startMonitor(pp,PERFORMANCE_SOLVER);       Performance_startMonitor(pp,PERFORMANCE_SOLVER);
167            
# Line 260  err_t Paso_Solver_MINRES( Line 259  err_t Paso_Solver_MINRES(
259      TMPMEMFREE(v);      TMPMEMFREE(v);
260        
261      *iter=num_iter;      *iter=num_iter;
262      *tol=norm_of_residual;      *tolerance=norm_of_residual;
263            
264    /*     End of MINRES */    /*     End of MINRES */
265    return status;    return status;

Legend:
Removed from v.1860  
changed lines
  Added in v.1974

  ViewVC Help
Powered by ViewVC 1.1.26