C------------------------------------------------------------------------------
C
C  NSSDC/CDF				Digital FORTRAN-specific include
C					file for FORTRAN interface.
C
C  Version 1.0, 20-Sep-99, Raytheon ITSS.
C
C  Modification history:
C
C   V1.0  20-Sep-99, M Liu      Original version.
C   V1.1  08-Apr-04, M Liu      Added  new data type CDF_EPOCH16 and some
C                               epoch functions related to the new type.
C
C------------------------------------------------------------------------------

       INTERFACE
         SUBROUTINE CDF_DELETE_ATTR
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING :: CDF_DELETE_ATTR
          !DEC$ ALIAS CDF_DELETE_ATTR, '_cdf_delete_attr'
         END SUBROUTINE CDF_DELETE_ATTR
       END INTERFACE
	
       INTERFACE
         SUBROUTINE CDF_GET_CACHESIZE
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_CACHESIZE
          !DEC$ ALIAS CDF_GET_CACHESIZE, '_cdf_get_cachesize'
         END SUBROUTINE CDF_GET_CACHESIZE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_DECODING
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_DECODING
          !DEC$ ALIAS CDF_GET_DECODING, '_cdf_get_decoding'
         END SUBROUTINE CDF_GET_DECODING
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_NEGTOPOSFP0_MODE
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_NEGTOPOSFP0_MODE
          !DEC$ ALIAS CDF_GET_NEGTOPOSFP0_MODE, '_cdf_get_negtoposfp0_mode'
         END SUBROUTINE CDF_GET_NEGTOPOSFP0_MODE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_READONLY_MODE
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_READONLY_MODE
          !DEC$ ALIAS CDF_GET_READONLY_MODE, '_cdf_get_readonly_mode'
         END SUBROUTINE CDF_GET_READONLY_MODE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZMODE
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZMODE
          !DEC$ ALIAS CDF_GET_ZMODE, '_cdf_get_zmode'
         END SUBROUTINE CDF_GET_ZMODE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_COMPRESS_CACHESIZE
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_COMPRESS_CACHESIZE
          !DEC$ ALIAS CDF_GET_COMPRESS_CACHESIZE, '_cdf_get_compress_cachesize'
         END SUBROUTINE CDF_GET_COMPRESS_CACHESIZE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_STAGE_CACHESIZE
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_STAGE_CACHESIZE
          !DEC$ ALIAS CDF_GET_STAGE_CACHESIZE, '_cdf_get_stage_cachesize'
         END SUBROUTINE CDF_GET_STAGE_CACHESIZE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_CACHESIZE
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_CACHESIZE
          !DEC$ ALIAS CDF_GET_ZVAR_CACHESIZE, '_cdf_get_zvar_cachesize'
         END SUBROUTINE CDF_GET_ZVAR_CACHESIZE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVARS_CACHESIZE
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVARS_CACHESIZE
          !DEC$ ALIAS CDF_GET_ZVARS_CACHESIZE, '_cdf_get_zvars_cachesize'
         END SUBROUTINE CDF_GET_ZVARS_CACHESIZE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_RESERVEPERCENT
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_RESERVEPERCENT
          !DEC$ ALIAS CDF_GET_ZVAR_RESERVEPERCENT, '_cdf_get_zvar_reservepercent'
         END SUBROUTINE CDF_GET_ZVAR_RESERVEPERCENT
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_SEQPOS
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_SEQPOS
          !DEC$ ALIAS CDF_GET_ZVAR_SEQPOS, '_cdf_get_zvar_seqpos'
         END SUBROUTINE CDF_GET_ZVAR_SEQPOS
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ATTR_NAME
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ATTR_NAME
          !DEC$ ALIAS CDF_GET_ATTR_NAME, '_cdf_get_attr_name'
         END SUBROUTINE CDF_GET_ATTR_NAME
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ATTR_SCOPE
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ATTR_SCOPE
          !DEC$ ALIAS CDF_GET_ATTR_SCOPE, '_cdf_get_attr_scope'
         END SUBROUTINE CDF_GET_ATTR_SCOPE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_DELETE_ATTR_GENTRY
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_DELETE_ATTR_GENTRY
          !DEC$ ALIAS CDF_DELETE_ATTR_GENTRY, '_cdf_delete_attr_gentry'
         END SUBROUTINE CDF_DELETE_ATTR_GENTRY
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_DELETE_ATTR_RENTRY
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_DELETE_ATTR_RENTRY
          !DEC$ ALIAS CDF_DELETE_ATTR_RENTRY, '_cdf_delete_attr_rentry'
         END SUBROUTINE CDF_DELETE_ATTR_RENTRY
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_DELETE_ATTR_ZENTRY
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_DELETE_ATTR_ZENTRY
          !DEC$ ALIAS CDF_DELETE_ATTR_ZENTRY, '_cdf_delete_attr_zentry'
         END SUBROUTINE CDF_DELETE_ATTR_ZENTRY
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ATTR_NUM_GENTRIES
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ATTR_NUM_GENTRIES
          !DEC$ ALIAS CDF_GET_ATTR_NUM_GENTRIES, '_cdf_get_attr_num_gentries'
         END SUBROUTINE CDF_GET_ATTR_NUM_GENTRIES
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ATTR_NUM_RENTRIES
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ATTR_NUM_RENTRIES
          !DEC$ ALIAS CDF_GET_ATTR_NUM_RENTRIES, '_cdf_get_attr_num_rentries'
         END SUBROUTINE CDF_GET_ATTR_NUM_RENTRIES
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ATTR_NUM_ZENTRIES
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ATTR_NUM_ZENTRIES
          !DEC$ ALIAS CDF_GET_ATTR_NUM_ZENTRIES, '_cdf_zet_attr_num_gentries'
         END SUBROUTINE CDF_GET_ATTR_NUM_ZENTRIES
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ATTR_MAX_GENTRY
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ATTR_MAX_GENTRY
          !DEC$ ALIAS CDF_GET_ATTR_MAX_GENTRY, '_cdf_get_attr_max_gentry'
         END SUBROUTINE CDF_GET_ATTR_MAX_GENTRY
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ATTR_MAX_RENTRY
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ATTR_MAX_RENTRY
          !DEC$ ALIAS CDF_GET_ATTR_MAX_RENTRY, '_cdf_get_attr_max_rentry'
         END SUBROUTINE CDF_GET_ATTR_MAX_RENTRY
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ATTR_MAX_ZENTRY
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ATTR_MAX_ZENTRY
          !DEC$ ALIAS CDF_GET_ATTR_MAX_ZENTRY, '_cdf_get_attr_max_zentry'
         END SUBROUTINE CDF_GET_ATTR_MAX_ZENTRY
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ATTR_GENTRY_DATATYPE
         !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ATTR_GENTRY_DATATYPE
         !DEC$ ALIAS CDF_GET_ATTR_GENTRY_DATATYPE, '_cdf_get_attr_gentry_datatype'
         END SUBROUTINE CDF_GET_ATTR_GENTRY_DATATYPE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ATTR_RENTRY_DATATYPE
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ATTR_RENTRY_DATATYPE
          !DEC$ ALIAS CDF_GET_ATTR_RENTRY_DATATYPE, '_cdf_get_attr_rentry_datatype'
         END SUBROUTINE CDF_GET_ATTR_RENTRY_DATATYPE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ATTR_ZENTRY_DATATYPE
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ATTR_ZENTRY_DATATYPE
          !DEC$ ALIAS CDF_GET_ATTR_ZENTRY_DATATYPE, '_cdf_get_attr_zentry_datatype'
         END SUBROUTINE CDF_GET_ATTR_ZENTRY_DATATYPE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ATTR_GENTRY_NUMELEMS
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ATTR_GENTRY_NUMELEMS
          !DEC$ ALIAS CDF_GET_ATTR_GENTRY_NUMELEMS, '_cdf_get_attr_gentry_numelems'
         END SUBROUTINE CDF_GET_ATTR_GENTRY_NUMELEMS
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ATTR_RENTRY_NUMELEMS
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ATTR_RENTRY_NUMELEMS
          !DEC$ ALIAS CDF_GET_ATTR_RENTRY_NUMELEMS, '_cdf_get_attr_rentry_numelems'
         END SUBROUTINE CDF_GET_ATTR_RENTRY_NUMELEMS
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ATTR_ZENTRY_NUMELEMS
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ATTR_ZENTRY_NUMELEMS
          !DEC$ ALIAS CDF_GET_ATTR_ZENTRY_NUMELEMS, '_cdf_get_attr_zentry_numelems'
         END SUBROUTINE CDF_GET_ATTR_ZENTRY_NUMELEMS
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_DELETE_ZVAR
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_DELETE_ZVAR
          !DEC$ ALIAS CDF_DELETE_ZVAR, '_cdf_delete_zvar'
         END SUBROUTINE CDF_DELETE_ZVAR
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_DELETE_ZVAR_RECS
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_DELETE_ZVAR_RECS
          !DEC$ ALIAS CDF_DELETE_ZVAR_RECS, '_cdf_delete_zvar_recs'
         END SUBROUTINE CDF_DELETE_ZVAR_RECS
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_NUM_RVARS
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_NUM_RVARS
          !DEC$ ALIAS CDF_GET_NUM_RVARS, '_cdf_get_num_rvars'
         END SUBROUTINE CDF_GET_NUM_RVARS
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_NUM_ZVARS
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_NUM_ZVARS
          !DEC$ ALIAS CDF_GET_NUM_ZVARS, '_cdf_get_num_zvars'
         END SUBROUTINE CDF_GET_NUM_ZVARS
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_COMPRESSION
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_COMPRESSION
          !DEC$ ALIAS CDF_GET_COMPRESSION, '_cdf_get_compression'
         END SUBROUTINE CDF_GET_COMPRESSION
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_COPYRIGHT
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_COPYRIGHT
          !DEC$ ALIAS CDF_GET_COPYRIGHT, '_cdf_get_copyright'
         END SUBROUTINE CDF_GET_COPYRIGHT
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ENCODING
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ENCODING
          !DEC$ ALIAS CDF_GET_ENCODING, '_cdf_get_encoding'
         END SUBROUTINE CDF_GET_ENCODING
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_FORMAT
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_FORMAT
          !DEC$ ALIAS CDF_GET_FORMAT, '_cdf_get_format'
         END SUBROUTINE CDF_GET_FORMAT
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_MAJORITY
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_MAJORITY
          !DEC$ ALIAS CDF_GET_MAJORITY, '_cdf_get_majority'
         END SUBROUTINE CDF_GET_MAJORITY
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_compression_INFO
          !DEC$ ATTRIBUTES C,REFERENCE,VARYING::CDF_GET_COMPRESSION_INFO
          !DEC$ ALIAS CDF_GET_INFO, '_cdf_get_compression_info'
         END SUBROUTINE CDF_GET_compression_INFO
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_NUM_ATTRS
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_NUM_ATTRS
          !DEC$ ALIAS CDF_GET_NUM_ATTRS, '_cdf_get_num_attrs'
         END SUBROUTINE CDF_GET_NUM_ATTRS
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_NUM_GATTRS
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_NUM_GATTRS
          !DEC$ ALIAS CDF_GET_NUM_GATTRS, '_cdf_get_num_gattrs'
         END SUBROUTINE CDF_GET_NUM_GATTRS
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_NUM_VATTRS
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_NUM_VATTRS
          !DEC$ ALIAS CDF_GET_NUM_VATTRS, '_cdf_get_num_vattrs'
         END SUBROUTINE CDF_GET_NUM_VATTRS
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_DATATYPE_SIZE
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_DATATYPE_SIZE
          !DEC$ ALIAS CDF_GET_DATATYPE_SIZE, '_cdf_get_datatype_size'
         END SUBROUTINE CDF_GET_DATATYPE_SIZE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_LIB_COPYRIGHT
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_LIB_COPYRIGHT
          !DEC$ ALIAS CDF_GET_LIB_COPYRIGHT, '_cdf_get_lib_copyright'
         END SUBROUTINE CDF_GET_LIB_COPYRIGHT
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_LIB_VERSION
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_LIB_VERSION
          !DEC$ ALIAS CDF_GET_LIB_VERSION, '_cdf_get_lib_version'
         END SUBROUTINE CDF_GET_LIB_VERSION
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_VERSION
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_VERSION
          !DEC$ ALIAS CDF_GET_VERSION, '_cdf_get_version'
         END SUBROUTINE CDF_GET_VERSION
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_NAME
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_NAME
          !DEC$ ALIAS CDF_GET_NAME, '_cdf_get_name'
         END SUBROUTINE CDF_GET_NAME
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_NAME
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_NAME
          !DEC$ ALIAS CDF_GET_ZVAR_NAME, '_cdf_get_zvar_name'
         END SUBROUTINE CDF_GET_ZVAR_NAME
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_MAXWRITTENRECNUM
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_MAXWRITTENRECNUM
          !DEC$ ALIAS CDF_GET_ZVAR_MAXWRITTENRECNUM, '_cdf_get_zvar_maxwrittenrecnum'
         END SUBROUTINE CDF_GET_ZVAR_MAXWRITTENRECNUM
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_MAXALLOCRECNUM
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_MAXALLOCRECNUM
          !DEC$ ALIAS CDF_GET_ZVAR_MAXALLOCRECNUM, '_cdf_get_zvar_maxallocrecnum'
         END SUBROUTINE CDF_GET_ZVAR_MAXALLOCRECNUM
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVARS_MAXWRITTENRECNUM
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVARS_MAXWRITTENRECNUM
          !DEC$ ALIAS CDF_GET_ZVARS_MAXWRITTENRECNUM, '_cdf_get_zvars_maxwrittenrecnum'
         END SUBROUTINE CDF_GET_ZVARS_MAXWRITTENRECNUM
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_ALLOCRECS
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_ALLOCRECS
          !DEC$ ALIAS CDF_GET_ZVAR_ALLOCRECS, '_cdf_get_zvar_allocrecs'
         END SUBROUTINE CDF_GET_ZVAR_ALLOCRECS
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_DATATYPE
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_DATATYPE
          !DEC$ ALIAS CDF_GET_ZVAR_DATATYPE, '_cdf_get_zvar_datatype'
         END SUBROUTINE CDF_GET_ZVAR_DATATYPE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_NUMELEMS
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_NUMELEMS
          !DEC$ ALIAS CDF_GET_ZVAR_NUMELEMS, '_cdf_get_zvar_numelems'
         END SUBROUTINE CDF_GET_ZVAR_NUMELEMS
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_NUMDIMS
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_NUMDIMS
          !DEC$ ALIAS CDF_GET_ZVAR_NUMDIMS, '_cdf_get_zvar_numdims'
         END SUBROUTINE CDF_GET_ZVAR_NUMDIMS
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_DIMSIZES
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_DIMSIZES
          !DEC$ ALIAS CDF_GET_ZVAR_DIMSIZES, '_cdf_get_zvar_dimsizes'
         END SUBROUTINE CDF_GET_ZVAR_DIMSIZES
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_RECVARIANCE
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_RECVARIANCE
          !DEC$ ALIAS CDF_GET_ZVAR_RECVARIANCE, '_cdf_get_zvar_recvariance'
         END SUBROUTINE CDF_GET_ZVAR_RECVARIANCE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_DIMVARIANCES
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_DIMVARIANCES
          !DEC$ ALIAS CDF_GET_ZVAR_DIMVARIANCES, '_cdf_get_zvar_dimvariances'
         END SUBROUTINE CDF_GET_ZVAR_DIMVARIANCES
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_BLOCKINGFACTOR
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_BLOCKINGFACTOR
          !DEC$ ALIAS CDF_GET_ZVAR_BLOCKINGFACTOR, '_cdf_get_zvar_blockingfactor'
         END SUBROUTINE CDF_GET_ZVAR_BLOCKINGFACTOR
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_COMPRESSION
          !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_COMPRESSION
          !DEC$ ALIAS CDF_GET_ZVAR_COMPRESSION, '_cdf_get_zvar_compression'
         END SUBROUTINE CDF_GET_ZVAR_COMPRESSION
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_PADVALUE
         !DEC$ ATTRIBUTES C, REFERENCE, VARYING ::CDF_GET_ZVAR_PADVALUE
         !DEC$ ALIAS CDF_GET_ZVAR_PADVALUE, '_cdf_get_zvar_padvalue'
         END SUBROUTINE CDF_GET_ZVAR_PADVALUE
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_SPARSERECORDS
         !DEC$ ATTRIBUTES C,REFERENCE,VARYING::CDF_GET_ZVAR_SPARSERECORDS
         !DEC$ ALIAS CDF_GET_ZVAR_SPARSERECORDS,'_cdf_get_zvar_sparserecords'
         END SUBROUTINE CDF_GET_ZVAR_SPARSERECORDS
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_NUMRECS_WRITTEN
         !DEC$ ATTRIBUTES C,REFERENCE,VARYING::CDF_GET_ZVAR_NUMRECS_WRITTEN
         !DEC$ ALIAS CDF_GET_ZVAR_NUMRECS_WRITTEN,'_cdf_get_zvar_numrecs_written'
         END SUBROUTINE CDF_GET_ZVAR_NUMRECS_WRITTEN
       END INTERFACE

       INTERFACE
         SUBROUTINE CDF_GET_ZVAR_RECORDDATA
          !DEC$ ATTRIBUTES C, REFERENCE,VARYING::CDF_GET_ZVAR_RECORDDATA
          !DEC$ ALIAS CDF_GET_ZVAR_RECORDDATA,'_cdf_get_zvar_recorddata'
         END SUBROUTINE CDF_GET_ZVAR_RECORDDATA
       END INTERFACE



syntax highlighted by Code2HTML, v. 0.9.1