--- trunk/filtrez/filtreg_hemisph.f	2018/03/19 10:28:42	264
+++ trunk/filtrez/filtreg_hemisph.f	2018/03/20 09:35:59	265
@@ -6,7 +6,7 @@
 
   subroutine filtreg_hemisph(champ, sdd, matri)
 
-    USE dimens_m, ONLY: iim
+    USE dimensions, ONLY: iim
 
     REAL, intent(inout):: champ(:, :, :) ! (iim + 1, :, :)
     REAL, intent(in):: sdd(:) ! (iim) xprim[uv]^{\pm 1/2}