patch_land_index Function

private function patch_land_index(cstart, nap, patch_index)

Returns the land index corresponding to the given patch index, using cstart and nap to determine the mapping. If the patch index does not lie on any land point, the function aborts.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: cstart(:)

The starting patch index for each land point.

integer, intent(in) :: nap(:)

The number of active patches for each land point.

integer, intent(in) :: patch_index

The patch index to map to a land index.

Return Value integer