initflower Subroutine

public subroutine initflower(obj, Thickness, length, width)

Type Bound

Flower_

Arguments

Type	Intent	Optional	Attributes		Name
class(Flower_),	intent(inout)			::	obj
real(kind=real64),		optional		::	Thickness
real(kind=real64),		optional		::	length
real(kind=real64),		optional		::	width