Changeset 3726 for trunk/LMDZ.MARS/libf/phymars/physiq_mod.F

Timestamp:

Apr 17, 2025, 9:45:14 AM (2 months ago)

Author:

emillour

Message:

Mars PCM:
Turn "callkeys.h" into module "callkeys_mod.F90"
EM

File:

• trunk/LMDZ.MARS/libf/phymars/physiq_mod.F (modified) (2 diffs)

trunk/LMDZ.MARS/libf/phymars/physiq_mod.F

@@ -128 +128 @@
       use lmdz_atke_turbulence_ini, only : atke_ini
       use waterice_tifeedback_mod, only : waterice_tifeedback
+      use callkeys_mod, only: calladj, calltherm, callatke, calldifv
+      use callkeys_mod, only: callrichsl, tke_heat_flux
+      use callkeys_mod, only: calllott, calllott_nonoro, calleofdump
+      use callkeys_mod, only: callrad, callnlte, callnirco2, nircorr
+      use callkeys_mod, only: diurnal, season, iradia, nltemodel
+      use callkeys_mod, only: water, activice, microphys, CLFvarying
+      use callkeys_mod, only: hdo, co2clouds, co2useh2o, meteo_flux
+      use callkeys_mod, only: callsoil, callslope, callcond
+      use callkeys_mod, only: tituscap, surfaceice_tifeedback
+      use callkeys_mod, only: refill_watercap, poreice_tifeedback
+      use callkeys_mod, only: cst_cap_albedo
+      use callkeys_mod, only: rdstorm, dustinjection
+      use callkeys_mod, only: topflows, dustiropacity
+      use callkeys_mod, only: sedimentation, scavenging
+      use callkeys_mod, only: photochem, callthermos
+      use callkeys_mod, only: startphy_file
+
       IMPLICIT NONE
 c=======================================================================
@@ -229 +246 @@
 c    ------------------
 
-      include "callkeys.h"
       include "netcdf.inc"