Context Navigation

← Previous Change
Next Change →

Groups

Timestamp:

Jul 20, 2024, 4:30:31 PM (6 months ago)

Author:

abarral

Message:

Remove all managed netcdf77 usage (excluding external: rrtm, ecrad)
Remove call to netcdf.inc
Replace USE lmdz_netcdf by USE netcdf
Replace lmdz_netcdf.F90 by lmdz_netcdf_format.F90

Location:

LMDZ6/branches/Amaury_dev/tools/netcdf95/Groups

Files:

: 3 edited

nf95_inq_file_ncid.f90 (modified) (1 diff)
nf95_inq_grp_parent.f90 (modified) (1 diff)
nf95_inq_grps.f90 (modified) (1 diff)

Legend:

: Unmodified
: Added
: Removed

LMDZ6/branches/Amaury_dev/tools/netcdf95/Groups/nf95_inq_file_ncid.f90

r5086	r5088
11	11	! by nf95_abort, so it cannot call it.
12	12
13		use ~~lmdz_~~netcdf, only: nf90_strerror
	13	use netcdf, only: nf90_strerror
14	14
15	15	use nf95_constants, only: Nf95_ENOGRP, nf95_noerr

LMDZ6/branches/Amaury_dev/tools/netcdf95/Groups/nf95_inq_grp_parent.f90

r5075	r5088
12	12	use, intrinsic:: ISO_C_BINDING
13	13
14		use ~~lmdz_~~netcdf, only: nf90_strerror
	14	use netcdf, only: nf90_strerror
15	15
16	16	use nc_constants, only: NC_NOERR

LMDZ6/branches/Amaury_dev/tools/netcdf95/Groups/nf95_inq_grps.f90

r5075	r5088
26	26	use, intrinsic:: ISO_C_BINDING
27	27
28		use ~~lmdz_~~netcdf, only: nf90_noerr
	28	use netcdf, only: nf90_noerr
29	29
30	30	use nc_constants, only: nc_noerr