Index: LMDZ6/trunk/libf/filtrez/parafilt.h
===================================================================
--- LMDZ6/trunk/libf/filtrez/parafilt.h	(revision 5314)
+++ 	(revision )
@@ -1,4 +1,0 @@
-!
-! $Header$
-!
-        INTEGER nfilun, nfilus, nfilvn, nfilvs
Index: LMDZ6/trunk/libf/obsolete/parafilt.h
===================================================================
--- LMDZ6/trunk/libf/obsolete/parafilt.h	(revision 5315)
+++ LMDZ6/trunk/libf/obsolete/parafilt.h	(revision 5315)
@@ -0,0 +1,4 @@
+!
+! $Header$
+!
+        INTEGER nfilun, nfilus, nfilvn, nfilvs
Index: LMDZ6/trunk/libf/phylmd/physiq_mod.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/physiq_mod.F90	(revision 5314)
+++ LMDZ6/trunk/libf/phylmd/physiq_mod.F90	(revision 5315)
@@ -367,4 +367,5 @@
        USE radepsi_mod_h
        USE radopt_mod_h
+       USE regdim_mod_h
     IMPLICIT NONE
     !>======================================================================
@@ -418,5 +419,4 @@
     !  parameter (iip1=iim+1)
 
-    include "regdim.h"
     !======================================================================
     LOGICAL, SAVE :: ok_volcan ! pour activer les diagnostics volcaniques
Index: LMDZ6/trunk/libf/phylmd/regdim.h
===================================================================
--- LMDZ6/trunk/libf/phylmd/regdim.h	(revision 5314)
+++ 	(revision )
@@ -1,17 +1,0 @@
-!
-! $Header$
-!
-!     Valid and equivalent for either free source form or fixed source form
-      INTEGER i1_deb, i1_fin
-      INTEGER i2_deb, i2_fin
-!cc      PARAMETER (i1_deb=21, i1_fin=40)
-!cc      PARAMETER (i2_deb=41, i2_fin=44)
-!ccc      PARAMETER (i1_deb=47, i1_fin=77)
-!ccc      PARAMETER (i2_deb=78, i2_fin=79)
-      PARAMETER (i1_deb=16, i1_fin=30)
-      PARAMETER (i2_deb=31, i2_fin=33)
-!
-      INTEGER j_deb, j_fin
-!cc      PARAMETER (j_deb=29, j_fin=61)
-!ccc      PARAMETER (j_deb=21, j_fin=51)
-      PARAMETER (j_deb=18, j_fin=39)
Index: LMDZ6/trunk/libf/phylmd/regdim_mod_h.f90
===================================================================
--- LMDZ6/trunk/libf/phylmd/regdim_mod_h.f90	(revision 5315)
+++ LMDZ6/trunk/libf/phylmd/regdim_mod_h.f90	(revision 5315)
@@ -0,0 +1,14 @@
+MODULE regdim_mod_h
+  IMPLICIT NONE; PRIVATE
+  PUBLIC i1_deb, i1_fin, i2_deb, i2_fin, j_deb, j_fin
+
+  INTEGER i1_deb, i1_fin
+  INTEGER i2_deb, i2_fin
+
+  PARAMETER (i1_deb = 16, i1_fin = 30)
+  PARAMETER (i2_deb = 31, i2_fin = 33)
+
+  INTEGER j_deb, j_fin
+
+  PARAMETER (j_deb = 18, j_fin = 39)
+END MODULE regdim_mod_h
Index: LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90
===================================================================
--- LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90	(revision 5314)
+++ LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90	(revision 5315)
@@ -440,4 +440,5 @@
     USE radepsi_mod_h
     USE radopt_mod_h
+    USE regdim_mod_h
     IMPLICIT NONE
     !>======================================================================
@@ -491,5 +492,4 @@
     !  parameter (iip1=iim+1)
 
-    include "regdim.h"
     !======================================================================
     LOGICAL, SAVE :: ok_volcan ! pour activer les diagnostics volcaniques
Index: LMDZ6/trunk/libf/phylmdiso/regdim.h
===================================================================
--- LMDZ6/trunk/libf/phylmdiso/regdim.h	(revision 5314)
+++ 	(revision )
@@ -1,1 +1,0 @@
-link ../phylmd/regdim.h
Index: LMDZ6/trunk/libf/phylmdiso/regdim_mod_h.f90
===================================================================
--- LMDZ6/trunk/libf/phylmdiso/regdim_mod_h.f90	(revision 5315)
+++ LMDZ6/trunk/libf/phylmdiso/regdim_mod_h.f90	(revision 5315)
@@ -0,0 +1,1 @@
+link ../phylmd/regdim_mod_h.f90
