gtool5 Fortran 90/95 Library 1.0.0-rc5
日本語
Loading...
Searching...
No Matches
gdncfiledatamode.f90 File Reference

Switch netCDF file to data mode . More...

Go to the source code of this file.

Functions/Subroutines

integer function gdncfiledatamode (fileid)

Detailed Description

Switch netCDF file to data mode

.

Author
Yasuhiro MORIKAWA, Eizi TOYODA

Definition in file gdncfiledatamode.f90.

Function/Subroutine Documentation

◆ gdncfiledatamode()

integer function gdncfiledatamode ( integer, intent(in) fileid)

Switch netCDF file to data mode

Calls nf90_enddef to exit define mode. If the file is already in data mode, returns NF90_NOERR instead of an error.

Parameters
[in]fileidnetCDF file ID
Returns
Status code (NF90_NOERR on success)

Definition at line 35 of file gdncfiledatamode.f90.

36 use netcdf, only: nf90_enddef, nf90_enotindefine, nf90_noerr
37 use dc_trace, only: dbgmessage
38 implicit none
39 integer, intent(in):: fileid
40 character(*), parameter:: subname = "GDNcFileDataMode"
41continue
42 call dbgmessage(subname)
43 result = nf90_enddef(fileid)
44 if (result == nf90_enotindefine) result = nf90_noerr
Debug tracing module.
Definition dc_trace.f90:150
subroutine, public dbgmessage(fmt, i, r, d, l, n, c1, c2, c3, ca)
Definition dc_trace.f90:661

References dc_trace::dbgmessage().

Here is the call graph for this function: