Changeset 5116 for LMDZ6/branches/Amaury_dev/libf/phydev/comcstphy.F90

Timestamp:

Jul 24, 2024, 2:54:37 PM (2 months ago)

Author:

abarral

Message:

rename modules properly lmdz_*
move ismin, ismax, minmax into new lmdz_libmath.f90
(lint) uppercase fortran keywords

File:

• LMDZ6/branches/Amaury_dev/libf/phydev/comcstphy.F90 (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/phydev/comcstphy.F90

@@ -1 +1 @@
 module comcstphy
   
-  real :: rradius ! planet radius (m)
-  real :: rr      ! recuced gas constant: R/molar mass of atm
-  real :: rg      ! gravity
-  real :: rcpp    ! specific heat of the atmosphere
+  REAL :: rradius ! planet radius (m)
+  REAL :: rr      ! recuced gas constant: R/molar mass of atm
+  REAL :: rg      ! gravity
+  REAL :: rcpp    ! specific heat of the atmosphere
 
 end module comcstphy