Go to the documentation of this file.00001
00002
00003
00004
00005
00006
00007 #ifndef SHEAR_MOUDULS_HPP
00008 #define SHEAR_MOUDULS_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 "Teuchos_ParameterList.hpp"
00016 #include "Epetra_Vector.h"
00017 #include "Sacado_ParameterAccessor.hpp"
00018 #include "Stokhos_KL_ExponentialRandomField.hpp"
00019 #include "Teuchos_Array.hpp"
00020
00021 namespace LCM {
00027 template<typename EvalT, typename Traits>
00028 class ShearModulus :
00029 public PHX::EvaluatorWithBaseImpl<Traits>,
00030 public PHX::EvaluatorDerived<EvalT, Traits>,
00031 public Sacado::ParameterAccessor<EvalT, SPL_Traits> {
00032
00033 public:
00034 typedef typename EvalT::ScalarT ScalarT;
00035 typedef typename EvalT::MeshScalarT MeshScalarT;
00036
00037 ShearModulus(Teuchos::ParameterList& p);
00038
00039 void postRegistrationSetup(typename Traits::SetupData d,
00040 PHX::FieldManager<Traits>& vm);
00041
00042 void evaluateFields(typename Traits::EvalData d);
00043
00044 ScalarT& getValue(const std::string &n);
00045
00046 private:
00047
00048 std::size_t numQPs;
00049 std::size_t numDims;
00050 PHX::MDField<MeshScalarT,Cell,QuadPoint,Dim> coordVec;
00051 PHX::MDField<ScalarT,Cell,QuadPoint> shearModulus;
00052
00054 bool is_constant;
00055
00057 ScalarT constant_value;
00058
00060 PHX::MDField<ScalarT,Cell,QuadPoint> Temperature;
00061 bool isThermoElastic;
00062 ScalarT dmudT_value;
00063 RealType refTemp;
00064
00066 Teuchos::RCP< Stokhos::KL::ExponentialRandomField<MeshScalarT> > exp_rf_kl;
00067
00069 Teuchos::Array<ScalarT> rv;
00070 };
00071 }
00072
00073 #endif