00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039
00040
00041
00042
00043
00044
00045
00046
00047 #ifndef __Teko_LSCSIMPLECStrategy_hpp__
00048 #define __Teko_LSCSIMPLECStrategy_hpp__
00049
00050 #include "Teko_LSCStrategy.hpp"
00051
00052 namespace Teko {
00053 namespace NS {
00054
00055 class LSCPrecondState;
00056
00066 class LSCSIMPLECStrategy : public LSCStrategy {
00067 public:
00069
00070 LSCSIMPLECStrategy();
00072
00073 virtual ~LSCSIMPLECStrategy() {}
00074
00076
00077
00085 virtual void buildState(BlockedLinearOp & A,BlockPreconditionerState & state) const;
00086
00095 virtual LinearOp getInvBQBt(const BlockedLinearOp & A,BlockPreconditionerState & state) const;
00096
00105 virtual LinearOp getInvBHBt(const BlockedLinearOp & A,BlockPreconditionerState & state) const;
00106
00115 virtual LinearOp getInvF(const BlockedLinearOp & A,BlockPreconditionerState & state) const;
00116
00126 virtual LinearOp getOuterStabilization(const BlockedLinearOp & A,BlockPreconditionerState & state) const
00127 { return Teuchos::null; }
00128
00129 virtual LinearOp getInnerStabilization(const BlockedLinearOp & A,BlockPreconditionerState & state) const;
00130
00139 virtual LinearOp getInvMass(const BlockedLinearOp & A,BlockPreconditionerState & state) const;
00140
00149 virtual LinearOp getHScaling(const BlockedLinearOp & A,BlockPreconditionerState & state) const;
00150
00157 virtual bool useFullLDU() const { return useFullLDU_; }
00158
00160 virtual void initializeFromParameterList(const Teuchos::ParameterList & pl,
00161 const InverseLibrary & invLib);
00162
00164 virtual void initializeState(const BlockedLinearOp & A,LSCPrecondState * state) const;
00165
00171 void computeInverses(const BlockedLinearOp & A,LSCPrecondState * state) const;
00172
00174 virtual void setUseFullLDU(bool val) { useFullLDU_ = val; }
00175
00176 virtual void setSymmetric(bool isSymmetric) { }
00177
00178 protected:
00179
00180 Teuchos::RCP<InverseFactory> invFactoryF_;
00181 Teuchos::RCP<InverseFactory> invFactoryS_;
00182
00183
00184 bool useFullLDU_;
00185 DiagonalType scaleType_;
00186
00187 private:
00188 LSCSIMPLECStrategy(const LSCSIMPLECStrategy &);
00189 };
00190
00191 }
00192 }
00193
00194 #endif