Changeset 5221 for LMDZ6/branches/Amaury_dev/libf/dyn3d/iniacademic.F90

Timestamp:

Sep 23, 2024, 4:12:29 PM (4 weeks ago)

Author:

abarral

Message:

Merge r5196, r5199
Nb: skipping r5197 r5198 as they revert one-another

Location:

LMDZ6/branches/Amaury_dev

Files:

• . (modified) (1 prop)
• libf/dyn3d/iniacademic.F90 (modified) (2 diffs)

LMDZ6/branches/Amaury_dev/libf/dyn3d/iniacademic.F90

@@ -4 +4 @@
 
   USE lmdz_filtreg, ONLY: inifilr
-  USE lmdz_infotrac, ONLY: nqtot, niso, iqIsoPha, tracers, getKey, isoName
+  USE lmdz_infotrac, ONLY: nqtot, niso, iqIsoPha, tracers, getKey, isoName, addPhase
   USE control_mod, ONLY: day_step, planet_type
   USE exner_hyb_m, ONLY: exner_hyb
@@ -15 +15 @@
   USE temps_mod, ONLY: annee_ref, day_ini, day_ref
   USE ener_mod, ONLY: etot0, ptot0, ztot0, stot0, ang0
-  USE lmdz_readTracFiles, ONLY: addPhase
   USE netcdf, ONLY: nf90_nowrite, nf90_open, nf90_noerr, nf90_inq_varid, nf90_close, nf90_get_var
   USE lmdz_ran1, ONLY: ran1