ncd_ioglobal_real_3d

INTERFACE:

   subroutine ncd_ioglobal_real_3d(varname, data, flag, ncid, readvar, nt, bcast, usepio)

DESCRIPTION:

netcdf I/O of global 3d real array

ARGUMENTS:

     implicit none
     character(len=*), intent(in)    :: flag             ! 'read' or 'write'
     integer         , intent(in)    :: ncid             ! input unit
     character(len=*), intent(in)    :: varname          ! variable name
     real(r8)        , intent(inout) :: data (:,:,:)     ! raw data
     logical         , optional, intent(out):: readvar   ! was var read?
     integer         , optional, intent(in) :: nt        ! time sample index
     logical         , optional, intent(in) :: bcast     ! bcast on read?
     logical         , optional, intent(in) :: usepio    ! use pio lib

REVISION HISTORY:

LOCAL VARIABLES: