--- trunk/libf/filtrez/coefils.f90	2010/03/05 16:43:45	25
+++ trunk/filtrez/coefils.f90	2013/11/15 18:45:49	76
@@ -1,6 +1,6 @@
 module coefils
 
-  ! From filtrez/coefils.h,v 1.1.1.1 2004/05/19 12:53:09
+  ! From filtrez/coefils.h, v 1.1.1.1 2004/05/19 12:53:09
 
   use dimens_m, only: iim, jjm
 
@@ -8,11 +8,10 @@
 
   private iim, jjm
 
-  real sddu(iim),sddv(iim)
-  real unsddu(iim),unsddv(iim),coefilu(iim,jjm),coefilv(iim,jjm)
-  integer modfrstu(jjm),modfrstv(jjm)
-  real eignfnu(iim,iim),eignfnv(iim,iim)
-  real coefilu2(iim,jjm),coefilv2(iim,jjm)
-  INTEGER jfiltnu,jfiltsu,jfiltnv,jfiltsv
+  real sddu(iim), sddv(iim)
+  real unsddu(iim), unsddv(iim), coefilu(iim, jjm), coefilv(iim, jjm)
+  integer modfrstu(jjm), modfrstv(jjm)
+  real eignfnu(iim, iim), eignfnv(iim, iim)
+  real coefilu2(iim, jjm), coefilv2(iim, jjm)
 
 end module coefils