source: LMDZ6/branches/Amaury_dev/libf/filtrez/parafilt.h_192x142x29 @ 5105

Last change on this file since 5105 was 5099, checked in by abarral, 4 months ago

Replace most uses of CPP_DUST by the corresponding logical defined in lmdz_cppkeys_wrapper.F90
Convert several files from .F to .f90 to allow Dust to compile w/o rrtm/ecrad
Create lmdz_yoerad.f90
(lint) Remove "!" on otherwise empty line
  • 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: 1.5 KB
Line 
1
2! $Header$
3
4        INTEGER nfilun, nfilus, nfilvn, nfilvs
5c
6c 48 32 19 non-zoom:
7c       PARAMETER (nfilun=30,nfilus=30,nfilvn=30,nfilvs=30)
8c        PARAMETER (nfilun=6, nfilus=5, nfilvn=5, nfilvs=5)
9c        PARAMETER (nfilun=15, nfilus=8, nfilvn=14, nfilvs=8)
10c        PARAMETER (nfilun=24, nfilus=23, nfilvn=24, nfilvs=24)
11cmaf -debug  PARAMETER (nfilun=2, nfilus=1, nfilvn=2, nfilvs=2)
12c
13c
14c 96 49 11 non-zoom:
15ccc      PARAMETER (nfilun=9, nfilus=8, nfilvn=8, nfilvs=8)
16c
17c
18c 144 73 11 non-zoom:
19ccc      PARAMETER (nfilun=13, nfilus=12, nfilvn=12, nfilvs=12)
20c
21c 192 143 19 non-zoom:
22c             PARAMETER (nfilun=13, nfilus=12, nfilvn=13, nfilvs=13)
23c      PARAMETER (nfilun=15, nfilus=14, nfilvn=14, nfilvs=14) !!NO fxyhyper
24c      PARAMETER (nfilun=18, nfilus=17, nfilvn=17, nfilvs=17) !!NO fxyhyper
25c       PARAMETER (nfilun=30,nfilus=30,nfilvn=30,nfilvs=30)
26
27c 96 72 19 non-zoom:
28c     PARAMETER (nfilun=12, nfilus=11, nfilvn=12, nfilvs=12)
29c 192 142 29 non-zoom:
30      PARAMETER (nfilun=24, nfilus=23, nfilvn=24, nfilvs=24)
31c
32c        PARAMETER ( nfilun=20, nfilus=20, nfilvn=20, nfilvs=20 )
33c        PARAMETER ( nfilun=8, nfilus=7, nfilvn=7, nfilvs=7 )
34c
35c
36c      Ici , on a exagere  les nombres de lignes de latitudes a filtrer .
37c
38c      La premiere fois que  le Gcm  rentrera  dans le Filtre ,
39c
40c      il indiquera  les bonnes valeurs  de  nfilun , nflius, nfilvn  et
41c
42c      nfilvs  a  mettre .  Il suffira alors de changer ces valeurs dans
43c
44c      Parameter  ci-dessus  et de relancer  le  run . 
45
Note: See TracBrowser for help on using the repository browser.