NetCDF-Fortran  4.4.4
fort-control.c
Go to the documentation of this file.
1 #include <config.h>
2 #include "netcdf.h"
3 #include "ncfortran.h"
4 
5 #ifdef LOGGING
6 FCALLSCFUN1(NF_INT, nc_set_log_level, NF_SET_LOG_LEVEL, nf_set_log_level,
7  FINT2CINT)
8 #endif /* LOGGING */
9 
10 /*
11  * Create a netCDF dataset.
12  */
13 FCALLSCFUN3(NF_INT, nc_create, NF_CREATE, nf_create,
14  STRING, FINT2CINT, PNCID)
15 
16 
17 /*
18  * Create a netCDF dataset with I/O attributes.
19  */
20 FCALLSCFUN5(NF_INT, nc__create, NF__CREATE, nf__create,
21  STRING, FINT2CINT, FINT2CSIZET, PVOID, PNCID)
22 
23 
24 /*
25  * Open a netCDF dataset.
26  */
27 FCALLSCFUN3(NF_INT, nc_open, NF_OPEN, nf_open,
28  STRING, FINT2CINT, PNCID)
29 
30 
31 /*
32  * Open a netCDF dataset with I/O attributes.
33  */
34 FCALLSCFUN4(NF_INT, nc__open, NF__OPEN, nf__open,
35  STRING, FINT2CINT, PVOID, PNCID)
36 
37 
38 /*
39  * Set the fill mode of a netCDF dataset.
40  */
41 FCALLSCFUN3(NF_INT, nc_set_fill, NF_SET_FILL, nf_set_fill,
42  NCID, FINT2CINT, PCINT2FINT)
43 
44 
45 /*
46  * Set the fill mode of a netCDF dataset.
47  */
48 FCALLSCFUN2(NF_INT, nc_set_default_format, NF_SET_DEFAULT_FORMAT,
49  nf_set_default_format, FINT2CINT, PCINT2FINT)
50 
51 
52 /*
53  * Put a netCDF dataset into redefine mode.
54  */
55 FCALLSCFUN1(NF_INT, nc_redef, NF_REDEF, nf_redef,
56  NCID)
57 
58 
59 /*
60  * End definition mode for a netCDF dataset.
61  */
62 FCALLSCFUN1(NF_INT, nc_enddef, NF_ENDDEF, nf_enddef,
63  NCID)
64 
65 
66 /*
67  * End definition mode for a netCDF dataset with I/O attributes.
68  */
69 FCALLSCFUN5(NF_INT, nc__enddef, NF__ENDDEF, nf__enddef,
70  NCID, FINT2CSIZET, FINT2CSIZET, FINT2CSIZET, FINT2CSIZET)
71 
72 
73 /*
74  * Synchronize the external representation of a netCDF dataset with its
75  * internal one.
76  */
77 FCALLSCFUN1(NF_INT, nc_sync, NF_SYNC, nf_sync,
78  NCID)
79 
80 
81 /*
82  * Abort changes to a netCDF dataset.
83  */
84 FCALLSCFUN1(NF_INT, nc_abort, NF_ABORT, nf_abort,
85  NCID)
86 
87 
88 /*
89  * Close a netCDF dataset.
90  */
91 FCALLSCFUN1(NF_INT, nc_close, NF_CLOSE, nf_close,
92  NCID)
93 
94 
95 /*
96  * Delete a netCDF dataset by name.
97  */
98 /*EXTERNL int nc_delete(const char * path);*/ /* defined in ../libsrc/nc.c */
99 FCALLSCFUN1(NF_INT, nc_delete, NF_DELETE, nf_delete,
100  STRING)
101 
102 /*
103  * Create a netCDF dataset with I/O attributes and specific base pe.
104  */
105 FCALLSCFUN6(NF_INT, nc__create_mp, NF__CREATE_MP, nf__create_mp,
106  STRING, FINT2CINT, FINT2CSIZET, FINT2CINT, PVOID, PNCID)
107 
108 /*
109  * Open a netCDF dataset with I/O attributes and specific base pe.
110  */
111 FCALLSCFUN5(NF_INT, nc__open_mp, NF__OPEN_MP, nf__open_mp,
112  STRING, FINT2CINT, FINT2CINT, PVOID, PNCID)
113 
114 /*
115  * Delete a netCDF dataset by name using a specific base pe.
116  */
117 FCALLSCFUN2(NF_INT, nc_delete_mp, NF_DELETE_MP, nf_delete_mp,
118  STRING, FINT2CINT)
119 
120 /*
121  * Set netCDF of base PE
122  */
123 FCALLSCFUN2(NF_INT, nc_set_base_pe, NF_SET_BASE_PE, nf_set_base_pe,
124  NCID, FINT2CINT)
125 
126 /*
127  * Inquire netCDF of base PE
128  */
129 FCALLSCFUN2(NF_INT, nc_inq_base_pe, NF_INQ_BASE_PE, nf_inq_base_pe,
130  NCID, PCINT2FINT)
131 
132 /*
133  * Inquire netCDF current path
134  */
135 
136 FCALLSCFUN3(NF_INT, nc_inq_path, NF_INQ_PATH, nf_inq_path,
137  NCID, PSIZET, PSTRING)
integer function nf_inq_base_pe(ncid, pe)
Definition: nf_control.F90:627
FCALLSCFUN1(STRING,(char *) nc_strerror, NF_STRERROR, nf_strerror, FINT2CINT) static int nc_issyserr(int errcode)
Definition: fort-misc.c:36
FCALLSCFUN2(NF_INT, c_nctlen, NCTLEN, nctlen, TYPE, PRCODE)
integer function nf_abort(ncid)
Definition: nf_control.F90:504
function nf__create(path, cmode, initialsz, chunksizehintp, ncid)
Definition: nf_control.F90:81
integer function nf__open(path, mode, chunksizehintp, ncid)
Definition: nf_control.F90:199
function nf__enddef(ncid, h_minfree, v_align, v_minfree, r_align)
Definition: nf_control.F90:459
FCALLSCFUN4(NF_INT, c_ncddef, NCDDEF, ncddef, NCID, STRING, DIMLEN, PRCODE)
#define FCALLSCFUN5(T0, CN, UN, LN, T1, T2, T3, T4, T5)
Definition: cfortran.h:2423
#define NF_INT
Definition: ncfortran.h:19
integer function nf_close(ncid)
Definition: nf_control.F90:526
#define FCALLSCFUN3(T0, CN, UN, LN, T1, T2, T3)
Definition: cfortran.h:2419
integer function nf_sync(ncid)
Definition: nf_control.F90:482
integer function nf_open(path, mode, ncid)
Definition: nf_control.F90:163
integer function nf_inq_path(ncid, pathlen, path)
Definition: nf_control.F90:321
integer function nf_create(path, cmode, ncid)
Definition: nf_control.F90:37
integer function nf_set_fill(ncid, fillmode, old_mode)
Definition: nf_control.F90:354
integer function nf_redef(ncid)
Definition: nf_control.F90:409
integer function nf__open_mp(path, mode, basepe, chunksizehintp, ncid)
Definition: nf_control.F90:238
integer function nf_set_default_format(newform, old_format)
Definition: nf_control.F90:382
integer function nf_enddef(ncid)
Definition: nf_control.F90:431
integer function nf_set_base_pe(ncid, pe)
Definition: nf_control.F90:604
FCALLSCFUN6(NF_INT, c_ncvdef, NCVDEF, ncvdef, NCID, STRING, TYPE, NDIMS, DIMIDS, PRCODE)
integer function nf_delete_mp(path, pe)
Definition: nf_control.F90:574
function nf__create_mp(path, cmode, initialsz, basepe, chunksizehintp, ncid)
Definition: nf_control.F90:123
#define PNCID
Definition: ncfortran.h:550
integer function nf_delete(path)
Definition: nf_control.F90:548

Return to the Main Unidata NetCDF page.
Generated on Fri Oct 27 2017 08:12:17 for NetCDF-Fortran. NetCDF is a Unidata library.