Changeset 5160 for LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_concvl.F90

Timestamp:

Aug 3, 2024, 2:56:58 PM (3 months ago)

Author:

abarral

Message:

Put .h into modules

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_concvl.F90 (modified) (2 diffs)

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

@@ -386 +386 @@
   IF (iflag_con==30) THEN
 
-    ! print *, '-> cv_driver'      !jyg
+    ! PRINT *, '-> cv_driver'      !jyg
     CALL cv_driver(klon, klev, klevp1, ntra, iflag_con, &
             t, q, qs, u, v, tra, &
@@ -398 +398 @@
             wdtrainA, wdtrainM, &                                !RomP
             epmax_diag) ! epmax_cape
-    !           print *, 'cv_driver ->'      !jyg
+    !           PRINT *, 'cv_driver ->'      !jyg
 
     DO i = 1, klon