Changeset 3726 for trunk/LMDZ.MARS/libf/phymars/nonoro_gwd_mix_mod.F90

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/nonoro_gwd_mix_mod.F90 (modified) (1 diff)

trunk/LMDZ.MARS/libf/phymars/nonoro_gwd_mix_mod.F90

@@ -36 +36 @@
       use geometry_mod, only: cell_area
       use write_output_mod, only: write_output
-#ifdef CPP_XIOS
-     use xios_output_mod, only: send_xios_field
-#endif      
       
       implicit none
-      include "callkeys.h"
 
       CHARACTER (LEN=20) :: modname='NONORO_GWD_MIX'