Changeset 5084 for LMDZ6/trunk/libf/phylmd/rrtm/readaerosolstrato1_rrtm.F90

Timestamp:

Jul 19, 2024, 6:40:44 PM (2 months ago)

Author:

Laurent Fairhead

Message:

Reverting to r4065. Updating fortran standard broke too much stuff. Will do it by smaller chunks
AB, LF

File:

• LMDZ6/trunk/libf/phylmd/rrtm/readaerosolstrato1_rrtm.F90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/rrtm/readaerosolstrato1_rrtm.F90

@@ -7 +7 @@
     USE netcdf95, ONLY: nf95_close, nf95_gw_var, nf95_inq_dimid, & 
                         nf95_inq_varid, nf95_open
-    USE lmdz_netcdf, ONLY: nf90_get_var, nf90_noerr, nf90_nowrite
+    USE netcdf, ONLY: nf90_get_var, nf90_noerr, nf90_nowrite
 
     USE phys_cal_mod, ONLY : mth_cur