change_length_or_width_stem Subroutine

public recursive subroutine change_length_or_width_stem(obj, length, length_rate, Width, width_rate, dt)

Type Bound

Stem_

Arguments

Type	Intent	Optional	Attributes		Name
class(Stem_),	intent(inout)			::	obj
real(kind=real64),	intent(in),	optional		::	length
real(kind=real64),	intent(in),	optional		::	length_rate
real(kind=real64),	intent(in),	optional		::	Width
real(kind=real64),	intent(in),	optional		::	width_rate
real(kind=real64),	intent(in),	optional		::	dt