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