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