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

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

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

trunk/paso/src/Solver_jacobi.c revision 3119 by gross, Fri Aug 13 08:38:06 2010 UTC trunk/paso/src/Jacobi.c revision 3120 by gross, Mon Aug 30 10:48:00 2010 UTC
# Line 24  Line 24 
24  /**************************************************************/  /**************************************************************/
25    
26  #include "Paso.h"  #include "Paso.h"
27  #include "Solver.h"  #include "Preconditioner.h"
28    #include "BlockOps.h"
29    
30  /**************************************************************/  /**************************************************************/
31    
# Line 96  void Paso_Solver_solveJacobi(Paso_System Line 97  void Paso_Solver_solveJacobi(Paso_System
97  void Paso_Solver_solveLocalJacobi(Paso_SparseMatrix * A_p, Paso_Solver_Jacobi * prec, double * x, double * b) {  void Paso_Solver_solveLocalJacobi(Paso_SparseMatrix * A_p, Paso_Solver_Jacobi * prec, double * x, double * b) {
98       dim_t n = A_p->numCols;       dim_t n = A_p->numCols;
99       dim_t n_block=A_p->row_block_size;       dim_t n_block=A_p->row_block_size;
100       Paso_Solver_applyBlockDiagonalMatrix(n_block,n,prec->values,prec->pivot,x,b);       Paso_BlockOps_allMV(n_block,n,prec->values,prec->pivot,x,b);
101       return;       return;
102  }  }
103    

Legend:
Removed from v.3119  
changed lines
  Added in v.3120

  ViewVC Help
Powered by ViewVC 1.1.26