alloc_canopy_type Subroutine

public subroutine alloc_canopy_type(var, mp)

Arguments

Type	Intent	Optional	Attributes		Name
type(canopy_type),	intent(inout)			::	var
integer,	intent(in)			::	mp