Teko_StridedMappingStrategy.hpp

// @HEADER
// *****************************************************************************
//      Teko: A package for block and physics based preconditioning
//
// Copyright 2010 NTESS and the Teko contributors.
// SPDX-License-Identifier: BSD-3-Clause
// *****************************************************************************
// @HEADER

#ifndef __Teko_StridedMappingStrategy_hpp__
#define __Teko_StridedMappingStrategy_hpp__

// stl includes
#include <vector>

// Teuchos includes
#include "Teuchos_RCP.hpp"

// Thyra includes
#include "Thyra_MultiVectorBase.hpp"
#include "Thyra_LinearOpBase.hpp"
#include "Thyra_BlockedLinearOpBase.hpp"

// Epetra includes
#include "Epetra_Comm.h"
#include "Epetra_Map.h"
#include "Epetra_MultiVector.h"
#include "Epetra_Import.h"
#include "Epetra_Export.h"
#include "Epetra_CrsMatrix.h"

// Teko includes
#include "Teko_EpetraOperatorWrapper.hpp"

namespace Teko {
namespace Epetra {

class StridedMappingStrategy : public MappingStrategy {
 public:


  StridedMappingStrategy(const std::vector<int>& vars, const Teuchos::RCP<const Epetra_Map>& map,
                         const Epetra_Comm& comm);



  virtual void copyEpetraIntoThyra(
      const Epetra_MultiVector& epetra_X,
      const Teuchos::Ptr<Thyra::MultiVectorBase<double> >& thyra_X) const;

  virtual void copyThyraIntoEpetra(
      const Teuchos::RCP<const Thyra::MultiVectorBase<double> >& thyra_Y,
      Epetra_MultiVector& epetra_Y) const;

  virtual const Teuchos::RCP<const Epetra_Map> domainMap() const { return domainMap_; }

  virtual const Teuchos::RCP<const Epetra_Map> rangeMap() const { return rangeMap_; }

  virtual std::string toString() const { return std::string("StridedMappingStrategy"); }




  void buildBlockTransferData(const std::vector<int>& vars,
                              const Teuchos::RCP<const Epetra_Map>& baseMap,
                              const Epetra_Comm& comm);

  const std::vector<std::pair<int, Teuchos::RCP<Epetra_Map> > >& getMaps() const {
    return blockMaps_;
  }

  const Teuchos::RCP<Thyra::BlockedLinearOpBase<double> > buildBlockedThyraOp(
      const Teuchos::RCP<const Epetra_CrsMatrix>& mat, const std::string& label = "<ANYM>") const;

  void rebuildBlockedThyraOp(const RCP<const Epetra_CrsMatrix>& mat,
                             const RCP<Thyra::BlockedLinearOpBase<double> >& A) const;


 protected:
  // member variables


  Teuchos::RCP<const Epetra_Map> domainMap_;
  Teuchos::RCP<const Epetra_Map> rangeMap_;


  std::vector<std::pair<int, Teuchos::RCP<Epetra_Map> > > blockMaps_;
  std::vector<Teuchos::RCP<Epetra_Export> > blockExport_;
  std::vector<Teuchos::RCP<Epetra_Import> > blockImport_;
};

}  // end namespace Epetra
}  // end namespace Teko

#endif