InitRectangle Subroutine

public subroutine InitRectangle(obj, dim)

Type Bound

Rectangle_

Arguments

Type	Intent	Optional	Attributes		Name
class(Rectangle_),	intent(inout)			::	obj
integer(kind=int32),	intent(in),	optional		::	dim