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

Timestamp:

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

Author:

emillour

Message:

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

File:

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

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

@@ -29 +29 @@
      &            iaer_stormdust_doubleq,iaer_topdust_doubleq 
        use dust_param_mod, only: doubleq, active
+       use callkeys_mod, only: water, activice, microphys
+       use callkeys_mod, only: rdstorm, topflows
+       use callkeys_mod, only: co2clouds, activeco2ice, co2useh2o
        IMPLICIT NONE
 c=======================================================================
@@ -51 +54 @@
 c    -------------
 c
-      include "callkeys.h"
 
 c-----------------------------------------------------------------------