zio_get_nblks

INTERFACE:

         integer function zio_get_nblks(distarray,nblks)

DESCRIPTION:

Returns the number of disjoint rectangular data blocks of distributed array descriptor distarray.

REVISION HISTORY:

       2003-Jul-14 -- created

USES:

         implicit none

INPUT PARAMETERS:

         integer, intent(in) :: distarray

OUTPUT PARAMETERS:

         integer, intent(out) :: nblks(0:*)

\