MueLu_EpetraOperator.hpp

Go to the documentation of this file.

// @HEADER
// *****************************************************************************
//        MueLu: A package for multigrid based preconditioning
//
// Copyright 2012 NTESS and the MueLu contributors.
// SPDX-License-Identifier: BSD-3-Clause
// *****************************************************************************
// @HEADER

#ifndef MUELU_EPETRAOPERATOR_HPP
#define MUELU_EPETRAOPERATOR_HPP


#include <Epetra_Operator.h>
#include "MueLu_Hierarchy.hpp"
// TODO: Kokkos headers

#if defined(HAVE_MUELU_SERIAL) and defined(HAVE_MUELU_EPETRA)

namespace MueLu {

class EpetraOperator : public Epetra_Operator {
  typedef double SC;
  typedef int LO;
  typedef int GO;
  typedef Xpetra::EpetraNode NO;

  typedef Xpetra::Matrix<SC, LO, GO, NO> Matrix;
  typedef MueLu::Hierarchy<SC, LO, GO, NO> Hierarchy;
  typedef MueLu::Utilities<SC, LO, GO, NO> Utils;

 public:


  EpetraOperator(const RCP<Hierarchy>& H)
    : Hierarchy_(H) {}

  virtual ~EpetraOperator() {}


  int SetUseTranspose(bool /* UseTransposeBool */) { return -1; }




  int Apply(const Epetra_MultiVector& /* X */, Epetra_MultiVector& /* Y */) const { return -1; }


  int ApplyInverse(const Epetra_MultiVector& X, Epetra_MultiVector& Y) const;

  /* Returns the quantity \f$ \| A \|_\infty\f$ such that
     \f[\| A \|_\infty = \max_{1\lei\lem} \sum_{j=1}^n |a_{ij}| \f].

     \warning This method must not be called unless HasNormInf() returns true.
  */
  double NormInf() const { return 0; }



  const char* Label() const { return "MueLu::Hierarchy"; }

  bool UseTranspose() const { return false; }

  bool HasNormInf() const { return 0; }

  const Epetra_Comm& Comm() const;

  const Epetra_Map& OperatorDomainMap() const;

  const Epetra_Map& OperatorRangeMap() const;




  RCP<Hierarchy> GetHierarchy() const { return Hierarchy_; }


 private:
  RCP<Hierarchy> Hierarchy_;
};

}  // namespace MueLu

#endif  // HAVE_MUELU_EPETRA and HAVE_MUELU_SERIAL

#endif  // MUELU_EPETRAOPERATOR_HPP