Changeset 5119 for LMDZ6/branches/Amaury_dev/libf/phylmd/Ocean_skin/esat_m.F90

Timestamp:

Jul 24, 2024, 6:46:45 PM (4 months ago)

Author:

abarral

Message:

enforce PRIVATE by default in several modules, expose PUBLIC as needed
move eigen.f90 to obsolete/
(lint) aslong the way

File:

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

LMDZ6/branches/Amaury_dev/libf/phylmd/Ocean_skin/esat_m.F90

@@ -3 +3 @@
   IMPLICIT NONE
 
-contains
+CONTAINS
 
   elemental real function esat(T, P)
@@ -20 +20 @@
   END FUNCTION esat
 
-end module esat_m
+END MODULE esat_m