EpetraExt Development
EpetraExt_BlockJacobi_LinearProblem.h
Go to the documentation of this file.
00001 //@HEADER
00002 // ***********************************************************************
00003 //
00004 //     EpetraExt: Epetra Extended - Linear Algebra Services Package
00005 //                 Copyright (2011) Sandia Corporation
00006 //
00007 // Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation,
00008 // the U.S. Government retains certain rights in this software.
00009 //
00010 // Redistribution and use in source and binary forms, with or without
00011 // modification, are permitted provided that the following conditions are
00012 // met:
00013 //
00014 // 1. Redistributions of source code must retain the above copyright
00015 // notice, this list of conditions and the following disclaimer.
00016 //
00017 // 2. Redistributions in binary form must reproduce the above copyright
00018 // notice, this list of conditions and the following disclaimer in the
00019 // documentation and/or other materials provided with the distribution.
00020 //
00021 // 3. Neither the name of the Corporation nor the names of the
00022 // contributors may be used to endorse or promote products derived from
00023 // this software without specific prior written permission.
00024 //
00025 // THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
00026 // EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
00027 // IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
00028 // PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
00029 // CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
00030 // EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
00031 // PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
00032 // PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
00033 // LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
00034 // NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
00035 // SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
00036 //
00037 // Questions? Contact Michael A. Heroux (maherou@sandia.gov)
00038 //
00039 // ***********************************************************************
00040 //@HEADER
00041 
00042 #ifndef EPETRAEXT_BLOCKJACOBI_LINEARPROBLEM_H
00043 #define EPETRAEXT_BLOCKJACOBI_LINEARPROBLEM_H
00044 
00045 #include <EpetraExt_Transform.h>
00046 
00047 #include <vector>
00048 
00049 class Epetra_LinearProblem;
00050 class Epetra_VbrMatrix;
00051 class Epetra_SerialDenseSVD;
00052 class Epetra_SerialDenseMatrix;
00053 
00054 namespace EpetraExt {
00055 
00056 class LinearProblem_BlockJacobi : public SameTypeTransform<Epetra_LinearProblem> {
00057 
00058  public:
00059 
00060   ~LinearProblem_BlockJacobi();
00061 
00062   LinearProblem_BlockJacobi( int verbose = 0,
00063                              int thresholding = 0,
00064                              double rthresh = 0.0,
00065                              double athresh = 0.0,
00066                              bool removeDiag = false )
00067   : NumBlocks_(0),
00068     NewProblem_(0),
00069     NewMatrix_(0),
00070     thresholding_(thresholding),
00071     rthresh_(rthresh),
00072     athresh_(athresh),
00073     removeDiag_(removeDiag),
00074     verbose_(verbose)
00075   {}
00076 
00077   NewTypeRef operator()( OriginalTypeRef orig );
00078 
00079   bool fwd();
00080   bool rvs();
00081 
00082   void RThresh( double val ) { rthresh_ = val; }
00083 
00084  private:
00085 
00086   int NumBlocks_;
00087 
00088   double rthresh_;
00089   double athresh_;
00090   const int thresholding_;
00091 
00092   const bool removeDiag_;
00093 
00094   Epetra_LinearProblem * NewProblem_;
00095   Epetra_VbrMatrix * NewMatrix_;
00096 
00097   std::vector<Epetra_SerialDenseMatrix**> VbrBlocks_;
00098   std::vector<int> VbrBlockCnt_;
00099   std::vector<int> VbrBlockDim_;
00100   std::vector<int*> VbrBlockIndices_;
00101 
00102   std::vector<Epetra_SerialDenseSVD*> SVDs_;
00103   std::vector<Epetra_SerialDenseMatrix*> Inverses_;
00104   std::vector<Epetra_SerialDenseMatrix*> RHSBlocks_;
00105 
00106   const int verbose_;
00107 };
00108 
00109 } //namespace EpetraExt
00110 
00111 #endif //EPETRAEXT_BLOCKJACOBI_LINEARPROBLEM_H
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines