constructor Function

  1. jenkins1991_entrainment.F90
  2. jenkins1991_entrainment_mod
  3. constructor

private pure function constructor(coefficient) result(this)

Arguments

Type IntentOptional AttributesName
real(kind=r8), intent(in) :: coefficient

The entrainment coefficient, $E_0$ to be used

Return Value type(jenkins1991_entrainment)

A new entrainment object


Called by

proc~~constructor~22~~CalledByGraph proc~constructor~22 constructor interface~jenkins1991_entrainment jenkins1991_entrainment interface~jenkins1991_entrainment->proc~constructor~22

Contents

Source Code

constructor

Source Code

  pure function constructor(coefficient) result(this)
    real(r8), intent(in) :: coefficient
      !! The entrainment coefficient, $E_0$ to be used
    type(jenkins1991_entrainment) :: this
      !! A new entrainment object
    this%coefficient = coefficient
  end function constructor