Thyra_EuclideanScalarProd_def.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_EUCLIDEAN_SCALAR_PROD_DEF_HPP
#define THYRA_EUCLIDEAN_SCALAR_PROD_DEF_HPP

#include "Thyra_EuclideanScalarProd_decl.hpp"
#include "Thyra_ScalarProdBase.hpp"
#include "Thyra_MultiVectorStdOps.hpp"


namespace Thyra {


template<class Scalar>
bool EuclideanScalarProd<Scalar>::isEuclideanImpl() const
{
  return true;
}


template<class Scalar>
void EuclideanScalarProd<Scalar>::scalarProdsImpl(
  const MultiVectorBase<Scalar>& X, const MultiVectorBase<Scalar>& Y,
  const ArrayView<Scalar> &scalarProds_out
  ) const
{
  dots(X, Y, scalarProds_out);
}


} // end namespace Thyra


#endif  // THYRA_EUCLIDEAN_SCALAR_PROD_DEF_HPP