53 #ifndef MUELU_BLOCKEDDIRECTSOLVER_DEF_HPP_ 54 #define MUELU_BLOCKEDDIRECTSOLVER_DEF_HPP_ 56 #include "Teuchos_ArrayViewDecl.hpp" 57 #include "Teuchos_ScalarTraits.hpp" 61 #include <Xpetra_Matrix.hpp> 62 #include <Xpetra_BlockedCrsMatrix.hpp> 63 #include <Xpetra_MultiVectorFactory.hpp> 65 #include "MueLu_BlockedDirectSolver.hpp" 66 #include "MueLu_MergedBlockedMatrixFactory.hpp" 68 #include "MueLu_Utilities.hpp" 70 #include "MueLu_HierarchyHelpers.hpp" 72 #include "MueLu_DirectSolver.hpp" 76 template <
class Scalar,
class LocalOrdinal,
class GlobalOrdinal,
class Node>
78 : type_(
"blocked direct solver")
82 Teuchos::ParameterList params;
86 template <
class Scalar,
class LocalOrdinal,
class GlobalOrdinal,
class Node>
88 RCP<ParameterList> validParamList = rcp(
new ParameterList());
90 validParamList->set< RCP<const FactoryBase> >(
"A", null,
"Generating factory of the matrix A");
92 return validParamList;
95 template <
class Scalar,
class LocalOrdinal,
class GlobalOrdinal,
class Node>
107 s_->DeclareInput(currentLevel);
110 template <
class Scalar,
class LocalOrdinal,
class GlobalOrdinal,
class Node>
112 RCP<Teuchos::FancyOStream> out = Teuchos::fancyOStream(Teuchos::rcpFromRef(std::cout));
114 FactoryMonitor m(*
this,
"Setup BlockedDirectSolver", currentLevel);
116 this->
GetOStream(
Warnings0) <<
"MueLu::BlockedDirectSolver::Setup(): Setup() has already been called";
119 A_ = Factory::Get< RCP<Matrix> >(currentLevel,
"A");
120 RCP<BlockedCrsMatrix> bA = Teuchos::rcp_dynamic_cast<BlockedCrsMatrix>(
A_);
122 "MueLu::BlockedDirectSolver::Build: input matrix A is not of type BlockedCrsMatrix.");
124 s_->Setup(currentLevel);
129 template <
class Scalar,
class LocalOrdinal,
class GlobalOrdinal,
class Node>
132 "MueLu::BlockedDirectSolver::Apply(): Setup() has not been called");
134 s_->Apply(X, B, InitialGuessIsZero);
137 template <
class Scalar,
class LocalOrdinal,
class GlobalOrdinal,
class Node>
138 RCP<MueLu::SmootherPrototype<Scalar, LocalOrdinal, GlobalOrdinal, Node> >
143 template <
class Scalar,
class LocalOrdinal,
class GlobalOrdinal,
class Node>
145 std::ostringstream out;
147 out <<
"{type = " <<
type_ <<
"}";
151 template <
class Scalar,
class LocalOrdinal,
class GlobalOrdinal,
class Node>
156 out0 <<
"Prec. type: " <<
type_ << std::endl;
158 if (verbLevel &
Debug)
Important warning messages (one line)
Exception indicating invalid cast attempted.
void Setup(Level ¤tLevel)
Setup routine Call the underlaying Setup routine of the nested direct solver once the input block mat...
std::string toString(const T &what)
Little helper function to convert non-string types to strings.
void DeclareInput(Level ¤tLevel) const
Input.
BlockedDirectSolver()
Constructor.
Timer to be used in factories. Similar to Monitor but with additional timers.
Print additional debugging information.
Namespace for MueLu classes and methods.
void Apply(MultiVector &X, const MultiVector &B, bool InitialGuessIsZero=false) const
Apply the direct solver. Solves the linear system AX=B using the constructed solver.
RCP< const ParameterList > GetValidParameterList() const
Input.
std::string description() const
Return a simple one-line description of this object.
std::string type_
smoother type
Class that encapsulates direct solvers. Autoselection of AmesosSmoother or Amesos2Smoother according ...
RCP< MergedBlockedMatrixFactory > MergedAFact_
Factory to generate merged block matrix.
Class that holds all level-specific information.
RCP< Matrix > A_
block operator
RCP< SmootherPrototype > Copy() const
bool IsSetup() const
Get the state of a smoother prototype.
direct solver for nxn blocked matrices
#define MUELU_DESCRIBE
Helper macro for implementing Describable::describe() for BaseClass objects.
Teuchos::FancyOStream & GetOStream(MsgType type, int thisProcRankOnly=0) const
Get an output stream for outputting the input message type.
void print(Teuchos::FancyOStream &out, const VerbLevel verbLevel=Default) const
Print the object with some verbosity level to an FancyOStream object.
Exception throws to report errors in the internal logical of the program.
RCP< DirectSolver > s_
Direct solver.
void DeclareInput(const std::string &ename, const FactoryBase *factory, const FactoryBase *requestedBy=NoFactory::get())
Callback from FactoryBase::CallDeclareInput() and FactoryBase::DeclareInput()
virtual std::string description() const
Return a simple one-line description of this object.
const RCP< const FactoryBase > GetFactory(const std::string &varName) const
Default implementation of FactoryAcceptor::GetFactory()