EpetraTSFOperator.hpp
Go to the documentation of this file.
00001 /* @HEADER@ */
00002 /* ***********************************************************************
00003 // 
00004 //           TSFExtended: Trilinos Solver Framework Extended
00005 //                 Copyright (2004) Sandia Corporation
00006 // 
00007 // Under terms of Contract DE-AC04-94AL85000, there is a non-exclusive
00008 // license for use of this work by or on behalf of the U.S. Government.
00009 // 
00010 // This library is free software; you can redistribute it and/or modify
00011 // it under the terms of the GNU Lesser General Public License as
00012 // published by the Free Software Foundation; either version 2.1 of the
00013 // License, or (at your option) any later version.
00014 //  
00015 // This library is distributed in the hope that it will be useful, but
00016 // WITHOUT ANY WARRANTY; without even the implied warranty of
00017 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
00018 // Lesser General Public License for more details.
00019 //  
00020 // You should have received a copy of the GNU Lesser General Public
00021 // License along with this library; if not, write to the Free Software
00022 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
00023 // USA
00024 // Questions? Contact Michael A. Heroux (maherou@sandia.gov) 
00025 // 
00026 // **********************************************************************/
00027 /* @HEADER@ */
00028 
00029 #ifndef EPETRA_TSFOPERATOR_HPP
00030 #define EPETRA_TSFOPERATOR_HPP
00031 
00032 #include "TSFLinearOperatorDecl.hpp"
00033 #include "TSFLinearSolverDecl.hpp"
00034 #include "Epetra_Operator.h"
00035 #include "TSFVectorSpace2EpetraMap.hpp"
00036 
00037 namespace Epetra
00038 {
00039   using namespace Teuchos;
00040   using namespace Thyra;
00041   
00042 
00043   /** */
00044   class Epetra_TSFOperator : public Epetra_Operator
00045   {
00046   public:
00047     /** */
00048     Epetra_TSFOperator(const LinearOperator<double>& A,
00049            const LinearSolver<double>& solver=LinearSolver<double>());
00050     
00051     /** */
00052     int SetUseTranspose(bool useTrans) {useTranspose_ = useTrans; return 0;}
00053 
00054     /** */
00055     int Apply(const Epetra_MultiVector& in, Epetra_MultiVector& out) const ;
00056 
00057     /** */
00058     int ApplyInverse(const Epetra_MultiVector& in, Epetra_MultiVector& out) const ;
00059 
00060     /** */
00061     double NormInf() const ;
00062 
00063     /** */
00064     const char* Label() const ;
00065 
00066     /** */
00067     bool UseTranspose() const {return useTranspose_;}
00068 
00069     /** */
00070     bool HasNormInf() const {return false;}
00071 
00072     /** */
00073     const Epetra_Comm& Comm() const {return *comm_;}
00074 
00075     /** */
00076     const Epetra_Map& OperatorDomainMap() const {return *domain_;}
00077 
00078     /** */
00079     const Epetra_Map& OperatorRangeMap() const {return *range_;}
00080 
00081     
00082 
00083   private:
00084     LinearOperator<double> A_;
00085     LinearSolver<double> solver_;
00086     bool useTranspose_;
00087     RCP<Epetra_Comm> comm_;
00088     RCP<const Epetra_Map> domain_;
00089     RCP<const Epetra_Map> range_;
00090     bool isNativeEpetra_;
00091     bool isCompoundEpetra_;
00092     std::string label_;
00093   };
00094 }
00095 
00096 #endif

Site Contact