escript  Revision_
Preconditioner.h
Go to the documentation of this file.
1 
2 /*****************************************************************************
3 *
4 * Copyright (c) 2003-2018 by The University of Queensland
5 * http://www.uq.edu.au
6 *
7 * Primary Business: Queensland, Australia
8 * Licensed under the Apache License, version 2.0
9 * http://www.apache.org/licenses/LICENSE-2.0
10 *
11 * Development until 2012 by Earth Systems Science Computational Center (ESSCC)
12 * Development 2012-2013 by School of Earth Sciences
13 * Development from 2014 by Centre for Geoscience Computing (GeoComp)
14 *
15 *****************************************************************************/
16 
17 #ifndef __PASO_PRECONDITIONER_H__
18 #define __PASO_PRECONDITIONER_H__
19 
20 #include "Paso.h"
21 #include "SystemMatrix.h"
22 
23 namespace paso {
24 
25 struct MergedSolver;
26 struct Preconditioner;
27 typedef boost::shared_ptr<Preconditioner> Preconditioner_ptr;
28 typedef boost::shared_ptr<const Preconditioner> const_Preconditioner_ptr;
29 
30 struct Preconditioner_Smoother;
31 struct Solver_ILU;
32 struct Solver_RILU;
33 
34 // general preconditioner interface
35 struct Preconditioner
36 {
38  dim_t sweeps;
44  Solver_ILU* ilu;
47 };
48 
51 void Preconditioner_solve(Preconditioner* prec, SystemMatrix_ptr A, double*, double*);
52 
53 
54 // GAUSS SEIDEL & Jacobi
56 {
57  bool Jacobi;
58  double* diag;
59  double* buffer;
60  index_t* pivot;
61 };
62 
64 {
66  bool is_local;
67 };
68 
71 
73  SystemMatrix_ptr A, bool jacobi, bool is_local, bool verbose);
74 
76  SparseMatrix_ptr A, bool jacobi, bool verbose);
77 
79  Preconditioner_Smoother* gs, double* x, const double* b,
80  dim_t sweeps, bool x_is_initial);
81 
83  Preconditioner_LocalSmoother* gs, double* x, const double* b,
84  dim_t sweeps, bool x_is_initial);
85 
87  Preconditioner_Smoother* gs, double* x, const double* b,
88  double atol, dim_t* sweeps, bool x_is_initial);
89 
91  Preconditioner_LocalSmoother* gs, double* x);
92 
95  double* x);
96 
98  Preconditioner_LocalSmoother* gs, double* x);
99 
101  Preconditioner_LocalSmoother* gs, double* x);
102 
104 struct Solver_ILU
105 {
106  double* factors;
107 };
108 
110 struct Solver_RILU
111 {
112  dim_t n;
113  dim_t n_block;
114  dim_t n_F;
116  double* inv_A_FF;
122  index_t* mask_F;
124  double* x_F;
125  double* b_F;
126  double* x_C;
127  double* b_C;
129 };
130 
133 void Solver_solveILU(SparseMatrix_ptr A, Solver_ILU* ilu, double* x, const double* b);
134 
137 void Solver_solveRILU(Solver_RILU* rilu, double* x, double* b);
138 
140  SparseMatrix_ptr A_CF, double* invA_FF, index_t* A_FF_pivot,
141  SparseMatrix_ptr A_FC);
142 
143 } // namespace paso
144 
145 #endif // __PASO_PRECONDITIONER_H__
146 
paso::Solver_RILU::mask_C
index_t * mask_C
Definition: Preconditioner.h:134
paso::Solver_RILU::n_block
dim_t n_block
Definition: Preconditioner.h:124
paso::Solver_RILU::n
dim_t n
Definition: Preconditioner.h:123
paso::Solver_RILU::n_C
dim_t n_C
Definition: Preconditioner.h:126
paso::Solver_getILU
Solver_ILU * Solver_getILU(SparseMatrix_ptr A, bool verbose)
constructs the incomplete block factorization
Definition: ILU.cpp:55
paso::Preconditioner_LocalSmoother_alloc
Preconditioner_LocalSmoother * Preconditioner_LocalSmoother_alloc(SparseMatrix_ptr A, bool jacobi, bool verbose)
Definition: Smoother.cpp:75
paso::Preconditioner_Smoother_free
void Preconditioner_Smoother_free(Preconditioner_Smoother *in)
Definition: Smoother.cpp:45
paso::Preconditioner_LocalSmoother::Jacobi
bool Jacobi
Definition: Preconditioner.h:68
paso::Preconditioner::type
dim_t type
Definition: Preconditioner.h:48
paso::Preconditioner_LocalSmoother_Sweep_tiled
void Preconditioner_LocalSmoother_Sweep_tiled(SparseMatrix_ptr A, Preconditioner_LocalSmoother *gs, double *x)
PASO_RILU
#define PASO_RILU
Definition: Options.h:62
paso::Solver_RILU::b_F
double * b_F
Definition: Preconditioner.h:136
paso::const_Preconditioner_ptr
boost::shared_ptr< const Preconditioner > const_Preconditioner_ptr
Definition: Preconditioner.h:39
PASO_ILU0
#define PASO_ILU0
Definition: Options.h:43
paso::Solver_RILU::b_C
double * b_C
Definition: Preconditioner.h:138
paso::SystemMatrix_ptr
boost::shared_ptr< SystemMatrix > SystemMatrix_ptr
Definition: SystemMatrix.h:51
paso::Solver_ILU
ILU preconditioner.
Definition: Preconditioner.h:115
paso::Preconditioner::rilu
Solver_RILU * rilu
RILU preconditioner.
Definition: Preconditioner.h:57
paso::Preconditioner::jacobi
Preconditioner_Smoother * jacobi
Jacobi preconditioner.
Definition: Preconditioner.h:51
paso::Preconditioner::gs
Preconditioner_Smoother * gs
Gauss-Seidel preconditioner.
Definition: Preconditioner.h:53
PASO_NO_PRECONDITIONER
#define PASO_NO_PRECONDITIONER
Definition: Options.h:64
paso::Solver_RILU_free
void Solver_RILU_free(Solver_RILU *in)
Definition: RILU.cpp:47
Options.h
paso::Preconditioner_LocalSmoother::diag
double * diag
Definition: Preconditioner.h:69
paso::Preconditioner_Smoother::localSmoother
Preconditioner_LocalSmoother * localSmoother
Definition: Preconditioner.h:76
paso::Solver_RILU::n_F
dim_t n_F
Definition: Preconditioner.h:125
paso::Solver_updateIncompleteSchurComplement
void Solver_updateIncompleteSchurComplement(SparseMatrix_ptr A_CC, SparseMatrix_ptr A_CF, double *invA_FF, index_t *A_FF_pivot, SparseMatrix_ptr A_FC)
Definition: SchurComplement.cpp:39
paso::Preconditioner_LocalSmoother_Sweep_colored
void Preconditioner_LocalSmoother_Sweep_colored(SparseMatrix_ptr A, Preconditioner_LocalSmoother *gs, double *x)
Definition: Smoother.cpp:349
paso::util::copy
void copy(dim_t N, double *out, const double *in)
out = in
Definition: PasoUtil.h:110
Paso.h
paso::Preconditioner_LocalSmoother_free
void Preconditioner_LocalSmoother_free(Preconditioner_LocalSmoother *in)
Definition: Smoother.cpp:53
paso::Preconditioner_Smoother_solve
void Preconditioner_Smoother_solve(SystemMatrix_ptr A, Preconditioner_Smoother *gs, double *x, const double *b, dim_t sweeps, bool x_is_initial)
Definition: Smoother.cpp:111
paso::Solver_RILU::A_FC
SparseMatrix_ptr A_FC
Definition: Preconditioner.h:129
paso::Solver_RILU::A_CF
SparseMatrix_ptr A_CF
Definition: Preconditioner.h:130
escript::DataTypes::dim_t
index_t dim_t
Definition: DataTypes.h:87
paso::Solver_RILU::RILU_of_Schur
Solver_RILU * RILU_of_Schur
Definition: Preconditioner.h:139
paso::Solver_RILU
RILU preconditioner.
Definition: Preconditioner.h:121
paso::Solver_RILU::rows_in_C
index_t * rows_in_C
Definition: Preconditioner.h:132
paso::Preconditioner_Smoother
Definition: Preconditioner.h:74
paso::SolverResult
SolverResult
Definition: Paso.h:53
SystemMatrix.h
paso::Solver_RILU::mask_F
index_t * mask_F
Definition: Preconditioner.h:133
PASO_GS
#define PASO_GS
Definition: Options.h:61
paso::Preconditioner_Smoother::is_local
bool is_local
Definition: Preconditioner.h:77
paso::Solver_solveRILU
void Solver_solveRILU(Solver_RILU *rilu, double *x, double *b)
Definition: RILU.cpp:301
paso::SparseMatrix_ptr
boost::shared_ptr< SparseMatrix > SparseMatrix_ptr
Definition: SparseMatrix.h:46
paso::Solver_ILU_free
void Solver_ILU_free(Solver_ILU *in)
Definition: ILU.cpp:46
paso::Solver_RILU::inv_A_FF
double * inv_A_FF
Definition: Preconditioner.h:127
paso::Preconditioner
Definition: Preconditioner.h:46
paso::Preconditioner::sweeps
dim_t sweeps
Definition: Preconditioner.h:49
PASO_JACOBI
#define PASO_JACOBI
Definition: Options.h:45
escript::DataTypes::index_t
int index_t
type for array/matrix indices used both globally and on each rank
Definition: DataTypes.h:82
paso::Solver_RILU::x_C
double * x_C
Definition: Preconditioner.h:137
paso::Preconditioner_Smoother_alloc
Preconditioner_Smoother * Preconditioner_Smoother_alloc(SystemMatrix_ptr A, bool jacobi, bool is_local, bool verbose)
constructs the symmetric Gauss-Seidel preconditioner
Definition: Smoother.cpp:65
paso::Preconditioner_LocalSmoother::buffer
double * buffer
Definition: Preconditioner.h:70
paso::Preconditioner_Smoother_solve_byTolerance
SolverResult Preconditioner_Smoother_solve_byTolerance(SystemMatrix_ptr A, Preconditioner_Smoother *gs, double *x, const double *b, double atol, dim_t *sweeps, bool x_is_initial)
Definition: Smoother.cpp:138
paso::Preconditioner_LocalSmoother_Sweep_sequential
void Preconditioner_LocalSmoother_Sweep_sequential(SparseMatrix_ptr A, Preconditioner_LocalSmoother *gs, double *x)
inplace Gauss-Seidel sweep in sequential mode
Definition: Smoother.cpp:232
paso::Preconditioner_LocalSmoother::pivot
index_t * pivot
Definition: Preconditioner.h:71
paso::Solver_RILU::x_F
double * x_F
Definition: Preconditioner.h:135
paso::Preconditioner_alloc
Preconditioner * Preconditioner_alloc(SystemMatrix_ptr A, Options *options)
Definition: Preconditioner.cpp:59
Preconditioner.h
paso::Solver_RILU::A_FF_pivot
index_t * A_FF_pivot
Definition: Preconditioner.h:128
PasoUtil.h
paso::Preconditioner_LocalSmoother_solve
void Preconditioner_LocalSmoother_solve(SparseMatrix_ptr A, Preconditioner_LocalSmoother *gs, double *x, const double *b, dim_t sweeps, bool x_is_initial)
Definition: Smoother.cpp:172
paso::Solver_ILU::factors
double * factors
Definition: Preconditioner.h:117
paso::Solver_getRILU
Solver_RILU * Solver_getRILU(SparseMatrix_ptr A, bool verbose)
Definition: RILU.cpp:83
paso::Preconditioner::ilu
Solver_ILU * ilu
ILU preconditioner.
Definition: Preconditioner.h:55
paso
Definition: BiCGStab.cpp:25
paso::Preconditioner_free
void Preconditioner_free(Preconditioner *in)
Definition: Preconditioner.cpp:48
paso::Preconditioner_solve
void Preconditioner_solve(Preconditioner *prec, SystemMatrix_ptr A, double *x, double *b)
Definition: Preconditioner.cpp:124
paso::Solver_solveILU
void Solver_solveILU(SparseMatrix_ptr A, Solver_ILU *ilu, double *x, const double *b)
Definition: ILU.cpp:327
paso::Options
Definition: Options.h:76
paso::Solver_RILU::rows_in_F
index_t * rows_in_F
Definition: Preconditioner.h:131
paso::Preconditioner_LocalSmoother
Definition: Preconditioner.h:66
paso::Preconditioner_LocalSmoother_Sweep
void Preconditioner_LocalSmoother_Sweep(SparseMatrix_ptr A, Preconditioner_LocalSmoother *gs, double *x)
Definition: Smoother.cpp:212
paso::Preconditioner_ptr
boost::shared_ptr< Preconditioner > Preconditioner_ptr
Definition: Preconditioner.h:37