gdncfiledefinemode.f90 File Reference

Switch netCDF file to define mode . More...

Go to the source code of this file.

Functions/Subroutines
integer function	gdncfiledefinemode (fileid)

Detailed Description

Switch netCDF file to define mode

.

Author

Yasuhiro MORIKAWA, Eizi TOYODA

Copyright

Copyright (C) GFD Dennou Club, 2000-2026. All rights reserved.
License is BSD-2-Clause. See COPYRIGHT in detail

Definition in file gdncfiledefinemode.f90.

Function/Subroutine Documentation

gdncfiledefinemode()

integer function gdncfiledefinemode

(

integer, intent(in)

fileid

)

Switch netCDF file to define mode

Calls nf90_redef to enter define mode. If the file is already in define mode, returns NF90_NOERR instead of an error.

Parameters

[in]

fileid

netCDF file ID

Returns

Status code (NF90_NOERR on success)

Definition at line 35 of file gdncfiledefinemode.f90.

  use netcdf, only: nf90_redef, nf90_eindefine, nf90_noerr
  use dc_trace, only: beginsub, endsub, dbgmessage
  integer, intent(in):: fileid
  character(*), parameter:: subname = "GDNcFileDefineMode"
continue
  call dbgmessage(subname // ' %d', i=(/fileid/))
  result = nf90_redef(fileid)
  if (result == nf90_eindefine) result = nf90_noerr

References dc_trace::beginsub(), dc_trace::dbgmessage(), and dc_trace::endsub().

Here is the call graph for this function: