Changeset 5117 for LMDZ6/branches/Amaury_dev/libf/phylmd/thermcell_old.h

Timestamp:

Jul 24, 2024, 4:23:34 PM (4 months ago)

Author:

abarral

Message:

rename modules properly lmdz_*
move some unused files to obsolete/
(lint) uppercase fortran keywords

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/thermcell_old.h (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/phylmd/thermcell_old.h

@@ -1 +1 @@
 
-      real,parameter     :: r_aspect_thermals=2.
-      real,parameter     :: l_mix_thermals=30.
-      integer,parameter  :: w2di_thermals=0
+      REAL,parameter     :: r_aspect_thermals=2.
+      REAL,parameter     :: l_mix_thermals=30.
+      INTEGER,parameter  :: w2di_thermals=0