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