Thyra_TpetraEuclideanScalarProd_decl.hpp

// @HEADER
// *****************************************************************************
//    Thyra: Interfaces and Support for Abstract Numerical Algorithms
//
// Copyright 2004 NTESS and the Thyra contributors.
// SPDX-License-Identifier: BSD-3-Clause
// *****************************************************************************
// @HEADER
 
#ifndef THYRA_TPETRA_EUCLIDEAN_SCALAR_PROD_DECL_HPP
#define THYRA_TPETRA_EUCLIDEAN_SCALAR_PROD_DECL_HPP
 
 
#include "Thyra_EuclideanScalarProd.hpp"
#include "Tpetra_MultiVector.hpp"
 
 
namespace Thyra {
 
template <class Scalar, class LocalOrdinal, class GlobalOrdinal, class Node>
class TpetraEuclideanScalarProd : public EuclideanScalarProd<Scalar> {
protected:
  
 
  virtual void scalarProdsImpl(
    const MultiVectorBase<Scalar>& X,
    const MultiVectorBase<Scalar>& Y,
    const ArrayView<Scalar>& scalarProds
    ) const;
 
 
private:
 
  Teuchos::RCP<const Tpetra::MultiVector<Scalar,LocalOrdinal,GlobalOrdinal,Node> >
  getConstTpetraMultiVector(const RCP<const MultiVectorBase<Scalar> >& mv) const;
 
};
 
 
template <class Scalar, class LocalOrdinal, class GlobalOrdinal, class Node>
inline
RCP<const TpetraEuclideanScalarProd<Scalar,LocalOrdinal,GlobalOrdinal,Node> >
tpetraEuclideanScalarProd()
{
  return  Teuchos::rcp(new TpetraEuclideanScalarProd<Scalar,LocalOrdinal,GlobalOrdinal,Node>);
}
 
 
} // end namespace Thyra
 
 
#endif  // THYRA_TPETRA_EUCLIDEAN_SCALAR_PROD_DECL_HPP