Ifpack2_SingletonFilter_decl.hpp

/*@HEADER
// ***********************************************************************
//
//       Ifpack2: Tempated Object-Oriented Algebraic Preconditioner Package
//                 Copyright (2009) Sandia Corporation
//
// Under terms of Contract DE-AC04-94AL85000, there is a non-exclusive
// license for use of this work by or on behalf of the U.S. Government.
//
// This library is free software; you can redistribute it and/or modify
// it under the terms of the GNU Lesser General Public License as
// published by the Free Software Foundation; either version 2.1 of the
// License, or (at your option) any later version.
//
// This library is distributed in the hope that it will be useful, but
// WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
// Lesser General Public License for more details.
//
// You should have received a copy of the GNU Lesser General Public
// License along with this library; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
// USA
// Questions? Contact Michael A. Heroux (maherou@sandia.gov)
//
// ***********************************************************************
//@HEADER
*/

#ifndef IFPACK2_SINGLETONFILTER_DECL_HPP
#define IFPACK2_SINGLETONFILTER_DECL_HPP

#include "Ifpack2_ConfigDefs.hpp"
#include "Tpetra_ConfigDefs.hpp"
#include "Tpetra_RowMatrix.hpp"
#include "Tpetra_MultiVector.hpp"
#include "Teuchos_RefCountPtr.hpp"
#include "Teuchos_ScalarTraits.hpp"
#include <vector>


namespace Ifpack2 {
template<class MatrixType>
class  SingletonFilter : virtual public Tpetra::RowMatrix<typename MatrixType::scalar_type,typename MatrixType::local_ordinal_type,typename MatrixType::global_ordinal_type,typename MatrixType::node_type> {
  
public:
  typedef typename MatrixType::scalar_type Scalar;
  typedef typename MatrixType::local_ordinal_type LocalOrdinal;
  typedef typename MatrixType::global_ordinal_type GlobalOrdinal;
  typedef typename MatrixType::node_type Node;
  typedef typename Teuchos::ScalarTraits<Scalar>::magnitudeType magnitudeType;
  

public:


  explicit SingletonFilter(const Teuchos::RCP<const Tpetra::RowMatrix<Scalar,LocalOrdinal,GlobalOrdinal,Node> >& Matrix);
  
  virtual ~SingletonFilter();




  virtual const Teuchos::RCP<const Teuchos::Comm<int> > & getComm() const;

  virtual Teuchos::RCP<Node> getNode() const;

  virtual const Teuchos::RCP<const Tpetra::Map<LocalOrdinal,GlobalOrdinal,Node> > & getRowMap() const;

  virtual const Teuchos::RCP<const Tpetra::Map<LocalOrdinal,GlobalOrdinal,Node> > & getColMap() const;

  virtual const Teuchos::RCP<const Tpetra::Map<LocalOrdinal,GlobalOrdinal,Node> > & getDomainMap() const;

  virtual const Teuchos::RCP<const Tpetra::Map<LocalOrdinal,GlobalOrdinal,Node> > & getRangeMap() const;

  virtual Teuchos::RCP<const Tpetra::RowGraph<LocalOrdinal,GlobalOrdinal,Node> > getGraph() const;

  virtual global_size_t getGlobalNumRows() const;

  virtual global_size_t getGlobalNumCols() const;

  virtual size_t getNodeNumRows() const;

  virtual size_t getNodeNumCols() const;

  virtual GlobalOrdinal getIndexBase() const;

  virtual global_size_t getGlobalNumEntries() const;

  virtual size_t getNodeNumEntries() const;
  

  virtual size_t getNumEntriesInGlobalRow(GlobalOrdinal globalRow) const;
  

  virtual size_t getNumEntriesInLocalRow(LocalOrdinal localRow) const;
  
  virtual global_size_t getGlobalNumDiags() const;
  
  virtual size_t getNodeNumDiags() const;
  
  virtual size_t getGlobalMaxNumRowEntries() const;
  
  virtual size_t getNodeMaxNumRowEntries() const;
  
  virtual bool hasColMap() const;
  
  virtual bool isLowerTriangular() const;
  
  virtual bool isUpperTriangular() const;
  
  virtual bool isLocallyIndexed() const;
  
  virtual bool isGloballyIndexed() const;
  
  virtual bool isFillComplete() const;
  

  

  

  virtual void getGlobalRowCopy(GlobalOrdinal GlobalRow,
        const Teuchos::ArrayView<GlobalOrdinal> &Indices,
        const Teuchos::ArrayView<Scalar> &Values,
        size_t &NumEntries) const;
  

  virtual void getLocalRowCopy(LocalOrdinal LocalRow, 
             const Teuchos::ArrayView<LocalOrdinal> &Indices, 
             const Teuchos::ArrayView<Scalar> &Values,
             size_t &NumEntries) const ;
  

  virtual void getGlobalRowView(GlobalOrdinal GlobalRow, 
        Teuchos::ArrayView<const GlobalOrdinal> &indices, 
        Teuchos::ArrayView<const Scalar> &values) const;
  

  virtual void getLocalRowView(LocalOrdinal LocalRow, 
             Teuchos::ArrayView<const LocalOrdinal> &indices, 
             Teuchos::ArrayView<const Scalar> &values) const;
  

  virtual void getLocalDiagCopy(Tpetra::Vector<Scalar,LocalOrdinal,GlobalOrdinal,Node> &diag) const;
  
  

  
  virtual void leftScale(const Tpetra::Vector<Scalar, LocalOrdinal, GlobalOrdinal, Node>& x);
  
  virtual void rightScale(const Tpetra::Vector<Scalar, LocalOrdinal, GlobalOrdinal, Node>& x);
  

  virtual typename Teuchos::ScalarTraits<Scalar>::magnitudeType getFrobeniusNorm() const;


  virtual void apply(const Tpetra::MultiVector<Scalar,LocalOrdinal,GlobalOrdinal,Node> &X, 
         Tpetra::MultiVector<Scalar,LocalOrdinal,GlobalOrdinal,Node> &Y, 
         Teuchos::ETransp mode = Teuchos::NO_TRANS, 
         Scalar alpha = Teuchos::ScalarTraits<Scalar>::one(),
         Scalar beta = Teuchos::ScalarTraits<Scalar>::zero()) const;
  
  virtual bool hasTransposeApply() const;
  
  virtual void SolveSingletons(const Tpetra::MultiVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>& RHS, 
          Tpetra::MultiVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>& LHS);

  virtual void CreateReducedRHS(const Tpetra::MultiVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>& LHS,
           const Tpetra::MultiVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>& RHS, 
           Tpetra::MultiVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>& ReducedRHS);

  virtual void UpdateLHS(const Tpetra::MultiVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>& ReducedLHS,
    Tpetra::MultiVector<Scalar,LocalOrdinal,GlobalOrdinal,Node>& LHS);
  

  

  

  TPETRA_DEPRECATED virtual void getGlobalRowView(GlobalOrdinal GlobalRow, 
              Teuchos::ArrayRCP<const GlobalOrdinal> &indices,
              Teuchos::ArrayRCP<const Scalar>        &values) const;
  

  TPETRA_DEPRECATED virtual void getLocalRowView(LocalOrdinal LocalRow,
             Teuchos::ArrayRCP<const LocalOrdinal> &indices,
             Teuchos::ArrayRCP<const Scalar>       &values) const;  

  
private:

  Teuchos::RCP<const Tpetra::RowMatrix<Scalar,LocalOrdinal,GlobalOrdinal,Node> > A_;
  Teuchos::RCP<const Tpetra::Map<LocalOrdinal, GlobalOrdinal, Node> > ReducedMap_;
  Teuchos::RCP<Tpetra::Vector<Scalar,LocalOrdinal,GlobalOrdinal,Node> > Diagonal_;
  size_t NumSingletons_;
  std::vector<LocalOrdinal> SingletonIndex_;
  std::vector<LocalOrdinal> Reorder_;
  std::vector<LocalOrdinal> InvReorder_; 
  size_t NumRows_;
  size_t NumNonzeros_;
  size_t MaxNumEntries_;
  size_t MaxNumEntriesA_;
  std::vector<size_t> NumEntries_;
  mutable Teuchos::Array<LocalOrdinal> Indices_;
  mutable Teuchos::Array<Scalar> Values_;
};// class SingletonFilter

}// namespace Ifpack2

#endif /* IFPACK2_SINGLETONFILTER_DECL_HPP */