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

Diff of /trunk/filtrez/coefils.f

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

trunk/libf/filtrez/coefils.f90 revision 25 by guez, Fri Mar 5 16:43:45 2010 UTC trunk/filtrez/coefils.f revision 82 by guez, Wed Mar 5 14:57:53 2014 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.82
  ViewVC Help
Powered by ViewVC 1.1.21