Changeset 5101 for LMDZ6/branches/Amaury_dev/libf/filtrez

Timestamp:

Jul 23, 2024, 8:22:55 AM (2 months ago)

Author:

abarral

Message:

Handle DEBUG_IO in lmdz_cppkeys_wrapper.F90
Transform some files .F -> .[fF]90
[ne compile pas à cause de writefield_u non défini - en attente de réponse Laurent]

Location:

LMDZ6/branches/Amaury_dev/libf/filtrez

Files:

• filtreg_mod.F90 (modified) (1 diff)
• mod_filtre_fft.F90 (modified) (3 diffs)
• mod_filtre_fft_loc.F90 (modified) (3 diffs)

LMDZ6/branches/Amaury_dev/libf/filtrez/filtreg_mod.F90

@@ -11 +11 @@
   SUBROUTINE inifilr
 #ifdef CPP_PARA
-  USE mod_filtre_fft, ONLY : use_filtre_fft,Init_filtre_fft
-  USE mod_filtre_fft_loc, ONLY : Init_filtre_fft_loc=>Init_filtre_fft    !
+  USE mod_filtre_fft, ONLY: use_filtre_fft,Init_filtre_fft
+  USE mod_filtre_fft_loc, ONLY: Init_filtre_fft_loc=>Init_filtre_fft    !
 #endif
   USE serre_mod, ONLY: alphax

LMDZ6/branches/Amaury_dev/libf/filtrez/mod_filtre_fft.F90

@@ -117 +117 @@
     USE mod_fft
 #ifdef CPP_PARA
-    USE parallel_lmdz,ONLY : OMP_CHUNK
+    USE parallel_lmdz,ONLY: OMP_CHUNK
 #endif
     IMPLICIT NONE
@@ -178 +178 @@
     USE mod_fft
 #ifdef CPP_PARA
-    USE parallel_lmdz,ONLY : OMP_CHUNK
+    USE parallel_lmdz,ONLY: OMP_CHUNK
 #endif
     IMPLICIT NONE
@@ -240 +240 @@
     USE mod_fft
 #ifdef CPP_PARA
-    USE parallel_lmdz,ONLY : OMP_CHUNK
+    USE parallel_lmdz,ONLY: OMP_CHUNK
 #endif
     IMPLICIT NONE

LMDZ6/branches/Amaury_dev/libf/filtrez/mod_filtre_fft_loc.F90

@@ -107 +107 @@
     USE mod_fft
 #ifdef CPP_PARA
-    USE parallel_lmdz,ONLY : OMP_CHUNK
+    USE parallel_lmdz,ONLY: OMP_CHUNK
 #endif
     IMPLICIT NONE
@@ -187 +187 @@
     USE mod_fft
 #ifdef CPP_PARA
-    USE parallel_lmdz,ONLY : OMP_CHUNK
+    USE parallel_lmdz,ONLY: OMP_CHUNK
 #endif
     IMPLICIT NONE
@@ -250 +250 @@
     USE mod_fft
 #ifdef CPP_PARA
-    USE parallel_lmdz,ONLY : OMP_CHUNK
+    USE parallel_lmdz,ONLY: OMP_CHUNK
 #endif
     IMPLICIT NONE