Defines a stationary solution of the Euler equation by the Hopf Fibration.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=rk), | public | :: | radius |
Minimal value to produce |
|||
real(kind=rk), | public | :: | p0 |
Maximal value to produce |
type spatial_hopf_type
!> Minimal value to produce
real(kind=rk) :: radius
!> Maximal value to produce
real(kind=rk) :: p0
end type spatial_hopf_type