Changeset 5182 for LMDZ6/branches/Amaury_dev/libf/dynphy_lonlat/phylmd

Timestamp:

Sep 10, 2024, 4:25:29 PM (2 months ago)

Author:

abarral

Message:

(WIP) Replace REPROBUS CPP KEY by logical
properly name modules

Location:

LMDZ6/branches/Amaury_dev/libf/dynphy_lonlat/phylmd

Files:

• ce0l.F90 (modified) (1 diff)
• etat0dyn_netcdf.F90 (modified) (1 diff)
• iniphysiq_mod.F90 (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/dynphy_lonlat/phylmd/ce0l.F90

@@ -23 +23 @@
   USE netcdf, ONLY: nf90_open, nf90_nowrite, nf90_close, nf90_noerr, &
           nf90_inquire_dimension, nf90_inq_dimid, nf90_inq_varid, nf90_get_var
-  USE infotrac, ONLY: init_infotrac
+  USE lmdz_infotrac, ONLY: init_infotrac
   USE dimphy, ONLY: klon
   USE test_disvert_m, ONLY: test_disvert

LMDZ6/branches/Amaury_dev/libf/dynphy_lonlat/phylmd/etat0dyn_netcdf.F90

@@ -78 +78 @@
     USE exner_hyb_m, ONLY: exner_hyb
     USE exner_milieu_m, ONLY: exner_milieu
-    USE infotrac, ONLY: nqtot, tracers
+    USE lmdz_infotrac, ONLY: nqtot, tracers
     USE lmdz_filtreg
     USE lmdz_cppkeys_wrapper, ONLY: CPPKEY_INCA

LMDZ6/branches/Amaury_dev/libf/dynphy_lonlat/phylmd/iniphysiq_mod.F90

@@ -15 +15 @@
     USE lmdz_phys_para, ONLY: klon_omp ! number of columns (on local omp grid)
     USE lmdz_vertical_layers, ONLY: init_vertical_layers
-    USE infotrac, ONLY: nbtr, type_trac
+    USE lmdz_infotrac, ONLY: nbtr, type_trac
 
 #ifdef REPROBUS