density Function

  1. COESA.f90
  2. COESA_module
  3. density

private pure function density(s)

Arguments

TypeIntentOptionalAttributesName
class(State), intent(in) :: s

Return Value real(kind=wp)


Contents

Source Code

density

Source Code

pure real(wp) function density(s)
    class(State),intent(in) :: s
    density = s%pressure * s%mean_molecular_weight / (Rstar * s%temperature)
end function density