Changeset 5144 for LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_conema3.f90

Timestamp:

Jul 29, 2024, 11:01:04 PM (3 months ago)

Author:

abarral

Message:

Put YOMCST.h into modules

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_conema3.f90 (modified) (2 diffs)

LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_conema3.f90

@@ -27 +27 @@
     USE dimphy
     USE infotrac_phy, ONLY: nbtr
-    USE lmdz_YOETHF
+    USE lmdz_yoethf
     USE lmdz_fcttre, ONLY: foeew, foede, qsats, qsatl, dqsats, dqsatl, thermcep
+    USE lmdz_yomcst
 
     IMPLICIT NONE
@@ -191 +192 @@
     REAL ftadj(klon, klev), fqadj(klon, klev)
 
-    ! sb --
-
-    ! cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc
-
-    include "YOMCST.h"
-
     IF (first) THEN