get_clump_bounds

INTERFACE:

    subroutine get_clump_bounds (n, begg, endg, begl, endl, begc, endc, &
                                 begp, endp)

USES:

ARGUMENTS:

      implicit none
      integer, intent(in)  :: n           ! proc clump index
      integer, intent(out) :: begp, endp  ! clump beginning and ending
                                          ! pft indices
      integer, intent(out) :: begc, endc  ! clump beginning and ending
                                          ! column indices
      integer, intent(out) :: begl, endl  ! clump beginning and ending
                                          ! landunit indices
      integer, intent(out) :: begg, endg  ! clump beginning and ending
                                          ! gridcell indices

DESCRIPTION:

Determine clump beginning and ending pft, column, landunit and gridcell indices.

REVISION HISTORY:

   2003.09.12  Mariana Vertenstein  Creation.

LOCAL VARIABLES: