/[escript]/trunk-mpi-branch/paso/src/Solver.c
ViewVC logotype

Diff of /trunk-mpi-branch/paso/src/Solver.c

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

revision 1195 by gross, Thu Apr 12 10:01:47 2007 UTC revision 1196 by ksteube, Fri Jun 15 03:45:48 2007 UTC
# Line 26  Line 26 
26  #include "Paso.h"  #include "Paso.h"
27  #include "SystemMatrix.h"  #include "SystemMatrix.h"
28  #include "Solver.h"  #include "Solver.h"
29    #include "escript/blocktimer.h"
30    
31  /***********************************************************************************/  /***********************************************************************************/
32    
# Line 48  void Paso_Solver(Paso_SystemMatrix* A,do Line 49  void Paso_Solver(Paso_SystemMatrix* A,do
49       dim_t maxNumSol = A->maxNumCols * A-> col_block_size;       dim_t maxNumSol = A->maxNumCols * A-> col_block_size;
50       dim_t myNumEqua = A->myNumRows * A-> row_block_size;       dim_t myNumEqua = A->myNumRows * A-> row_block_size;
51       dim_t maxNumEqua = A->maxNumRows * A-> row_block_size;       dim_t maxNumEqua = A->maxNumRows * A-> row_block_size;
52         double blocktimer_start = blocktimer_time();
53    
54       tolerance=MAX(options->tolerance,EPSILON);       tolerance=MAX(options->tolerance,EPSILON);
55       Paso_resetError();       Paso_resetError();
# Line 265  void Paso_Solver(Paso_SystemMatrix* A,do Line 267  void Paso_Solver(Paso_SystemMatrix* A,do
267          }          }
268        }        }
269        Performance_stopMonitor(pp,PERFORMANCE_ALL);        Performance_stopMonitor(pp,PERFORMANCE_ALL);
270          blocktimer_increment("Paso_Solver()", blocktimer_start);
271  }  }

Legend:
Removed from v.1195  
changed lines
  Added in v.1196

  ViewVC Help
Powered by ViewVC 1.1.26