72 if( inarray.data() == outarray.data())
76 Blas::Dgemv(
'N',nquad,nquad,1.0,&(D->GetPtr())[0],nquad,
77 &wsp[0],1,0.0,&outarray[0],1);
81 Blas::Dgemv(
'N',nquad,nquad,1.0,&(D->GetPtr())[0],nquad,
82 &inarray[0],1,0.0,&outarray[0],1);
97 val =
Blas::Ddot(nquad, I->GetPtr(), 1, physvals, 1);
117 "vertex normal not computed.");
const NormalVector & v_GetVertexNormal(const int vertex) const
#define ASSERTL0(condition, msg)
std::map< int, NormalVector > m_vertexNormals
std::shared_ptr< DNekMat > DNekMatSharedPtr
virtual ~StdExpansion1D()
The base class for all shapes.
void ComputeVertexNormal(const int vertex)
static const NekDouble kNekZeroTol
static void Dgemv(const char &trans, const int &m, const int &n, const double &alpha, const double *a, const int &lda, const double *x, const int &incx, const double &beta, double *y, const int &incy)
BLAS level 2: Matrix vector multiply y = A x where A[m x n].
void CopyArray(const Array< OneD, ConstDataType > &source, Array< OneD, DataType > &dest)
static double Ddot(const int &n, const double *x, const int &incx, const double *y, const int &incy)
BLAS level 1: output = .
void PhysTensorDeriv(const Array< OneD, const NekDouble > &inarray, Array< OneD, NekDouble > &outarray)
Evaluate the derivative at the physical quadrature points given by inarray and return in outarray...
#define ASSERTL2(condition, msg)
Assert Level 2 – Debugging which is used FULLDEBUG compilation mode. This level assert is designed t...
const NormalVector & v_GetSurfaceNormal(const int id) const
int GetTotPoints() const
This function returns the total number of quadrature points used in the element.
virtual void v_SetUpPhysNormals(const int vertex)
Array< OneD, LibUtilities::BasisSharedPtr > m_base
Describes the specification for a Basis.
virtual NekDouble v_PhysEvaluate(const Array< OneD, const NekDouble > &coords, const Array< OneD, const NekDouble > &physvals)