SendCohortToLitter Subroutine

public subroutine SendCohortToLitter(csite, cpatch, ccohort, nplant)

Arguments

Type	Intent	Optional	Attributes		Name
type(ed_site_type),			target	::	csite
type(ed_patch_type),			target	::	cpatch
type(ed_cohort_type),			target	::	ccohort
real(kind=r8)				::	nplant