Context Navigation

← Previous Change
Next Change →

Variables

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/Variables

Files:

: 6 edited

check_start_count.f90 (modified) (1 diff)
nf95_def_var.f90 (modified) (1 diff)
nf95_get_var.f90 (modified) (1 diff)
nf95_inq_varid.f90 (modified) (1 diff)
nf95_inquire_variable.f90 (modified) (1 diff)
nf95_put_var.f90 (modified) (1 diff)

Legend:

: Unmodified
: Added
: Removed

LMDZ6/branches/Amaury_dev/tools/netcdf95/Variables/check_start_count.f90

r5075	r5088
19	19	use nf95_close_m, only: nf95_close
20	20	use nf95_inquire_variable_m, only: nf95_inquire_variable
21		use ~~lmdz_~~netcdf, only: nf90_noerr
	21	use netcdf, only: nf90_noerr
22	22
23	23	character(len=*), intent(in):: name_calling ! name of calling procedure

LMDZ6/branches/Amaury_dev/tools/netcdf95/Variables/nf95_def_var.f90

r5075	r5088
7	7	! "nf95_def_var_scalar" cannot be distinguished from "nf95_def_var_oneDim".
8	8
9		use ~~lmdz_~~netcdf, only: nf90_def_var
	9	use netcdf, only: nf90_def_var
10	10	use nf95_abort_m, only: nf95_abort
11	11	use nf95_constants, only: nf95_noerr

LMDZ6/branches/Amaury_dev/tools/netcdf95/Variables/nf95_get_var.f90

r5075	r5088
1	1	module nf95_get_var_m
2	2
3		use ~~lmdz_~~netcdf, only: nf90_get_var, NF90_NOERR
	3	use netcdf, only: nf90_get_var, NF90_NOERR
4	4
5	5	use nf95_abort_m, only: nf95_abort

LMDZ6/branches/Amaury_dev/tools/netcdf95/Variables/nf95_inq_varid.f90

r5075	r5088
8	8
9	9	use nf95_abort_m, only: nf95_abort
10		use ~~lmdz_~~netcdf, only: nf90_inq_varid
	10	use netcdf, only: nf90_inq_varid
11	11	use nf95_constants, only: nf95_noerr
12	12

LMDZ6/branches/Amaury_dev/tools/netcdf95/Variables/nf95_inquire_variable.f90

r5075	r5088
16	16
17	17	use nf95_abort_m, only: nf95_abort
18		use ~~lmdz_~~netcdf, only: nf90_inquire_variable, nf90_max_var_dims
	18	use netcdf, only: nf90_inquire_variable, nf90_max_var_dims
19	19	use nf95_constants, only: nf95_noerr
20	20

LMDZ6/branches/Amaury_dev/tools/netcdf95/Variables/nf95_put_var.f90

r5075	r5088
1	1	module nf95_put_var_m
2	2
3		use ~~lmdz_~~netcdf, only: nf90_put_var
	3	use netcdf, only: nf90_put_var
4	4	use nf95_abort_m, only: nf95_abort
5	5	use check_start_count_m, only: check_start_count

Note: See TracChangeset for help on using the changeset viewer.