first_patch_in_grid_cell_real64_1d Subroutine

private subroutine first_patch_in_grid_cell_real64_1d(input_array, output_array, landpt)

Extracts the first patch value for each grid cell from a 1D 64-bit real array.

Arguments

Type IntentOptional Attributes Name
real(kind=real64), intent(in) :: input_array(:)

The input array to be reduced. The first (i.e. fastest varying) dimension of this array must be the patch/tile dimension being reduced.
real(kind=real64), intent(out) :: output_array(:)

The output array containing the reduced per grid cell values. The first (i.e. fastest varying) dimension of this array must be equal to the number of grid cells.
type(land_type), intent(in) :: landpt(:)

The land_type instance describing the starting and ending patch/tile indexes in the input array for each grid cell.

Called by

proc~~first_patch_in_grid_cell_real64_1d~~CalledByGraph proc~first_patch_in_grid_cell_real64_1d first_patch_in_grid_cell_real64_1d interface~first_patch_in_grid_cell first_patch_in_grid_cell interface~first_patch_in_grid_cell->proc~first_patch_in_grid_cell_real64_1d proc~cable_output_write_variable cable_output_write_variable proc~cable_output_write_variable->interface~first_patch_in_grid_cell interface~cable_output_write_variable cable_output_write_variable interface~cable_output_write_variable->proc~cable_output_write_variable proc~cable_output_impl_init_streams cable_output_impl_init_streams proc~cable_output_impl_init_streams->interface~cable_output_write_variable proc~cable_output_impl_write cable_output_impl_write proc~cable_output_impl_write->interface~cable_output_write_variable proc~cable_output_impl_write_parameters cable_output_impl_write_parameters proc~cable_output_impl_write_parameters->interface~cable_output_write_variable proc~cable_output_impl_write_restart cable_output_impl_write_restart proc~cable_output_impl_write_restart->interface~cable_output_write_variable