Changeset 5088 for LMDZ6/branches/Amaury_dev/libf/phylmd/regr_lat_time_coefoz_m.F90

Timestamp:

Jul 20, 2024, 4:30:31 PM (3 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

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/regr_lat_time_coefoz_m.F90 (modified) (3 diffs)

LMDZ6/branches/Amaury_dev/libf/phylmd/regr_lat_time_coefoz_m.F90

@@ -45 +45 @@
     use netcdf95, only: nf95_open, nf95_close, nf95_inq_varid, nf95_get_var, &
          nf95_put_var, nf95_gw_var
-    use lmdz_netcdf, only: nf90_nowrite
+    use netcdf, only: nf90_nowrite
     use nrtype, only: pi
     use regular_lonlat_mod, only: boundslat_reg, south
@@ -245 +245 @@
     use netcdf95, only: nf95_create, nf95_def_dim, nf95_def_var, &
          nf95_put_att, nf95_enddef, nf95_copy_att, nf95_put_var
-    use lmdz_netcdf, only: nf90_clobber, nf90_float, nf90_copy_att, nf90_global
+    use netcdf, only: nf90_clobber, nf90_float, nf90_copy_att, nf90_global
     use nrtype, only: pi
     use regular_lonlat_mod, only : lat_reg
@@ -328 +328 @@
     subroutine handle_err_copy_att(att_name)
 
-      use lmdz_netcdf, only: nf90_noerr, nf90_strerror
+      use netcdf, only: nf90_noerr, nf90_strerror
 
       character(len=*), intent(in):: att_name