adjust_bounds Subroutine

public subroutine adjust_bounds(global_dims, start, count, rank)

zeroes start if it is invalid POST-EFFECTS:
all start/counts are now legal, non-IO tasks have zeroed start counts

Arguments

Type IntentOptional Attributes Name
integer(kind=i4), intent(in), dimension(:) :: global_dims

int(3) global grid dimensions

integer(kind=PIO_OFFSET), intent(inout), dimension(:) :: start

int(3) current MPI task global start

integer(kind=PIO_OFFSET), intent(inout), dimension(:) :: count

int(3) current MPI task global start int(3) current MPI task global count

integer(kind=i4), intent(in) :: rank

int rank of current MPI task