| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real(kind=wp), | public | :: | mean_molecular_weight | = | 0.0_wp | ||
| real(kind=wp), | public | :: | temperature | = | 0.0_wp | ||
| real(kind=wp), | public | :: | pressure | = | 0.0_wp | ||
| real(kind=wp), | public | :: | speed_of_sound | = | 0.0_wp |
type,public :: State real(wp) :: mean_molecular_weight = 0.0_wp real(wp) :: temperature = 0.0_wp real(wp) :: pressure = 0.0_wp real(wp) :: speed_of_sound = 0.0_wp contains procedure :: density end type State