zio_nf_put_vara_real

INTERFACE:

         integer function zio_nf_put_vara_real(filedesc,varid,istart,    &
      &                                        icount,rvals,distarray,   &
      &                                        fillvalue)

DESCRIPTION:

Puts a range of the given real*4 variable to an output file.

REVISION HISTORY:

       2003-Jan-31 -- first prototype
       2003-Feb-20 -- istart and icount changed to assumed-size arrays
       2003-Aug-14 -- added partial support of prefilling netCDF dataset

INPUT PARAMETERS:

         implicit none
         integer, intent(in) :: filedesc
         integer, intent(in) :: varid
         integer, intent(in) :: istart(*), icount(*)  ! in output index order
 #ifdef ZIO_CRAY
         real(zio_r8), intent(in) :: rvals(*)
         real(zio_r8), optional, intent(in) :: fillvalue
 #else
         real(zio_r4), intent(in) :: rvals(*)
         real(zio_r4), optional, intent(in) :: fillvalue
 #endif
         integer, optional, intent(in) :: distarray

REMARKS:

   istart and icount used to refer only to the array section in the
   netCDF data space in disk, but not array's memory space.  However,
   currently we let istart and icount refer to an array section in BOTH
   the netCDF data and memory space.  That is, an array section in
   netCDF data space is written from or read into the corresponding
   section of the global array.

\