Compute the pressure p from the density rho and the temperature t by equation of state. Essentially,
. Equation of state may take other forms, such as , ,
. Choose wisely which form to use.
(KCW, 2025-07-10)
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=real64), | intent(in) | :: | constant_r | |||
| real(kind=real64), | intent(in) | :: | rho | |||
| real(kind=real64), | intent(in) | :: | t |
pure elemental function p_by_equation_of_state(constant_r, rho, t) result(p) use, intrinsic :: iso_fortran_env, only: real64 real(real64), intent(in) :: constant_r, rho, t real(real64) :: p p = rho * constant_r * t end function p_by_equation_of_state