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


Calls

proc~~patch_land_index~~CallsGraph proc~patch_land_index patch_land_index proc~cable_abort cable_abort proc~patch_land_index->proc~cable_abort

Called by

proc~~patch_land_index~~CalledByGraph proc~patch_land_index patch_land_index proc~io_decomp_patch_to_land_patch io_decomp_patch_to_land_patch proc~io_decomp_patch_to_land_patch->proc~patch_land_index proc~io_decomp_patch_to_x_y_patch io_decomp_patch_to_x_y_patch proc~io_decomp_patch_to_x_y_patch->proc~patch_land_index proc~cable_output_decomp_init cable_output_decomp_init proc~cable_output_decomp_init->proc~io_decomp_patch_to_land_patch proc~cable_output_decomp_init->proc~io_decomp_patch_to_x_y_patch interface~cable_output_decomp_init cable_output_decomp_init interface~cable_output_decomp_init->proc~cable_output_decomp_init proc~cable_output_impl_init cable_output_impl_init proc~cable_output_impl_init->interface~cable_output_decomp_init