/[lmdze]/trunk/filtrez/coefils.f
ViewVC logotype

Diff of /trunk/filtrez/coefils.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 25 by guez, Fri Mar 5 16:43:45 2010 UTC revision 54 by guez, Tue Dec 6 15:07:04 2011 UTC
# Line 1  Line 1 
1  module coefils  module coefils
2    
3    ! 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
4    
5    use dimens_m, only: iim, jjm    use dimens_m, only: iim, jjm
6    
# Line 8  module coefils Line 8  module coefils
8    
9    private iim, jjm    private iim, jjm
10    
11    real sddu(iim),sddv(iim)    real sddu(iim), sddv(iim)
12    real unsddu(iim),unsddv(iim),coefilu(iim,jjm),coefilv(iim,jjm)    real unsddu(iim), unsddv(iim), coefilu(iim, jjm), coefilv(iim, jjm)
13    integer modfrstu(jjm),modfrstv(jjm)    integer modfrstu(jjm), modfrstv(jjm)
14    real eignfnu(iim,iim),eignfnv(iim,iim)    real eignfnu(iim, iim), eignfnv(iim, iim)
15    real coefilu2(iim,jjm),coefilv2(iim,jjm)    real coefilu2(iim, jjm), coefilv2(iim, jjm)
   INTEGER jfiltnu,jfiltsu,jfiltnv,jfiltsv  
16    
17  end module coefils  end module coefils
Legend:
Removed from v.25  
changed lines
  Added in v.54
  ViewVC Help
Powered by ViewVC 1.1.21