Changeset 3855 for trunk/LMDZ.MARS/libf/phymars/dyn1d/init_testphys1d_mod.F90

Timestamp:

Jul 17, 2025, 4:54:38 PM (4 weeks ago)

Author:

jbclement

Message:

Mars PCM:
"initracer.F" is transformed into "initracer_mod.F90" (explicit module interface + Fortran 90 format).
JBC

File:

• trunk/LMDZ.MARS/libf/phymars/dyn1d/init_testphys1d_mod.F90 (modified) (1 diff)

trunk/LMDZ.MARS/libf/phymars/dyn1d/init_testphys1d_mod.F90

@@ -45 +45 @@
 use comslope_mod,             only: nslope, subslope_dist, ini_comslope_h, end_comslope_h
 use co2condens_mod,           only: CO2cond_ps
-use callkeys_mod, only: water, photochem, callthermos
-use call_dayperi_mod, only: call_dayperi
+use callkeys_mod,             only: water, photochem, callthermos
+use call_dayperi_mod,         only: call_dayperi
+use initracer_mod,            only: initracer
 ! Mostly for XIOS outputs:
 use mod_const_mpi,            only: COMM_LMDZ