zio_nf_get_att_real

INTERFACE:

         integer function zio_nf_get_att_real(filedesc,varid,name,rvals)

DESCRIPTION:

Returns the real*4 attribute values for a netCDF variable.

REVISION HISTORY:

       2003-Jan-31 -- first prototype
       2003-Aug-13 -- minor change regarding broadcasting strategy
       2003-Aug-16 -- support single task mode: ZIO_SPMD undefined
       2003-Sep-16 -- attribute value for inquiry broadcasted to all PEs

INPUT PARAMETERS:

         implicit none
         integer, intent(in):: filedesc
         integer, intent(in):: varid
         character(len=*), intent(in):: name

OUTPUT PARAMETERS:

 #ifdef ZIO_CRAY
         real(zio_r8), intent(out) :: rvals(*)
 #else
         real(zio_r4), intent(out) :: rvals(*)
 #endif

\