Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(Leaf_), | public, | pointer | :: | Leaf | |||
real(kind=real64), | public | :: | x(3) | ||||
real(kind=real64), | public | :: | volume | ||||
real(kind=real64), | public | :: | eatSpeed |
procedure, public :: create => createInsect | |
procedure, public :: set => setInsect | |
procedure, public :: eat => eatInsect |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(Insect_), | intent(inout) | :: | obj | |||
real(kind=real64), | intent(in), | optional | :: | x | ||
real(kind=real64), | intent(in), | optional | :: | y | ||
real(kind=real64), | intent(in), | optional | :: | z | ||
real(kind=real64), | intent(in), | optional | :: | volume | ||
real(kind=real64), | intent(in), | optional | :: | eatSpeed |