Go to the documentation of this file.00001
00002
00003
00004
00005
00006
00007 #ifndef VAN_GENUCHTEN_SATURATION_HPP
00008 #define VAN_GENUCHTEN_SATURATION_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 {
00028 template<typename EvalT, typename Traits>
00029 class VanGenuchtenSaturation :
00030 public PHX::EvaluatorWithBaseImpl<Traits>,
00031 public PHX::EvaluatorDerived<EvalT, Traits>,
00032 public Sacado::ParameterAccessor<EvalT, SPL_Traits> {
00033
00034 public:
00035 typedef typename EvalT::ScalarT ScalarT;
00036 typedef typename EvalT::MeshScalarT MeshScalarT;
00037
00038 VanGenuchtenSaturation(Teuchos::ParameterList& p);
00039
00040 void postRegistrationSetup(typename Traits::SetupData d,
00041 PHX::FieldManager<Traits>& vm);
00042
00043 void evaluateFields(typename Traits::EvalData d);
00044
00045 ScalarT& getValue(const std::string &n);
00046
00047 private:
00048
00049 std::size_t numQPs;
00050 std::size_t numDims;
00051 PHX::MDField<MeshScalarT,Cell,QuadPoint,Dim> coordVec;
00052 PHX::MDField<ScalarT,Cell,QuadPoint> vgSaturation;
00053
00055 bool is_constant;
00056
00058 ScalarT constant_value;
00059
00061
00062 PHX::MDField<ScalarT,Cell,QuadPoint> porosity;
00063 PHX::MDField<ScalarT,Cell,QuadPoint> porePressure;
00064 bool isPoroElastic;
00065
00066 ScalarT waterUnitWeight;
00067
00069 Teuchos::RCP< Stokhos::KL::ExponentialRandomField<MeshScalarT> > exp_rf_kl;
00070
00072 Teuchos::Array<ScalarT> rv;
00073 };
00074 }
00075
00076 #endif