C------------------------------------------------------------------------------
C
C NSSDC/CDF Microsoft FORTRAN-specific include
C file for FORTRAN interface.
C
C Version 1.2, 9-Sep-96, Hughes STX.
C
C Modification history:
C
C V1.0 9-Mar-93, J Love Original version.
C V1.1 22-Nov-94, J Love CDF V2.5.
C V1.2 9-Sep-96, J Love CDF V2.6.
C V1.3 08-Apr-04, M Liu Added new data type CDF_EPOCH16 and some
C epoch functions related to the new type.
C
C------------------------------------------------------------------------------
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB
. [ALIAS:'_cdf_lib',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_4
. [ALIAS:'_cdf_lib_4',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_5
. [ALIAS:'_cdf_lib_5',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_6
. [ALIAS:'_cdf_lib_6',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_7
. [ALIAS:'_cdf_lib_7',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_8
. [ALIAS:'_cdf_lib_8',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_9
. [ALIAS:'_cdf_lib_9',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_10
. [ALIAS:'_cdf_lib_10',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_11
. [ALIAS:'_cdf_lib_11',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_12
. [ALIAS:'_cdf_lib_12',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_13
. [ALIAS:'_cdf_lib_13',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_14
. [ALIAS:'_cdf_lib_14',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_15
. [ALIAS:'_cdf_lib_15',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_16
. [ALIAS:'_cdf_lib_16',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_17
. [ALIAS:'_cdf_lib_17',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_18
. [ALIAS:'_cdf_lib_18',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_19
. [ALIAS:'_cdf_lib_19',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_20
. [ALIAS:'_cdf_lib_20',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_21
. [ALIAS:'_cdf_lib_21',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_22
. [ALIAS:'_cdf_lib_22',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_23
. [ALIAS:'_cdf_lib_23',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_24
. [ALIAS:'_cdf_lib_24',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_LIB_25
. [ALIAS:'_cdf_lib_25',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_OPEN
. [ALIAS:'_cdf_open',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_CREATE
. [ALIAS:'_cdf_create',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_INQUIRE
. [ALIAS:'_cdf_inquire',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_DOC
. [ALIAS:'_cdf_doc',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_CLOSE
. [ALIAS:'_cdf_close',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_DELETE
. [ALIAS:'_cdf_delete',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_VAR_CREATE
. [ALIAS:'_cdf_var_create',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_VAR_INQUIRE
. [ALIAS:'_cdf_var_inquire',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_VAR_RENAME
. [ALIAS:'_cdf_var_rename',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_VAR_GET
. [ALIAS:'_cdf_var_get',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_VAR_PUT
. [ALIAS:'_cdf_var_put',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_VAR_HYPER_GET
. [ALIAS:'_cdf_var_hyper_get',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_VAR_HYPER_PUT
. [ALIAS:'_cdf_var_hyper_put',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_VAR_CLOSE
. [ALIAS:'_cdf_var_close',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_ATTR_CREATE
. [ALIAS:'_cdf_attr_create',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_ATTR_INQUIRE
. [ALIAS:'_cdf_attr_inquire',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_ATTR_RENAME
. [ALIAS:'_cdf_attr_rename',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_ATTR_CORRECT_SCOPE
. [ALIAS:'_cdf_attr_correct_scope',
. VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_ATTR_ENTRY_INQUIRE
. [ALIAS:'_cdf_attr_entry_inquire',
. VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_ATTR_GET
. [ALIAS:'_cdf_attr_get',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_ATTR_PUT
. [ALIAS:'_cdf_attr_put',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_ERROR
. [ALIAS:'_cdf_error',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_VAR_NUM
. [ALIAS:'_cdf_var_num',VARYING]
. ()
END
INTERFACE TO INTEGER*4 FUNCTION CDF_ATTR_NUM
. [ALIAS:'_cdf_attr_num',VARYING]
. ()
END
INTERFACE TO SUBROUTINE EPOCH_BREAKDOWN
. [ALIAS:'_epoch_breakdown',VARYING]
. ()
END
INTERFACE TO SUBROUTINE COMPUTE_EPOCH
. [ALIAS:'_compute_epoch',VARYING]
. ()
END
INTERFACE TO SUBROUTINE PARSE_EPOCH
. [ALIAS:'_parse_epoch',VARYING]
. ()
END
INTERFACE TO SUBROUTINE PARSE_EPOCH1
. [ALIAS:'_parse_epoch1',VARYING]
. ()
END
INTERFACE TO SUBROUTINE PARSE_EPOCH2
. [ALIAS:'_parse_epoch2',VARYING]
. ()
END
INTERFACE TO SUBROUTINE PARSE_EPOCH3
. [ALIAS:'_parse_epoch3',VARYING]
. ()
END
INTERFACE TO SUBROUTINE ENCODE_EPOCH
. [ALIAS:'_encode_epoch',VARYING]
. ()
END
INTERFACE TO SUBROUTINE ENCODE_EPOCH1
. [ALIAS:'_encode_epoch1',VARYING]
. ()
END
INTERFACE TO SUBROUTINE ENCODE_EPOCH2
. [ALIAS:'_encode_epoch2',VARYING]
. ()
END
INTERFACE TO SUBROUTINE ENCODE_EPOCH3
. [ALIAS:'_encode_epoch3',VARYING]
. ()
END
INTERFACE TO SUBROUTINE ENCODE_EPOCHX
. [ALIAS:'_encode_epochx',VARYING]
. ()
INTERFACE TO SUBROUTINE EPOCH16_BREAKDOWN
. [ALIAS:'_epoch16_breakdown',VARYING]
. ()
END
INTERFACE TO SUBROUTINE COMPUTE_EPOCH16
. [ALIAS:'_compute_epoch16',VARYING]
. ()
END
INTERFACE TO SUBROUTINE PARSE_EPOCH16
. [ALIAS:'_parse_epoch16',VARYING]
. ()
END
INTERFACE TO SUBROUTINE PARSE_EPOCH16_1
. [ALIAS:'_parse_epoch16_1',VARYING]
. ()
END
INTERFACE TO SUBROUTINE PARSE_EPOCH16_2
. [ALIAS:'_parse_epoch16_2',VARYING]
. ()
END
INTERFACE TO SUBROUTINE PARSE_EPOCH16_3
. [ALIAS:'_parse_epoch16_3',VARYING]
. ()
END
INTERFACE TO SUBROUTINE ENCODE_EPOCH16
. [ALIAS:'_encode_epoch16',VARYING]
. ()
END
INTERFACE TO SUBROUTINE ENCODE_EPOCH16_1
. [ALIAS:'_encode_epoch16_1',VARYING]
. ()
END
INTERFACE TO SUBROUTINE ENCODE_EPOCH16_2
. [ALIAS:'_encode_epoch16_2',VARYING]
. ()
END
INTERFACE TO SUBROUTINE ENCODE_EPOCH16_3
. [ALIAS:'_encode_epoch16_3',VARYING]
. ()
END
INTERFACE TO SUBROUTINE ENCODE_EPOCH16_X
. [ALIAS:'_encode_epoch16_x',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_GETRVARSRECORDDATA
. [ALIAS:'_cdf_getrvarsrecorddata',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_PUTRVARSRECORDDATA
. [ALIAS:'_cdf_putrvarsrecorddata',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_GETZVARSRECORDDATA
. [ALIAS:'_cdf_getzvarsrecorddata',VARYING]
. ()
END
INTERFACE TO SUBROUTINE CDF_PUTZVARSRECORDDATA
. [ALIAS:'_cdf_putzvarsrecorddata',VARYING]
. ()
END
syntax highlighted by Code2HTML, v. 0.9.1