initEar Subroutine

public subroutine initEar(this, Length, width, Angle, debug, x_num, y_num, z_num, Leaf_angle_z)

Type Bound

Ear_

Arguments

Type	Intent	Optional	Attributes		Name
class(Ear_),	intent(inout)			::	this
real(kind=real64),	intent(in)			::	Length
real(kind=real64),	intent(in)			::	width
real(kind=real64),	intent(in)			::	Angle
logical,	intent(in),	optional		::	debug
integer(kind=int32),	intent(in),	optional		::	x_num
integer(kind=int32),	intent(in),	optional		::	y_num
integer(kind=int32),	intent(in),	optional		::	z_num
real(kind=real64),	intent(in),	optional		::	Leaf_angle_z