Go to the documentation of this file.00001
00002
00003
00004
00005
00006
00007 #ifndef LAPLACEBELTRAMIRESID_HPP
00008 #define LAPLACEBELTRAMIRESID_HPP
00009
00010 #include "Phalanx_ConfigDefs.hpp"
00011 #include "Phalanx_Evaluator_WithBaseImpl.hpp"
00012 #include "Phalanx_Evaluator_Derived.hpp"
00013 #include "Phalanx_MDField.hpp"
00014
00015 #include "Albany_Layouts.hpp"
00016 #include "Intrepid_CellTools.hpp"
00017 #include "Intrepid_Cubature.hpp"
00018
00019 namespace PHAL {
00020
00027 template<typename EvalT, typename Traits>
00028 class LaplaceBeltramiResid : public PHX::EvaluatorWithBaseImpl<Traits>,
00029 public PHX::EvaluatorDerived<EvalT, Traits> {
00030
00031 public:
00032
00033 LaplaceBeltramiResid(const Teuchos::ParameterList& p,
00034 const Teuchos::RCP<Albany::Layouts>& dl);
00035
00036 void postRegistrationSetup(typename Traits::SetupData d,
00037 PHX::FieldManager<Traits>& vm);
00038
00039 void evaluateFields(typename Traits::EvalData d);
00040
00041 private:
00042
00043 typedef typename EvalT::MeshScalarT MeshScalarT;
00044 typedef typename EvalT::ScalarT ScalarT;
00045
00046
00048 PHX::MDField<ScalarT, Cell, Node, Dim> solnVec;
00049
00050 Teuchos::RCP<Intrepid::Cubature<RealType> > cubature;
00051 Teuchos::RCP<shards::CellTopology> cellType;
00052 PHX::MDField<ScalarT, Cell, QuadPoint, Dim, Dim> Gc;
00053 Teuchos::RCP<Intrepid::Basis<RealType, Intrepid::FieldContainer<RealType> > > intrepidBasis;
00054
00055
00056 Intrepid::FieldContainer<RealType> grad_at_cub_points;
00057 Intrepid::FieldContainer<RealType> refPoints;
00058 Intrepid::FieldContainer<RealType> refWeights;
00059 Intrepid::FieldContainer<ScalarT> jacobian;
00060 Intrepid::FieldContainer<ScalarT> jacobian_det;
00061
00062
00063 PHX::MDField<ScalarT, Cell, Node, Dim> solnResidual;
00064
00065 unsigned int numQPs, numDims, numNodes, worksetSize;
00066
00067 };
00068 }
00069
00070 #endif