/[escript]/trunk/paso/src/Solver.h
ViewVC logotype

Diff of /trunk/paso/src/Solver.h

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

revision 3050 by artak, Wed Apr 28 02:21:23 2010 UTC revision 3051 by lgao, Tue Jun 29 00:45:49 2010 UTC
# Line 76  struct Paso_Solver_GS { Line 76  struct Paso_Solver_GS {
76  };  };
77  typedef struct Paso_Solver_GS Paso_Solver_GS;  typedef struct Paso_Solver_GS Paso_Solver_GS;
78    
79    /* GaussSeidel preconditioner */
80    struct Paso_Solver_GaussSeidel {
81      dim_t n_block;
82      dim_t n;
83      index_t num_colors;
84      index_t* colorOf;
85      index_t* main_iptr;
86      double* diag;
87      Paso_SparseMatrix * factors;
88      Paso_Pattern* pattern;
89      dim_t sweeps;
90      double* x_old;
91    };
92    typedef struct Paso_Solver_GaussSeidel Paso_Solver_GaussSeidel;
93    
94    
95  /* RILU preconditioner */  /* RILU preconditioner */
96  struct Paso_Solver_RILU {  struct Paso_Solver_RILU {
97    dim_t n;    dim_t n;
# Line 237  void Paso_Solver_GS_free(Paso_Solver_GS Line 253  void Paso_Solver_GS_free(Paso_Solver_GS
253  Paso_Solver_GS* Paso_Solver_getGS(Paso_SparseMatrix * A_p,bool_t verbose);  Paso_Solver_GS* Paso_Solver_getGS(Paso_SparseMatrix * A_p,bool_t verbose);
254  void Paso_Solver_solveGS(Paso_Solver_GS * gs, double * x, double * b);  void Paso_Solver_solveGS(Paso_Solver_GS * gs, double * x, double * b);
255    
256    void Paso_Solver_GSMPI_free(Paso_Solver_GS * in);
257    Paso_Solver_GS* Paso_Solver_getGSMPI(Paso_SparseMatrix * A_p,bool_t verbose);
258    void Paso_Solver_solveGSMPI(Paso_SystemMatrix* A, Paso_Solver_GS * gs, double * x, double * b);
259    
260  void Paso_Solver_RILU_free(Paso_Solver_RILU * in);  void Paso_Solver_RILU_free(Paso_Solver_RILU * in);
261  Paso_Solver_RILU* Paso_Solver_getRILU(Paso_SparseMatrix * A_p,bool_t verbose);  Paso_Solver_RILU* Paso_Solver_getRILU(Paso_SparseMatrix * A_p,bool_t verbose);
262  void Paso_Solver_solveRILU(Paso_Solver_RILU * rilu, double * x, double * b);  void Paso_Solver_solveRILU(Paso_Solver_RILU * rilu, double * x, double * b);

Legend:
Removed from v.3050  
changed lines
  Added in v.3051

  ViewVC Help
Powered by ViewVC 1.1.26