Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=rk), | public | :: | origin(3) | origin of the ellipsoid |
|||
real(kind=rk), | public | :: | radius(3) | radius of the ellipsoid |
|||
logical, | public | :: | only_surface | To choose what to do with intersection of this object if only_surface = true than the only the surface of the object is intersected if only_surface = false then the whole object is intersected default is set to false |
type tem_ellipsoid_type
!> origin of the ellipsoid
real(kind=rk) :: origin(3)
!> radius of the ellipsoid
real(kind=rk) :: radius(3)
!> To choose what to do with intersection of this object
!! if only_surface = true than the only the surface of the object
!! is intersected
!! if only_surface = false then the whole object is intersected
!! default is set to false
logical :: only_surface
end type tem_ellipsoid_type