mirror of
https://github.com/Unidata/netcdf-c.git
synced 2024-11-21 03:13:42 +08:00
1110 lines
42 KiB
PHP
1110 lines
42 KiB
PHP
!
|
|
! netcdf version 3 fortran interface:
|
|
!
|
|
|
|
!
|
|
! external netcdf data types:
|
|
!
|
|
integer nf_byte
|
|
integer nf_int1
|
|
integer nf_char
|
|
integer nf_short
|
|
integer nf_int2
|
|
integer nf_int
|
|
integer nf_float
|
|
integer nf_real
|
|
integer nf_double
|
|
|
|
parameter (nf_byte = 1)
|
|
parameter (nf_int1 = nf_byte)
|
|
parameter (nf_char = 2)
|
|
parameter (nf_short = 3)
|
|
parameter (nf_int2 = nf_short)
|
|
parameter (nf_int = 4)
|
|
parameter (nf_float = 5)
|
|
parameter (nf_real = nf_float)
|
|
parameter (nf_double = 6)
|
|
|
|
!
|
|
! default fill values:
|
|
!
|
|
integer nf_fill_byte
|
|
integer nf_fill_int1
|
|
integer nf_fill_char
|
|
integer nf_fill_short
|
|
integer nf_fill_int2
|
|
integer nf_fill_int
|
|
real nf_fill_float
|
|
real nf_fill_real
|
|
doubleprecision nf_fill_double
|
|
|
|
parameter (nf_fill_byte = -127)
|
|
parameter (nf_fill_int1 = nf_fill_byte)
|
|
parameter (nf_fill_char = 0)
|
|
parameter (nf_fill_short = -32767)
|
|
parameter (nf_fill_int2 = nf_fill_short)
|
|
parameter (nf_fill_int = -2147483647)
|
|
parameter (nf_fill_float = 9.9692099683868690e+36)
|
|
parameter (nf_fill_real = nf_fill_float)
|
|
parameter (nf_fill_double = 9.9692099683868690d+36)
|
|
|
|
!
|
|
! mode flags for opening and creating a netcdf dataset:
|
|
!
|
|
integer nf_nowrite
|
|
integer nf_write
|
|
integer nf_clobber
|
|
integer nf_noclobber
|
|
integer nf_fill
|
|
integer nf_nofill
|
|
integer nf_lock
|
|
integer nf_share
|
|
integer nf_64bit_offset
|
|
integer nf_sizehint_default
|
|
integer nf_align_chunk
|
|
integer nf_format_classic
|
|
integer nf_format_64bit
|
|
|
|
parameter (nf_nowrite = 0)
|
|
parameter (nf_write = 1)
|
|
parameter (nf_clobber = 0)
|
|
parameter (nf_noclobber = 4)
|
|
parameter (nf_fill = 0)
|
|
parameter (nf_nofill = 256)
|
|
parameter (nf_lock = 1024)
|
|
parameter (nf_share = 2048)
|
|
parameter (nf_64bit_offset = 512)
|
|
parameter (nf_sizehint_default = 0)
|
|
parameter (nf_align_chunk = -1)
|
|
parameter (nf_format_classic = 1)
|
|
parameter (nf_format_64bit = 2)
|
|
|
|
!
|
|
! size argument for defining an unlimited dimension:
|
|
!
|
|
integer nf_unlimited
|
|
parameter (nf_unlimited = 0)
|
|
|
|
!
|
|
! global attribute id:
|
|
!
|
|
integer nf_global
|
|
parameter (nf_global = 0)
|
|
|
|
!
|
|
! implementation limits:
|
|
!
|
|
integer nf_max_dims
|
|
integer nf_max_attrs
|
|
integer nf_max_vars
|
|
integer nf_max_name
|
|
integer nf_max_var_dims
|
|
|
|
parameter (nf_max_dims = 1024)
|
|
parameter (nf_max_attrs = 8192)
|
|
parameter (nf_max_vars = 8192)
|
|
parameter (nf_max_name = 256)
|
|
parameter (nf_max_var_dims = nf_max_dims)
|
|
|
|
!
|
|
! error codes:
|
|
!
|
|
integer nf_noerr
|
|
integer nf_ebadid
|
|
integer nf_eexist
|
|
integer nf_einval
|
|
integer nf_eperm
|
|
integer nf_enotindefine
|
|
integer nf_eindefine
|
|
integer nf_einvalcoords
|
|
integer nf_emaxdims
|
|
integer nf_enameinuse
|
|
integer nf_enotatt
|
|
integer nf_emaxatts
|
|
integer nf_ebadtype
|
|
integer nf_ebaddim
|
|
integer nf_eunlimpos
|
|
integer nf_emaxvars
|
|
integer nf_enotvar
|
|
integer nf_eglobal
|
|
integer nf_enotnc
|
|
integer nf_ests
|
|
integer nf_emaxname
|
|
integer nf_eunlimit
|
|
integer nf_enorecvars
|
|
integer nf_echar
|
|
integer nf_eedge
|
|
integer nf_estride
|
|
integer nf_ebadname
|
|
integer nf_erange
|
|
integer nf_enomem
|
|
integer nf_evarsize
|
|
integer nf_edimsize
|
|
integer nf_etrunc
|
|
|
|
parameter (nf_noerr = 0)
|
|
parameter (nf_ebadid = -33)
|
|
parameter (nf_eexist = -35)
|
|
parameter (nf_einval = -36)
|
|
parameter (nf_eperm = -37)
|
|
parameter (nf_enotindefine = -38)
|
|
parameter (nf_eindefine = -39)
|
|
parameter (nf_einvalcoords = -40)
|
|
parameter (nf_emaxdims = -41)
|
|
parameter (nf_enameinuse = -42)
|
|
parameter (nf_enotatt = -43)
|
|
parameter (nf_emaxatts = -44)
|
|
parameter (nf_ebadtype = -45)
|
|
parameter (nf_ebaddim = -46)
|
|
parameter (nf_eunlimpos = -47)
|
|
parameter (nf_emaxvars = -48)
|
|
parameter (nf_enotvar = -49)
|
|
parameter (nf_eglobal = -50)
|
|
parameter (nf_enotnc = -51)
|
|
parameter (nf_ests = -52)
|
|
parameter (nf_emaxname = -53)
|
|
parameter (nf_eunlimit = -54)
|
|
parameter (nf_enorecvars = -55)
|
|
parameter (nf_echar = -56)
|
|
parameter (nf_eedge = -57)
|
|
parameter (nf_estride = -58)
|
|
parameter (nf_ebadname = -59)
|
|
parameter (nf_erange = -60)
|
|
parameter (nf_enomem = -61)
|
|
parameter (nf_evarsize = -62)
|
|
parameter (nf_edimsize = -63)
|
|
parameter (nf_etrunc = -64)
|
|
!
|
|
! error handling modes:
|
|
!
|
|
integer nf_fatal
|
|
integer nf_verbose
|
|
|
|
parameter (nf_fatal = 1)
|
|
parameter (nf_verbose = 2)
|
|
|
|
!
|
|
! miscellaneous routines:
|
|
!
|
|
character*80 nf_inq_libvers
|
|
external nf_inq_libvers
|
|
|
|
character*80 nf_strerror
|
|
! (integer ncerr)
|
|
external nf_strerror
|
|
|
|
logical nf_issyserr
|
|
! (integer ncerr)
|
|
external nf_issyserr
|
|
|
|
!
|
|
! control routines:
|
|
!
|
|
integer nf_inq_base_pe
|
|
! (integer ncid,
|
|
! integer pe)
|
|
external nf_inq_base_pe
|
|
|
|
integer nf_set_base_pe
|
|
! (integer ncid,
|
|
! integer pe)
|
|
external nf_set_base_pe
|
|
|
|
integer nf_create
|
|
! (character*(*) path,
|
|
! integer cmode,
|
|
! integer ncid)
|
|
external nf_create
|
|
|
|
integer nf__create
|
|
! (character*(*) path,
|
|
! integer cmode,
|
|
! integer initialsz,
|
|
! integer chunksizehint,
|
|
! integer ncid)
|
|
external nf__create
|
|
|
|
integer nf__create_mp
|
|
! (character*(*) path,
|
|
! integer cmode,
|
|
! integer initialsz,
|
|
! integer basepe,
|
|
! integer chunksizehint,
|
|
! integer ncid)
|
|
external nf__create_mp
|
|
|
|
integer nf_open
|
|
! (character*(*) path,
|
|
! integer mode,
|
|
! integer ncid)
|
|
external nf_open
|
|
|
|
integer nf__open
|
|
! (character*(*) path,
|
|
! integer mode,
|
|
! integer chunksizehint,
|
|
! integer ncid)
|
|
external nf__open
|
|
|
|
integer nf__open_mp
|
|
! (character*(*) path,
|
|
! integer mode,
|
|
! integer basepe,
|
|
! integer chunksizehint,
|
|
! integer ncid)
|
|
external nf__open_mp
|
|
|
|
integer nf_set_fill
|
|
! (integer ncid,
|
|
! integer fillmode,
|
|
! integer old_mode)
|
|
external nf_set_fill
|
|
|
|
integer nf_set_default_format
|
|
! (integer format,
|
|
! integer old_format)
|
|
external nf_set_default_format
|
|
|
|
integer nf_redef
|
|
! (integer ncid)
|
|
external nf_redef
|
|
|
|
integer nf_enddef
|
|
! (integer ncid)
|
|
external nf_enddef
|
|
|
|
integer nf__enddef
|
|
! (integer ncid,
|
|
! integer h_minfree,
|
|
! integer v_align,
|
|
! integer v_minfree,
|
|
! integer r_align)
|
|
external nf__enddef
|
|
|
|
integer nf_sync
|
|
! (integer ncid)
|
|
external nf_sync
|
|
|
|
integer nf_abort
|
|
! (integer ncid)
|
|
external nf_abort
|
|
|
|
integer nf_close
|
|
! (integer ncid)
|
|
external nf_close
|
|
|
|
integer nf_delete
|
|
! (character*(*) ncid)
|
|
external nf_delete
|
|
|
|
!
|
|
! general inquiry routines:
|
|
!
|
|
|
|
integer nf_inq
|
|
! (integer ncid,
|
|
! integer ndims,
|
|
! integer nvars,
|
|
! integer ngatts,
|
|
! integer unlimdimid)
|
|
external nf_inq
|
|
|
|
integer nf_inq_ndims
|
|
! (integer ncid,
|
|
! integer ndims)
|
|
external nf_inq_ndims
|
|
|
|
integer nf_inq_nvars
|
|
! (integer ncid,
|
|
! integer nvars)
|
|
external nf_inq_nvars
|
|
|
|
integer nf_inq_natts
|
|
! (integer ncid,
|
|
! integer ngatts)
|
|
external nf_inq_natts
|
|
|
|
integer nf_inq_unlimdim
|
|
! (integer ncid,
|
|
! integer unlimdimid)
|
|
external nf_inq_unlimdim
|
|
|
|
integer nf_inq_format
|
|
! (integer ncid,
|
|
! integer format)
|
|
external nf_inq_format
|
|
|
|
!
|
|
! dimension routines:
|
|
!
|
|
|
|
integer nf_def_dim
|
|
! (integer ncid,
|
|
! character(*) name,
|
|
! integer len,
|
|
! integer dimid)
|
|
external nf_def_dim
|
|
|
|
integer nf_inq_dimid
|
|
! (integer ncid,
|
|
! character(*) name,
|
|
! integer dimid)
|
|
external nf_inq_dimid
|
|
|
|
integer nf_inq_dim
|
|
! (integer ncid,
|
|
! integer dimid,
|
|
! character(*) name,
|
|
! integer len)
|
|
external nf_inq_dim
|
|
|
|
integer nf_inq_dimname
|
|
! (integer ncid,
|
|
! integer dimid,
|
|
! character(*) name)
|
|
external nf_inq_dimname
|
|
|
|
integer nf_inq_dimlen
|
|
! (integer ncid,
|
|
! integer dimid,
|
|
! integer len)
|
|
external nf_inq_dimlen
|
|
|
|
integer nf_rename_dim
|
|
! (integer ncid,
|
|
! integer dimid,
|
|
! character(*) name)
|
|
external nf_rename_dim
|
|
|
|
!
|
|
! general attribute routines:
|
|
!
|
|
|
|
integer nf_inq_att
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! integer xtype,
|
|
! integer len)
|
|
external nf_inq_att
|
|
|
|
integer nf_inq_attid
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! integer attnum)
|
|
external nf_inq_attid
|
|
|
|
integer nf_inq_atttype
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! integer xtype)
|
|
external nf_inq_atttype
|
|
|
|
integer nf_inq_attlen
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! integer len)
|
|
external nf_inq_attlen
|
|
|
|
integer nf_inq_attname
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer attnum,
|
|
! character(*) name)
|
|
external nf_inq_attname
|
|
|
|
integer nf_copy_att
|
|
! (integer ncid_in,
|
|
! integer varid_in,
|
|
! character(*) name,
|
|
! integer ncid_out,
|
|
! integer varid_out)
|
|
external nf_copy_att
|
|
|
|
integer nf_rename_att
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) curname,
|
|
! character(*) newname)
|
|
external nf_rename_att
|
|
|
|
integer nf_del_att
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name)
|
|
external nf_del_att
|
|
|
|
!
|
|
! attribute put/get routines:
|
|
!
|
|
|
|
integer nf_put_att_text
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! integer len,
|
|
! character(*) text)
|
|
external nf_put_att_text
|
|
|
|
integer nf_get_att_text
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! character(*) text)
|
|
external nf_get_att_text
|
|
|
|
integer nf_put_att_int1
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! integer xtype,
|
|
! integer len,
|
|
! nf_int1_t i1vals(1))
|
|
external nf_put_att_int1
|
|
|
|
integer nf_get_att_int1
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! nf_int1_t i1vals(1))
|
|
external nf_get_att_int1
|
|
|
|
integer nf_put_att_int2
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! integer xtype,
|
|
! integer len,
|
|
! nf_int2_t i2vals(1))
|
|
external nf_put_att_int2
|
|
|
|
integer nf_get_att_int2
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! nf_int2_t i2vals(1))
|
|
external nf_get_att_int2
|
|
|
|
integer nf_put_att_int
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! integer xtype,
|
|
! integer len,
|
|
! integer ivals(1))
|
|
external nf_put_att_int
|
|
|
|
integer nf_get_att_int
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! integer ivals(1))
|
|
external nf_get_att_int
|
|
|
|
integer nf_put_att_real
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! integer xtype,
|
|
! integer len,
|
|
! real rvals(1))
|
|
external nf_put_att_real
|
|
|
|
integer nf_get_att_real
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! real rvals(1))
|
|
external nf_get_att_real
|
|
|
|
integer nf_put_att_double
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! integer xtype,
|
|
! integer len,
|
|
! double dvals(1))
|
|
external nf_put_att_double
|
|
|
|
integer nf_get_att_double
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! double dvals(1))
|
|
external nf_get_att_double
|
|
|
|
!
|
|
! general variable routines:
|
|
!
|
|
|
|
integer nf_def_var
|
|
! (integer ncid,
|
|
! character(*) name,
|
|
! integer datatype,
|
|
! integer ndims,
|
|
! integer dimids(1),
|
|
! integer varid)
|
|
external nf_def_var
|
|
|
|
integer nf_inq_var
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name,
|
|
! integer datatype,
|
|
! integer ndims,
|
|
! integer dimids(1),
|
|
! integer natts)
|
|
external nf_inq_var
|
|
|
|
integer nf_inq_varid
|
|
! (integer ncid,
|
|
! character(*) name,
|
|
! integer varid)
|
|
external nf_inq_varid
|
|
|
|
integer nf_inq_varname
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name)
|
|
external nf_inq_varname
|
|
|
|
integer nf_inq_vartype
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer xtype)
|
|
external nf_inq_vartype
|
|
|
|
integer nf_inq_varndims
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer ndims)
|
|
external nf_inq_varndims
|
|
|
|
integer nf_inq_vardimid
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer dimids(1))
|
|
external nf_inq_vardimid
|
|
|
|
integer nf_inq_varnatts
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer natts)
|
|
external nf_inq_varnatts
|
|
|
|
integer nf_rename_var
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) name)
|
|
external nf_rename_var
|
|
|
|
integer nf_copy_var
|
|
! (integer ncid_in,
|
|
! integer varid,
|
|
! integer ncid_out)
|
|
external nf_copy_var
|
|
|
|
!
|
|
! entire variable put/get routines:
|
|
!
|
|
|
|
integer nf_put_var_text
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) text)
|
|
external nf_put_var_text
|
|
|
|
integer nf_get_var_text
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! character(*) text)
|
|
external nf_get_var_text
|
|
|
|
integer nf_put_var_int1
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! nf_int1_t i1vals(1))
|
|
external nf_put_var_int1
|
|
|
|
integer nf_get_var_int1
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! nf_int1_t i1vals(1))
|
|
external nf_get_var_int1
|
|
|
|
integer nf_put_var_int2
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! nf_int2_t i2vals(1))
|
|
external nf_put_var_int2
|
|
|
|
integer nf_get_var_int2
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! nf_int2_t i2vals(1))
|
|
external nf_get_var_int2
|
|
|
|
integer nf_put_var_int
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer ivals(1))
|
|
external nf_put_var_int
|
|
|
|
integer nf_get_var_int
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer ivals(1))
|
|
external nf_get_var_int
|
|
|
|
integer nf_put_var_real
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! real rvals(1))
|
|
external nf_put_var_real
|
|
|
|
integer nf_get_var_real
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! real rvals(1))
|
|
external nf_get_var_real
|
|
|
|
integer nf_put_var_double
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! doubleprecision dvals(1))
|
|
external nf_put_var_double
|
|
|
|
integer nf_get_var_double
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! doubleprecision dvals(1))
|
|
external nf_get_var_double
|
|
|
|
!
|
|
! single variable put/get routines:
|
|
!
|
|
|
|
integer nf_put_var1_text
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer index(1),
|
|
! character*1 text)
|
|
external nf_put_var1_text
|
|
|
|
integer nf_get_var1_text
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer index(1),
|
|
! character*1 text)
|
|
external nf_get_var1_text
|
|
|
|
integer nf_put_var1_int1
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer index(1),
|
|
! nf_int1_t i1val)
|
|
external nf_put_var1_int1
|
|
|
|
integer nf_get_var1_int1
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer index(1),
|
|
! nf_int1_t i1val)
|
|
external nf_get_var1_int1
|
|
|
|
integer nf_put_var1_int2
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer index(1),
|
|
! nf_int2_t i2val)
|
|
external nf_put_var1_int2
|
|
|
|
integer nf_get_var1_int2
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer index(1),
|
|
! nf_int2_t i2val)
|
|
external nf_get_var1_int2
|
|
|
|
integer nf_put_var1_int
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer index(1),
|
|
! integer ival)
|
|
external nf_put_var1_int
|
|
|
|
integer nf_get_var1_int
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer index(1),
|
|
! integer ival)
|
|
external nf_get_var1_int
|
|
|
|
integer nf_put_var1_real
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer index(1),
|
|
! real rval)
|
|
external nf_put_var1_real
|
|
|
|
integer nf_get_var1_real
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer index(1),
|
|
! real rval)
|
|
external nf_get_var1_real
|
|
|
|
integer nf_put_var1_double
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer index(1),
|
|
! doubleprecision dval)
|
|
external nf_put_var1_double
|
|
|
|
integer nf_get_var1_double
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer index(1),
|
|
! doubleprecision dval)
|
|
external nf_get_var1_double
|
|
|
|
!
|
|
! variable array put/get routines:
|
|
!
|
|
|
|
integer nf_put_vara_text
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! character(*) text)
|
|
external nf_put_vara_text
|
|
|
|
integer nf_get_vara_text
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! character(*) text)
|
|
external nf_get_vara_text
|
|
|
|
integer nf_put_vara_int1
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! nf_int1_t i1vals(1))
|
|
external nf_put_vara_int1
|
|
|
|
integer nf_get_vara_int1
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! nf_int1_t i1vals(1))
|
|
external nf_get_vara_int1
|
|
|
|
integer nf_put_vara_int2
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! nf_int2_t i2vals(1))
|
|
external nf_put_vara_int2
|
|
|
|
integer nf_get_vara_int2
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! nf_int2_t i2vals(1))
|
|
external nf_get_vara_int2
|
|
|
|
integer nf_put_vara_int
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer ivals(1))
|
|
external nf_put_vara_int
|
|
|
|
integer nf_get_vara_int
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer ivals(1))
|
|
external nf_get_vara_int
|
|
|
|
integer nf_put_vara_real
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! real rvals(1))
|
|
external nf_put_vara_real
|
|
|
|
integer nf_get_vara_real
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! real rvals(1))
|
|
external nf_get_vara_real
|
|
|
|
integer nf_put_vara_double
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! doubleprecision dvals(1))
|
|
external nf_put_vara_double
|
|
|
|
integer nf_get_vara_double
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! doubleprecision dvals(1))
|
|
external nf_get_vara_double
|
|
|
|
!
|
|
! strided variable put/get routines:
|
|
!
|
|
|
|
integer nf_put_vars_text
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! character(*) text)
|
|
external nf_put_vars_text
|
|
|
|
integer nf_get_vars_text
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! character(*) text)
|
|
external nf_get_vars_text
|
|
|
|
integer nf_put_vars_int1
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! nf_int1_t i1vals(1))
|
|
external nf_put_vars_int1
|
|
|
|
integer nf_get_vars_int1
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! nf_int1_t i1vals(1))
|
|
external nf_get_vars_int1
|
|
|
|
integer nf_put_vars_int2
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! nf_int2_t i2vals(1))
|
|
external nf_put_vars_int2
|
|
|
|
integer nf_get_vars_int2
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! nf_int2_t i2vals(1))
|
|
external nf_get_vars_int2
|
|
|
|
integer nf_put_vars_int
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! integer ivals(1))
|
|
external nf_put_vars_int
|
|
|
|
integer nf_get_vars_int
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! integer ivals(1))
|
|
external nf_get_vars_int
|
|
|
|
integer nf_put_vars_real
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! real rvals(1))
|
|
external nf_put_vars_real
|
|
|
|
integer nf_get_vars_real
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! real rvals(1))
|
|
external nf_get_vars_real
|
|
|
|
integer nf_put_vars_double
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! doubleprecision dvals(1))
|
|
external nf_put_vars_double
|
|
|
|
integer nf_get_vars_double
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! doubleprecision dvals(1))
|
|
external nf_get_vars_double
|
|
|
|
!
|
|
! mapped variable put/get routines:
|
|
!
|
|
|
|
integer nf_put_varm_text
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! integer imap(1),
|
|
! character(*) text)
|
|
external nf_put_varm_text
|
|
|
|
integer nf_get_varm_text
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! integer imap(1),
|
|
! character(*) text)
|
|
external nf_get_varm_text
|
|
|
|
integer nf_put_varm_int1
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! integer imap(1),
|
|
! nf_int1_t i1vals(1))
|
|
external nf_put_varm_int1
|
|
|
|
integer nf_get_varm_int1
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! integer imap(1),
|
|
! nf_int1_t i1vals(1))
|
|
external nf_get_varm_int1
|
|
|
|
integer nf_put_varm_int2
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! integer imap(1),
|
|
! nf_int2_t i2vals(1))
|
|
external nf_put_varm_int2
|
|
|
|
integer nf_get_varm_int2
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! integer imap(1),
|
|
! nf_int2_t i2vals(1))
|
|
external nf_get_varm_int2
|
|
|
|
integer nf_put_varm_int
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! integer imap(1),
|
|
! integer ivals(1))
|
|
external nf_put_varm_int
|
|
|
|
integer nf_get_varm_int
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! integer imap(1),
|
|
! integer ivals(1))
|
|
external nf_get_varm_int
|
|
|
|
integer nf_put_varm_real
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! integer imap(1),
|
|
! real rvals(1))
|
|
external nf_put_varm_real
|
|
|
|
integer nf_get_varm_real
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! integer imap(1),
|
|
! real rvals(1))
|
|
external nf_get_varm_real
|
|
|
|
integer nf_put_varm_double
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! integer imap(1),
|
|
! doubleprecision dvals(1))
|
|
external nf_put_varm_double
|
|
|
|
integer nf_get_varm_double
|
|
! (integer ncid,
|
|
! integer varid,
|
|
! integer start(1),
|
|
! integer count(1),
|
|
! integer stride(1),
|
|
! integer imap(1),
|
|
! doubleprecision dvals(1))
|
|
external nf_get_varm_double
|
|
|