MueLu  Version of the Day
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Groups Pages
MueLu_Maxwell_Utils_decl.hpp
Go to the documentation of this file.
1 // @HEADER
2 //
3 // ***********************************************************************
4 //
5 // MueLu: A package for multigrid based preconditioning
6 // Copyright 2012 Sandia Corporation
7 //
8 // Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation,
9 // the U.S. Government retains certain rights in this software.
10 //
11 // Redistribution and use in source and binary forms, with or without
12 // modification, are permitted provided that the following conditions are
13 // met:
14 //
15 // 1. Redistributions of source code must retain the above copyright
16 // notice, this list of conditions and the following disclaimer.
17 //
18 // 2. Redistributions in binary form must reproduce the above copyright
19 // notice, this list of conditions and the following disclaimer in the
20 // documentation and/or other materials provided with the distribution.
21 //
22 // 3. Neither the name of the Corporation nor the names of the
23 // contributors may be used to endorse or promote products derived from
24 // this software without specific prior written permission.
25 //
26 // THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
27 // EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 // IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 // PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
30 // CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
31 // EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
32 // PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
33 // PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
34 // LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
35 // NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
36 // SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
37 //
38 // Questions? Contact
39 // Jonathan Hu (jhu@sandia.gov)
40 // Andrey Prokopenko (aprokop@sandia.gov)
41 // Ray Tuminaro (rstumin@sandia.gov)
42 //
43 // ***********************************************************************
44 //
45 // @HEADER
46 #ifndef MUELU_MAXWELL_UTILS_DECL_HPP
47 #define MUELU_MAXWELL_UTILS_DECL_HPP
48 
49 #include "MueLu_ConfigDefs.hpp"
50 #include "MueLu_BaseClass.hpp"
51 
52 #include "Xpetra_Map_fwd.hpp"
53 #include "Xpetra_Matrix_fwd.hpp"
55 
56 #include "MueLu_Level_fwd.hpp"
58 #include "MueLu_RAPFactory_fwd.hpp"
59 #include "MueLu_Utilities_fwd.hpp"
60 
61 namespace MueLu {
62 
68 template <class Scalar,
69  class LocalOrdinal,
70  class GlobalOrdinal,
71  class Node>
72 class Maxwell_Utils : public VerboseObject {
73 #undef MUELU_MAXWELL_UTILS_SHORT
74 #include "MueLu_UseShortNames.hpp"
75 
76  public:
78  // typedef typename Teuchos::ScalarTraits<Scalar>::coordinateType coordinateType;
79  // typedef typename Xpetra::MultiVector<coordinateType,LO,GO,NO> RealValuedMultiVector;
80 
82  static void detectBoundaryConditionsSM(RCP<Matrix>& SM_Matrix,
83  RCP<Matrix>& D0_Matrix,
84  magnitudeType rowSumTol,
85  bool useKokkos_,
86  Kokkos::View<bool*, typename Node::device_type::memory_space>& BCrowsKokkos,
87  Kokkos::View<bool*, typename Node::device_type::memory_space>& BCcolsKokkos,
88  Kokkos::View<bool*, typename Node::device_type::memory_space>& BCdomainKokkos,
89  int& BCedges,
90  int& BCnodes,
93  Teuchos::ArrayRCP<bool>& BCdomain,
94  bool& allEdgesBoundary,
95  bool& allNodesBoundary);
96 
98  static void detectBoundaryConditionsSM(RCP<Matrix>& SM_Matrix,
99  RCP<Matrix>& D0_Matrix,
100  magnitudeType rowSumTol,
101  Kokkos::View<bool*, typename Node::device_type::memory_space>& BCrowsKokkos,
102  Kokkos::View<bool*, typename Node::device_type::memory_space>& BCcolsKokkos,
103  Kokkos::View<bool*, typename Node::device_type::memory_space>& BCdomainKokkos,
104  int& BCedges,
105  int& BCnodes,
106  bool& allEdgesBoundary,
107  bool& allNodesBoundary);
108 
111  const magnitudeType tolerance,
112  const bool keepDiagonal = true,
113  const size_t expectedNNZperRow = 0);
114 
115  static void removeExplicitZeros(Teuchos::ParameterList& parameterList,
116  RCP<Matrix>& D0_Matrix,
117  RCP<Matrix>& SM_Matrix,
118  RCP<Matrix>& M1_Matrix,
119  RCP<Matrix>& Ms_Matrix);
120 
121  static void removeExplicitZeros(Teuchos::ParameterList& parameterList,
122  RCP<Matrix>& D0_Matrix,
123  RCP<Matrix>& SM_Matrix) {
124  RCP<Matrix> dummy;
125  removeExplicitZeros(parameterList, D0_Matrix, SM_Matrix, dummy, dummy);
126  }
127 
128  static void thresholdedAbs(const RCP<Matrix>& A,
129  const magnitudeType thresholded);
130 
132  static void setMatvecParams(Matrix& A, RCP<ParameterList> matvecParams);
133 
136  PtAPWrapper(const RCP<Matrix>& A, const RCP<Matrix>& P, Teuchos::ParameterList& params, std::string& label);
137 };
138 
139 } // namespace MueLu
140 
141 #define MUELU_MAXWELL_UTILS_SHORT
142 #endif // MUELU_MAXWELL_UTILS_DECL_HPP
static RCP< Xpetra::Matrix< Scalar, LocalOrdinal, GlobalOrdinal, Node > > PtAPWrapper(const RCP< Matrix > &A, const RCP< Matrix > &P, Teuchos::ParameterList &params, std::string &label)
Performs an P^T AP.
static void removeExplicitZeros(Teuchos::ParameterList &parameterList, RCP< Matrix > &D0_Matrix, RCP< Matrix > &SM_Matrix)
MueLu::DefaultLocalOrdinal LocalOrdinal
MueLu::DefaultNode Node
Verbose class for MueLu classes.
Utility functions for Maxwell.
MueLu::DefaultScalar Scalar
MueLu::DefaultGlobalOrdinal GlobalOrdinal
Teuchos::ScalarTraits< Scalar >::magnitudeType magnitudeType
static void setMatvecParams(Matrix &A, RCP< ParameterList > matvecParams)
Sets matvec params on a matrix.
static void detectBoundaryConditionsSM(RCP< Matrix > &SM_Matrix, RCP< Matrix > &D0_Matrix, magnitudeType rowSumTol, bool useKokkos_, Kokkos::View< bool *, typename Node::device_type::memory_space > &BCrowsKokkos, Kokkos::View< bool *, typename Node::device_type::memory_space > &BCcolsKokkos, Kokkos::View< bool *, typename Node::device_type::memory_space > &BCdomainKokkos, int &BCedges, int &BCnodes, Teuchos::ArrayRCP< bool > &BCrows, Teuchos::ArrayRCP< bool > &BCcols, Teuchos::ArrayRCP< bool > &BCdomain, bool &allEdgesBoundary, bool &allNodesBoundary)
Detect Dirichlet boundary conditions.
static void thresholdedAbs(const RCP< Matrix > &A, const magnitudeType thresholded)
static RCP< Matrix > removeExplicitZeros(const RCP< Matrix > &A, const magnitudeType tolerance, const bool keepDiagonal=true, const size_t expectedNNZperRow=0)
Remove explicit zeros.