collapse_crop_types Subroutine

public subroutine collapse_crop_types(wt_cft, fert_cft, begg, endg, verbose)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=r8),	intent(inout)			::	wt_cft(begg:,cft_lb:)
real(kind=r8),	intent(inout)			::	fert_cft(begg:,cft_lb:)
integer,	intent(in)			::	begg
integer,	intent(in)			::	endg
logical,	intent(in)			::	verbose