Changeset 2598 for LMDZ5/trunk/libf/filtrez/filtreg_mod.F90

Timestamp:

Jul 22, 2016, 11:28:39 AM (8 years ago)

Author:

Ehouarn Millour

Message:

Cleanup in the dynamics: turn serre.h into module serre_mod.F90
EM

File:

• LMDZ5/trunk/libf/filtrez/filtreg_mod.F90 (modified) (2 diffs)

LMDZ5/trunk/libf/filtrez/filtreg_mod.F90

@@ -14 +14 @@
   USE mod_filtre_fft_loc, ONLY : Init_filtre_fft_loc=>Init_filtre_fft    !
 #endif
+  USE serre_mod, ONLY: alphax
     !    ... H. Upadhyaya, O.Sharma   ...
     !
@@ -22 +23 @@
     !     Correction  le 28/10/97    P. Le Van .
     !  -------------------------------------------------------------------
-#include "dimensions.h"
-#include "paramet.h"
+    include "dimensions.h"
+    include "paramet.h"
     !  -------------------------------------------------------------------
-#include "comgeom.h"
-#include "coefils.h"
-#include "logic.h"
-#include "serre.h"
+    include "comgeom.h"
+    include "coefils.h"
+    include "logic.h"
 
     REAL  dlonu(iim),dlatu(jjm)