Stokhos_ProductEpetraOperator.hpp

Go to the documentation of this file.

// @HEADER
// *****************************************************************************
//                           Stokhos Package
//
// Copyright 2009 NTESS and the Stokhos contributors.
// SPDX-License-Identifier: BSD-3-Clause
// *****************************************************************************
// @HEADER

#ifndef STOKHOS_PRODUCT_EPETRA_OPERATOR_HPP
#define STOKHOS_PRODUCT_EPETRA_OPERATOR_HPP

#include "Stokhos_ProductContainer.hpp"
#include "Stokhos_VectorOrthogPolyTraitsEpetra.hpp"
#include "Epetra_Map.h"
#include "EpetraExt_MultiComm.h"

namespace Stokhos {

  class ProductEpetraOperator :
    public virtual ProductContainer<Epetra_Operator>,
    public virtual Epetra_Operator {
  public:

    typedef double value_type;

    typedef int ordinal_type;

    ProductEpetraOperator(
      const Teuchos::RCP<const Epetra_BlockMap>& block_map,
      const Teuchos::RCP<const Epetra_Map>& domain_base_map,
      const Teuchos::RCP<const Epetra_Map>& range_base_map,
      const Teuchos::RCP<const EpetraExt::MultiComm>& product_comm);

    /*
     * This version supplies the generated product map \c product_map
     */
    ProductEpetraOperator(
      const Teuchos::RCP<const Epetra_BlockMap>& block_map,
      const Teuchos::RCP<const Epetra_Map>& domain_base_map,
      const Teuchos::RCP<const Epetra_Map>& range_base_map,
      const Teuchos::RCP<const Epetra_Map>& range_product_map,
      const Teuchos::RCP<const EpetraExt::MultiComm>& product_comm);
    

    ProductEpetraOperator(const ProductEpetraOperator& v);

    virtual ~ProductEpetraOperator();


    ProductEpetraOperator& operator=(const ProductEpetraOperator& v);

    Teuchos::RCP<const EpetraExt::MultiComm> productComm() const;

    
    virtual int SetUseTranspose(bool UseTranspose);
    
    virtual int Apply(const Epetra_MultiVector& Input, 
                      Epetra_MultiVector& Result) const;

    virtual int ApplyInverse(const Epetra_MultiVector& X, 
                             Epetra_MultiVector& Y) const;
    
    virtual double NormInf() const;
    
    virtual const char* Label () const;
  
    virtual bool UseTranspose() const;
    
    virtual bool HasNormInf() const;

    virtual const Epetra_Comm & Comm() const;

    virtual const Epetra_Map& OperatorDomainMap () const;

    virtual const Epetra_Map& OperatorRangeMap () const;


  protected:

    ProductEpetraOperator(
      const Teuchos::RCP<const Epetra_BlockMap>& block_map,
      const Teuchos::RCP<const EpetraExt::MultiComm>& product_comm);

    void setup(const Teuchos::RCP<const Epetra_Map>& domain_base_map,
         const Teuchos::RCP<const Epetra_Map>& range_base_map);

  protected:

    Teuchos::RCP<const Epetra_Map> domain_base_map;

    Teuchos::RCP<const Epetra_Map> range_base_map;

    Teuchos::RCP<const Epetra_Map> product_range_map;

    Teuchos::RCP<const EpetraExt::MultiComm> product_comm;

    bool useTranspose;

  }; // class ProductEpetraOperator

} // end namespace Stokhos

#endif  // STOKHOS_PRODUCT_EPETRA_OPERATOR_HPP