Changeset 5144 for LMDZ6/branches/Amaury_dev/libf/phylmd/flott_gwd_rando_m.F90

Timestamp:

Jul 29, 2024, 11:01:04 PM (7 weeks ago)

Author:

abarral

Message:

Put YOMCST.h into modules

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/flott_gwd_rando_m.F90 (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/phylmd/flott_gwd_rando_m.F90

@@ -25 +25 @@
     USE lmdz_clesphys
     USE lmdz_YOEGWD, ONLY: GFRCRIT, GKWAKE, GRCRIT, GVCRIT, GKDRAG, GKLIFT, GHMAX, GRAHILO, GSIGCR, NKTOPG, NSTRA, GSSEC, GTSEC, GVSEC, &
-          GWD_RANDO_RUWMAX, gwd_rando_sat, GWD_FRONT_RUWMAX, gwd_front_sat
+            GWD_RANDO_RUWMAX, gwd_rando_sat, GWD_FRONT_RUWMAX, gwd_front_sat
+    USE lmdz_yomcst
+
+    IMPLICIT NONE
 
     CHARACTER (LEN = 20) :: modname = 'flott_gwd_rando'
     CHARACTER (LEN = 80) :: abort_message
 
-    include "YOMCST.h"
     ! OFFLINE:
     ! include "dimensions.h"