Return and instance of primitive_compressible.
This procedure is used for overloading primitive_compressible name.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=R8P), | intent(in), | optional | :: | density | Density, |
|
| type(vector), | intent(in), | optional | :: | velocity | Velocity, |
|
| real(kind=R8P), | intent(in), | optional | :: | pressure | Pressure, |
Instance of primitive_compressible.
elemental function primitive_compressible_instance(density, velocity, pressure) result(instance)
!< Return and instance of [[primitive_compressible]].
!<
!< @note This procedure is used for overloading [[primitive_compressible]] name.
real(R8P), intent(in), optional :: density !< Density, `rho`.
type(vector), intent(in), optional :: velocity !< Velocity, `v`.
real(R8P), intent(in), optional :: pressure !< Pressure, `p`.
type(primitive_compressible) :: instance !< Instance of [[primitive_compressible]].
if (present(density)) instance%density = density
if (present(velocity)) instance%velocity = velocity
if (present(pressure)) instance%pressure = pressure
endfunction primitive_compressible_instance