Intrepid2
Intrepid2_HGRAD_HEX_C2_FEM.hpp
Go to the documentation of this file.
1// @HEADER
2// ************************************************************************
3//
4// Intrepid2 Package
5// Copyright (2007) Sandia Corporation
6//
7// Under terms of Contract DE-AC04-94AL85000, there is a non-exclusive
8// license for use of this work by or on behalf of the U.S. Government.
9//
10// Redistribution and use in source and binary forms, with or without
11// modification, are permitted provided that the following conditions are
12// met:
13//
14// 1. Redistributions of source code must retain the above copyright
15// notice, this list of conditions and the following disclaimer.
16//
17// 2. Redistributions in binary form must reproduce the above copyright
18// notice, this list of conditions and the following disclaimer in the
19// documentation and/or other materials provided with the distribution.
20//
21// 3. Neither the name of the Corporation nor the names of the
22// contributors may be used to endorse or promote products derived from
23// this software without specific prior written permission.
24//
25// THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
26// EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27// IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
28// PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
29// CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
30// EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
31// PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
32// PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
33// LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
34// NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
35// SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
36//
37// Questions? Contact Kyungjoo Kim (kyukim@sandia.gov), or
38// Mauro Perego (mperego@sandia.gov)
39//
40// ************************************************************************
41// @HEADER
42
49#ifndef __INTREPID2_HGRAD_HEX_C2_FEM_HPP__
50#define __INTREPID2_HGRAD_HEX_C2_FEM_HPP__
51
52#include "Intrepid2_Basis.hpp"
53
54namespace Intrepid2 {
55
138 namespace Impl {
139
144 public:
145 typedef struct Hexahedron<27> cell_topology_type;
149 template<EOperator opType>
150 struct Serial {
151 template<typename OutputViewType,
152 typename inputViewType>
154 static void
155 getValues( OutputViewType output,
156 const inputViewType input );
157
158 };
159
160 template<typename DeviceType,
161 typename outputValueValueType, class ...outputValueProperties,
162 typename inputPointValueType, class ...inputPointProperties>
163 static void
164 getValues( Kokkos::DynRankView<outputValueValueType,outputValueProperties...> outputValues,
165 const Kokkos::DynRankView<inputPointValueType, inputPointProperties...> inputPoints,
166 const EOperator operatorType);
167
171 template<typename outputValueViewType,
172 typename inputPointViewType,
173 EOperator opType>
174 struct Functor {
175 outputValueViewType _outputValues;
176 const inputPointViewType _inputPoints;
177
180 inputPointViewType inputPoints_ )
181 : _outputValues(outputValues_), _inputPoints(inputPoints_) {}
182
184 void operator()(const ordinal_type pt) const {
185 switch (opType) {
186 case OPERATOR_VALUE : {
187 auto output = Kokkos::subview( _outputValues, Kokkos::ALL(), pt );
188 const auto input = Kokkos::subview( _inputPoints, pt, Kokkos::ALL() );
189 Serial<opType>::getValues( output, input );
190 break;
191 }
192 case OPERATOR_GRAD :
193 case OPERATOR_D1 :
194 case OPERATOR_D2 :
195 case OPERATOR_D3 :
196 case OPERATOR_D4 :
197 case OPERATOR_MAX : {
198 auto output = Kokkos::subview( _outputValues, Kokkos::ALL(), pt, Kokkos::ALL() );
199 const auto input = Kokkos::subview( _inputPoints, pt, Kokkos::ALL() );
200 Serial<opType>::getValues( output, input );
201 break;
202 }
203 default: {
204 INTREPID2_TEST_FOR_ABORT( opType != OPERATOR_VALUE &&
205 opType != OPERATOR_GRAD &&
206 opType != OPERATOR_D1 &&
207 opType != OPERATOR_D2 &&
208 opType != OPERATOR_D3 &&
209 opType != OPERATOR_D4 &&
210 opType != OPERATOR_MAX,
211 ">>> ERROR: (Intrepid2::Basis_HGRAD_HEX_C2_FEM::Serial::getValues) operator is not supported");
212 }
213 }
214 }
215 };
216 };
217 }
218
219 template<typename DeviceType = void,
220 typename outputValueType = double,
221 typename pointValueType = double>
222 class Basis_HGRAD_HEX_C2_FEM : public Basis<DeviceType,outputValueType,pointValueType> {
223 public:
227
231
235
236 using Basis<DeviceType,outputValueType,pointValueType>::getValues;
237
238 virtual
239 void
240 getValues( OutputViewType outputValues,
241 const PointViewType inputPoints,
242 const EOperator operatorType = OPERATOR_VALUE ) const override {
243#ifdef HAVE_INTREPID2_DEBUG
244 // Verify arguments
246 inputPoints,
247 operatorType,
248 this->getBaseCellTopology(),
249 this->getCardinality() );
250#endif
251 Impl::Basis_HGRAD_HEX_C2_FEM::
252 getValues<DeviceType>( outputValues,
253 inputPoints,
254 operatorType );
255 }
256
257 virtual
258 void
259 getDofCoords( ScalarViewType dofCoords ) const override {
260#ifdef HAVE_INTREPID2_DEBUG
261 // Verify rank of output array.
262 INTREPID2_TEST_FOR_EXCEPTION( dofCoords.rank() != 2, std::invalid_argument,
263 ">>> ERROR: (Intrepid2::Basis_HGRAD_HEX_C2_FEM::getDofCoords) rank = 2 required for dofCoords array");
264 // Verify 0th dimension of output array.
265 INTREPID2_TEST_FOR_EXCEPTION( static_cast<ordinal_type>(dofCoords.extent(0)) != this->getCardinality(), std::invalid_argument,
266 ">>> ERROR: (Intrepid2::Basis_HGRAD_HEX_C2_FEM::getDofCoords) mismatch in number of dof and 0th dimension of dofCoords array");
267 // Verify 1st dimension of output array.
268 INTREPID2_TEST_FOR_EXCEPTION( dofCoords.extent(1) != this->getBaseCellTopology().getDimension(), std::invalid_argument,
269 ">>> ERROR: (Intrepid2::Basis_HGRAD_HEX_C2_FEM::getDofCoords) incorrect reference cell (1st) dimension in dofCoords array");
270#endif
271 Kokkos::deep_copy(dofCoords, this->dofCoords_);
272 }
273
274 virtual
275 void
276 getDofCoeffs( ScalarViewType dofCoeffs ) const override {
277#ifdef HAVE_INTREPID2_DEBUG
278 // Verify rank of output array.
279 INTREPID2_TEST_FOR_EXCEPTION( dofCoeffs.rank() != 1, std::invalid_argument,
280 ">>> ERROR: (Intrepid2::Basis_HGRAD_HEX_C2_FEM::getdofCoeffs) rank = 1 required for dofCoeffs array");
281 // Verify 0th dimension of output array.
282 INTREPID2_TEST_FOR_EXCEPTION( static_cast<ordinal_type>(dofCoeffs.extent(0)) != this->getCardinality(), std::invalid_argument,
283 ">>> ERROR: (Intrepid2::Basis_HGRAD_HEX_C2_FEM::getdofCoeffs) mismatch in number of dof and 0th dimension of dofCoeffs array");
284#endif
285 Kokkos::deep_copy(dofCoeffs, 1.0);
286 }
287
288 virtual
289 const char*
290 getName() const override {
291 return "Intrepid2_HGRAD_HEX_C2_FEM";
292 }
293
298 };
299}// namespace Intrepid2
300
302
303#endif
Header file for the abstract base class Intrepid2::Basis.
void getValues_HGRAD_Args(const outputValueViewType outputValues, const inputPointViewType inputPoints, const EOperator operatorType, const shards::CellTopology cellTopo, const ordinal_type basisCard)
Runtime check of the arguments for the getValues method in an HGRAD-conforming FEM basis....
Teuchos::RCP< Basis< DeviceType, OutputType, PointType > > BasisPtr
Basis Pointer.
Definition file for FEM basis functions of degree 2 for H(grad) functions on HEX cells.
Implementation of the default H(grad)-compatible FEM basis of degree 2 on Hexahedron cell.
virtual void getDofCoeffs(ScalarViewType dofCoeffs) const override
Coefficients for computing degrees of freedom for Lagrangian basis If P is an element of the space sp...
virtual const char * getName() const override
Returns basis name.
virtual void getValues(OutputViewType outputValues, const PointViewType inputPoints, const EOperator operatorType=OPERATOR_VALUE) const override
Evaluation of a FEM basis on a reference cell.
BasisPtr< typename Kokkos::HostSpace::device_type, outputValueType, pointValueType > getHostBasis() const override
Creates and returns a Basis object whose DeviceType template argument is Kokkos::HostSpace::device_ty...
virtual void getDofCoords(ScalarViewType dofCoords) const override
Returns spatial locations (coordinates) of degrees of freedom on the reference cell.
An abstract base class that defines interface for concrete basis implementations for Finite Element (...
Kokkos::DynRankView< PointValueType, Kokkos::LayoutStride, DeviceType > PointViewType
View type for input points.
Kokkos::DynRankView< OutputValueType, Kokkos::LayoutStride, DeviceType > OutputViewType
View type for basis value output.
Kokkos::View< ordinal_type ***, typename ExecutionSpace::array_layout, Kokkos::HostSpace > OrdinalTypeArray3DHost
View type for 3d host array.
ordinal_type getCardinality() const
Returns cardinality of the basis.
Kokkos::DynRankView< scalarType, Kokkos::LayoutStride, DeviceType > ScalarViewType
View type for scalars.
Device DeviceType
(Kokkos) Device type on which Basis is templated. Does not necessarily return true for Kokkos::is_dev...
Kokkos::DynRankView< scalarType, DeviceType > dofCoords_
Coordinates of degrees-of-freedom for basis functions defined in physical space.
Kokkos::View< ordinal_type **, typename ExecutionSpace::array_layout, Kokkos::HostSpace > OrdinalTypeArray2DHost
View type for 2d host array.
shards::CellTopology getBaseCellTopology() const
Returns the base cell topology for which the basis is defined. See Shards documentation https://trili...
Kokkos::View< ordinal_type *, typename ExecutionSpace::array_layout, Kokkos::HostSpace > OrdinalTypeArray1DHost
View type for 1d host array.
See Intrepid2::Basis_HGRAD_HEX_C2_FEM.