www.mooseframework.org
Public Member Functions | Protected Member Functions | Protected Attributes | List of all members
PorousFlowRelativePermeabilityVG Class Reference

Material to calculate van Genuchten-type relative permeability of an arbitrary phase given the saturation and exponent of that phase. More...

#include <PorousFlowRelativePermeabilityVG.h>

Inheritance diagram for PorousFlowRelativePermeabilityVG:
[legend]

Public Member Functions

 PorousFlowRelativePermeabilityVG (const InputParameters &parameters)
 

Protected Member Functions

virtual Real relativePermeability (Real seff) const override
 Relative permeability equation (must be overriden in derived class) More...
 
virtual Real dRelativePermeability (Real seff) const override
 Derivative of relative permeability with respect to effective saturation. More...
 
virtual void computeQpProperties () override
 
virtual Real effectiveSaturation (Real saturation) const
 Effective saturation of fluid phase. More...
 

Protected Attributes

const Real _m
 van Genuchten exponent m for the specified phase More...
 
const Real _cut
 start of cubic smoothing More...
 
const Real _cub0
 Parameter of the cubic. More...
 
const Real _cub1
 Parameter of the cubic. More...
 
const Real _cub2
 Parameter of the cubic. More...
 
const Real _cub3
 Parameter of the cubic. More...
 
const Real _scaling
 Relative permeability is multiplied by this quantity. More...
 
VariableName _saturation_variable_name
 Name of (dummy) saturation primary variable. More...
 
const MaterialProperty< std::vector< Real > > & _saturation
 Saturation material property. More...
 
MaterialProperty< Real > & _relative_permeability
 Relative permeability material property. More...
 
MaterialProperty< Real > & _drelative_permeability_ds
 Derivative of relative permeability wrt phase saturation. More...
 
const Real _s_res
 Residual saturation of specified phase. More...
 
const Real _sum_s_res
 Sum of residual saturations over all phases. More...
 
const Real _dseff_ds
 Derivative of effective saturation with respect to saturation. More...
 
const unsigned int _phase_num
 Phase number of fluid. More...
 
const std::string _phase
 Stringified fluid phase number. More...
 

Detailed Description

Material to calculate van Genuchten-type relative permeability of an arbitrary phase given the saturation and exponent of that phase.

From van Genuchten, M. Th., A closed for equation for predicting the hydraulic conductivity of unsaturated soils, Soil Sci. Soc., 44, 892-898 (1980)

Optionally this relative permeability may be smoothed with a cubic near seff=1 The relative permeability is a cubic for seff>_cut. The cubic is chosen so that the derivative is zero for seff=1, and that the derivative and value matches the van Genuchten expression for seff=_cut.

Definition at line 31 of file PorousFlowRelativePermeabilityVG.h.

Constructor & Destructor Documentation

PorousFlowRelativePermeabilityVG::PorousFlowRelativePermeabilityVG ( const InputParameters &  parameters)

Definition at line 32 of file PorousFlowRelativePermeabilityVG.C.

35  _m(getParam<Real>("m")),
36  _cut(getParam<Real>("seff_turnover")),
39  _cub2(_cut < 1.0
40  ? (getParam<bool>("zero_derivative")
41  ? 3.0 * (1.0 - _cub0 - _cub1 * (1.0 - _cut)) / Utility::pow<2>(1.0 - _cut) +
42  _cub1 / (1.0 - _cut)
44  : 0.0),
45  _cub3(_cut < 1.0
46  ? (getParam<bool>("zero_derivative")
47  ? -2.0 * (1.0 - _cub0 - _cub1 * (1.0 - _cut)) / Utility::pow<3>(1.0 - _cut) -
48  _cub1 / Utility::pow<2>(1.0 - _cut)
49  : (1.0 - _cub0 - _cub1 * (1.0 - _cut) - _cub2 * Utility::pow<2>(1.0 - _cut)) /
50  Utility::pow<3>(1.0 - _cut))
51  : 0.0)
52 {
53 }
Real relativePermeability(Real seff, Real m)
Relative permeability as a function of effective saturation.
PorousFlowRelativePermeabilityBase(const InputParameters &parameters)
const Real _cub2
Parameter of the cubic.
const Real _cub1
Parameter of the cubic.
const Real _m
van Genuchten exponent m for the specified phase
Real dRelativePermeability(Real seff, Real m)
Derivative of relative permeability with respect to effective saturation.
const Real _cub3
Parameter of the cubic.
Real d2RelativePermeability(Real seff, Real m)
Second derivative of relative permeability with respect to effective saturation.
const Real _cut
start of cubic smoothing
const Real _cub0
Parameter of the cubic.

Member Function Documentation

void PorousFlowRelativePermeabilityBase::computeQpProperties ( )
overrideprotectedvirtualinherited

Definition at line 57 of file PorousFlowRelativePermeabilityBase.C.

58 {
59  // Effective saturation
60  Real seff = effectiveSaturation(_saturation[_qp][_phase_num]);
61  Real relperm, drelperm;
62 
63  if (seff < 0.0)
64  {
65  // Relative permeability is 0 for saturation less than residual
66  relperm = 0.0;
67  drelperm = 0.0;
68  }
69  else if (seff >= 0.0 && seff <= 1)
70  {
71  relperm = relativePermeability(seff);
72  drelperm = dRelativePermeability(seff);
73  }
74  else // seff > 1
75  {
76  // Relative permeability is 1 when fully saturated
77  relperm = 1.0;
78  drelperm = 0.0;
79  }
80 
81  _relative_permeability[_qp] = relperm * _scaling;
82  _drelative_permeability_ds[_qp] = drelperm * _dseff_ds * _scaling;
83 }
const Real _scaling
Relative permeability is multiplied by this quantity.
MaterialProperty< Real > & _relative_permeability
Relative permeability material property.
virtual Real dRelativePermeability(Real seff) const =0
Derivative of relative permeability with respect to effective saturation.
const Real _dseff_ds
Derivative of effective saturation with respect to saturation.
const MaterialProperty< std::vector< Real > > & _saturation
Saturation material property.
const unsigned int _phase_num
Phase number of fluid.
virtual Real effectiveSaturation(Real saturation) const
Effective saturation of fluid phase.
MaterialProperty< Real > & _drelative_permeability_ds
Derivative of relative permeability wrt phase saturation.
virtual Real relativePermeability(Real seff) const =0
Relative permeability equation (must be overriden in derived class)
Real PorousFlowRelativePermeabilityVG::dRelativePermeability ( Real  seff) const
overrideprotectedvirtual

Derivative of relative permeability with respect to effective saturation.

Parameters
seffeffective saturation
Returns
derivative of relative permeability wrt effective saturation

Implements PorousFlowRelativePermeabilityBase.

Definition at line 66 of file PorousFlowRelativePermeabilityVG.C.

67 {
68  if (seff < _cut)
70 
71  return _cub1 + 2.0 * _cub2 * (seff - _cut) + 3.0 * _cub3 * Utility::pow<2>(seff - _cut);
72 }
const Real _cub2
Parameter of the cubic.
const Real _cub1
Parameter of the cubic.
const Real _m
van Genuchten exponent m for the specified phase
Real dRelativePermeability(Real seff, Real m)
Derivative of relative permeability with respect to effective saturation.
const Real _cub3
Parameter of the cubic.
const Real _cut
start of cubic smoothing
Real PorousFlowRelativePermeabilityBase::effectiveSaturation ( Real  saturation) const
protectedvirtualinherited

Effective saturation of fluid phase.

Parameters
saturationtrue saturation
Returns
effective saturation

Definition at line 86 of file PorousFlowRelativePermeabilityBase.C.

Referenced by PorousFlowRelativePermeabilityBase::computeQpProperties().

87 {
88  return (saturation - _s_res) / (1.0 - _sum_s_res);
89 }
const Real _sum_s_res
Sum of residual saturations over all phases.
const Real _s_res
Residual saturation of specified phase.
void FORTRAN_CALL() saturation(double &P, double &T, int &N, int &nerr)
Real PorousFlowRelativePermeabilityVG::relativePermeability ( Real  seff) const
overrideprotectedvirtual

Relative permeability equation (must be overriden in derived class)

Parameters
seffeffective saturation
Returns
relative permeability

Implements PorousFlowRelativePermeabilityBase.

Definition at line 56 of file PorousFlowRelativePermeabilityVG.C.

57 {
58  if (seff < _cut)
60 
61  return _cub0 + _cub1 * (seff - _cut) + _cub2 * Utility::pow<2>(seff - _cut) +
62  _cub3 * Utility::pow<3>(seff - _cut);
63 }
Real relativePermeability(Real seff, Real m)
Relative permeability as a function of effective saturation.
const Real _cub2
Parameter of the cubic.
const Real _cub1
Parameter of the cubic.
const Real _m
van Genuchten exponent m for the specified phase
const Real _cub3
Parameter of the cubic.
const Real _cut
start of cubic smoothing
const Real _cub0
Parameter of the cubic.

Member Data Documentation

const Real PorousFlowRelativePermeabilityVG::_cub0
protected

Parameter of the cubic.

Definition at line 47 of file PorousFlowRelativePermeabilityVG.h.

Referenced by relativePermeability().

const Real PorousFlowRelativePermeabilityVG::_cub1
protected

Parameter of the cubic.

Definition at line 49 of file PorousFlowRelativePermeabilityVG.h.

Referenced by dRelativePermeability(), and relativePermeability().

const Real PorousFlowRelativePermeabilityVG::_cub2
protected

Parameter of the cubic.

Definition at line 51 of file PorousFlowRelativePermeabilityVG.h.

Referenced by dRelativePermeability(), and relativePermeability().

const Real PorousFlowRelativePermeabilityVG::_cub3
protected

Parameter of the cubic.

Definition at line 53 of file PorousFlowRelativePermeabilityVG.h.

Referenced by dRelativePermeability(), and relativePermeability().

const Real PorousFlowRelativePermeabilityVG::_cut
protected

start of cubic smoothing

Definition at line 44 of file PorousFlowRelativePermeabilityVG.h.

Referenced by dRelativePermeability(), and relativePermeability().

MaterialProperty<Real>& PorousFlowRelativePermeabilityBase::_drelative_permeability_ds
protectedinherited

Derivative of relative permeability wrt phase saturation.

Definition at line 65 of file PorousFlowRelativePermeabilityBase.h.

Referenced by PorousFlowRelativePermeabilityBase::computeQpProperties().

const Real PorousFlowRelativePermeabilityBase::_dseff_ds
protectedinherited

Derivative of effective saturation with respect to saturation.

Definition at line 74 of file PorousFlowRelativePermeabilityBase.h.

Referenced by PorousFlowRelativePermeabilityBase::computeQpProperties().

const Real PorousFlowRelativePermeabilityVG::_m
protected

van Genuchten exponent m for the specified phase

Definition at line 41 of file PorousFlowRelativePermeabilityVG.h.

Referenced by dRelativePermeability(), and relativePermeability().

const std::string PorousFlowMaterialBase::_phase
protectedinherited

Stringified fluid phase number.

Definition at line 36 of file PorousFlowMaterialBase.h.

const unsigned int PorousFlowMaterialBase::_phase_num
protectedinherited
MaterialProperty<Real>& PorousFlowRelativePermeabilityBase::_relative_permeability
protectedinherited

Relative permeability material property.

Definition at line 62 of file PorousFlowRelativePermeabilityBase.h.

Referenced by PorousFlowRelativePermeabilityBase::computeQpProperties().

const Real PorousFlowRelativePermeabilityBase::_s_res
protectedinherited
const MaterialProperty<std::vector<Real> >& PorousFlowRelativePermeabilityBase::_saturation
protectedinherited

Saturation material property.

Definition at line 59 of file PorousFlowRelativePermeabilityBase.h.

Referenced by PorousFlowRelativePermeabilityBase::computeQpProperties().

VariableName PorousFlowRelativePermeabilityBase::_saturation_variable_name
protectedinherited

Name of (dummy) saturation primary variable.

Definition at line 56 of file PorousFlowRelativePermeabilityBase.h.

const Real PorousFlowRelativePermeabilityBase::_scaling
protectedinherited

Relative permeability is multiplied by this quantity.

Definition at line 53 of file PorousFlowRelativePermeabilityBase.h.

Referenced by PorousFlowRelativePermeabilityBase::computeQpProperties().

const Real PorousFlowRelativePermeabilityBase::_sum_s_res
protectedinherited

The documentation for this class was generated from the following files: