patch_land_index Function

private function patch_land_index(cstart, nap, patch_index)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	cstart(:)
integer,	intent(in)			::	nap(:)
integer,	intent(in)			::	patch_index

Return Value integer