source: LMDZ6/branches/cirrus/libf/filtrez/coefils.h @ 5024

Last change on this file since 5024 was 1907, checked in by lguez, 11 years ago

Added a copyright property to every file of the distribution, except
for the fcm files (which have their own copyright). Use svn propget on
a file to see the copyright. For instance:

$ svn propget copyright libf/phylmd/physiq.F90
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

Also added the files defining the CeCILL version 2 license, in French
and English, at the top of the LMDZ tree.

  • 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.