Changeset 5116 for LMDZ6/branches/Amaury_dev/libf/filtrez/eigen.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/filtrez/eigen.f90 (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/filtrez/eigen.f90

@@ -4 +4 @@
   IMPLICIT NONE
   INCLUDE "dimensions.h"
-  real :: e( iim,iim ), d( iim )
-  real :: asm( iim )
-  integer :: im,i,j
+  REAL :: e( iim,iim ), d( iim )
+  REAL :: asm( iim )
+  INTEGER :: im,i,j
   im=iim
   !