Changeset 5116 for LMDZ6/branches/Amaury_dev/libf/phylmdiso/cv3a_uncompress.F90

Timestamp:

Jul 24, 2024, 2:54:37 PM (4 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/phylmdiso/cv3a_uncompress.F90 (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/phylmdiso/cv3a_uncompress.F90

@@ -209 +209 @@
 !>jyg
 #ifdef ISOVERIF
-        write(*,*) 'cv3a_uncompress 151: entrée dans cv3a_uncompress'
+        WRITE(*,*) 'cv3a_uncompress 151: entrée dans cv3a_uncompress'
 #endif
     DO i = 1, ncum