Changeset 3726 for trunk/LMDZ.MARS/libf/aeronomars/thermosphere.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/aeronomars/thermosphere.F (modified) (1 diff)

trunk/LMDZ.MARS/libf/aeronomars/thermosphere.F

@@ -24 +24 @@
       USE comcstfi_h, only: r, cpp
       use mod_phys_lmdz_para, only : is_master
+      use callkeys_mod, only: calleuv, callconduct, callmoldiff
+      use callkeys_mod, only: callmolvis
       implicit none
-
-      include "callkeys.h"
 
       integer,intent(in) :: ngrid ! number of atmospheric columns