Changeset 5117 for LMDZ6/branches/Amaury_dev/libf/phylmd/cv30param.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/cv30param.h (modified) (1 diff)

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

@@ -10 +10 @@
 !------------------------------------------------------------
 
-      integer noff, minorig, nl, nlp, nlm
-      real sigd, spfac
+      INTEGER noff, minorig, nl, nlp, nlm
+      REAL sigd, spfac
 !IM cf. FH : pour compatibilite avec conema3 TEMPORAIRE   real pbcrit, ptcrit, epmax
-      real pbcrit, ptcrit
-      real omtrain
-      real dtovsh, dpbase, dttrig
-      real dtcrit, tau, beta, alpha
-      real delta
-      real betad
+      REAL pbcrit, ptcrit
+      REAL omtrain
+      REAL dtovsh, dpbase, dttrig
+      REAL dtcrit, tau, beta, alpha
+      REAL delta
+      REAL betad
 
       COMMON /cv30param/  sigd, spfac &