@brief subroutine checks start/count for out of bounds, adjusts if the start/count is too high,
zeroes start if it is invalid
POST-EFFECTS:
all start/counts are now legal, non-IO tasks have zeroed start counts
@param[in] global_dims int(3) global grid dimensions
@param[in] rank int rank of current MPI task
@param[inout] start int(3) current MPI task global start
@param[inout] count int(3) current MPI task global count
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer(kind=i4), | intent(in), | dimension(:) | :: | global_dims | ||
| integer(kind=PIO_OFFSET), | intent(inout), | dimension(:) | :: | start | ||
| integer(kind=PIO_OFFSET), | intent(inout), | dimension(:) | :: | count | ||
| integer(kind=i4), | intent(in) | :: | rank |