trunk/filtrez/coefils.f

!
! $Header: /home/cvsroot/LMDZ4/libf/filtrez/coefils.h,v 1.1.1.1 2004/05/19 12:53:09 lmdzadmin Exp $
!
      COMMON/coefils/jfiltnu,jfiltsu,jfiltnv,jfiltsv,sddu(iim),sddv(iim)
     * ,unsddu(iim),unsddv(iim),coefilu(iim,jjm),coefilv(iim,jjm),
     * modfrstu(jjm),modfrstv(jjm),eignfnu(iim,iim),eignfnv(iim,iim)
     * ,coefilu2(iim,jjm),coefilv2(iim,jjm)
c
      INTEGER jfiltnu,jfiltsu,jfiltnv,jfiltsv,modfrstu,modfrstv
      REAL    sddu,sddv,unsddu,unsddv,coefilu,coefilv,eignfnu,eignfnv
      REAL    coefilu2,coefilv2
1	guez	3	!
2			! $Header: /home/cvsroot/LMDZ4/libf/filtrez/coefils.h,v 1.1.1.1 2004/05/19 12:53:09 lmdzadmin Exp $
3			!
4			COMMON/coefils/jfiltnu,jfiltsu,jfiltnv,jfiltsv,sddu(iim),sddv(iim)
5			* ,unsddu(iim),unsddv(iim),coefilu(iim,jjm),coefilv(iim,jjm),
6			* modfrstu(jjm),modfrstv(jjm),eignfnu(iim,iim),eignfnv(iim,iim)
7			* ,coefilu2(iim,jjm),coefilv2(iim,jjm)
8			c
9			INTEGER jfiltnu,jfiltsu,jfiltnv,jfiltsv,modfrstu,modfrstv
10			REAL sddu,sddv,unsddu,unsddv,coefilu,coefilv,eignfnu,eignfnv
11			REAL coefilu2,coefilv2