Changeset 3726 for trunk/LMDZ.MARS/libf/phymars/dyn1d/testphys1d.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/dyn1d/testphys1d.F90 (modified) (2 diffs)

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

@@ -22 +22 @@
 use parallel_lmdz,       only: init_parallel
 use version_info_mod,    only: print_version_info
+use callkeys_mod, only: water
 
 implicit none
@@ -46 +47 @@
 
 include "dimensions.h"
-!#include "dimradmars.h"
-!#include "comgeomfi.h"
-!#include "surfdat.h"
-!#include "slope.h"
-!#include "comsoil.h"
-!#include "comdiurn.h"
-include "callkeys.h"
-!#include "comsaison.h"
-!#include "control.h"
-include "netcdf.inc"
-!#include "advtrac.h"
 
 !--------------------------------------------------------------