source: LMDZ5/branches/testing/libf/filtrez/coefils.h

Last change on this file was 1910, checked in by Laurent Fairhead, 11 years ago

Merged trunk changes r1860:1909 into testing branch

  • Property copyright set to
    Name of program: LMDZ
    Creation date: 1984
    Version: LMDZ5
    License: CeCILL version 2
    Holder: Laboratoire de m\'et\'eorologie dynamique, CNRS, UMR 8539
    See the license file in the root directory
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 839 bytes
Line 
1!
2! $Id $
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 ! index of the last lat line filtered in NH (U grid)
10      INTEGER jfiltsu ! index of the first lat line filtered in SH (U grid)
11      INTEGER jfiltnv ! index of the last lat line filtered in NH (V grid)
12      INTEGER jfiltsv ! index of the first lat line filtered in SH (V grid)
13      INTEGER modfrstu ! number of retained (ie: unfiltered) modes on U grid
14      INTEGER modfrstv ! number of retained (ie: unfiltered) modes on V grid
15      REAL    sddu,sddv,unsddu,unsddv,coefilu,coefilv,eignfnu,eignfnv
16      REAL    coefilu2,coefilv2
Note: See TracBrowser for help on using the repository browser.