Parent Directory | Revision Log | Patch
revision 15 by guez, Fri Aug 1 15:24:12 2008 UTC | revision 34 by guez, Wed Jun 2 11:01:12 2010 UTC | |
---|---|---|
# | Line 16 module dimphy | Line 16 module dimphy |
16 | ||
17 | INTEGER, PARAMETER:: KLEV = llm | INTEGER, PARAMETER:: KLEV = llm |
18 | ||
19 | INTEGER, PARAMETER:: nbtr = nqmx - 2 + 1 / (nqmx-1) | INTEGER, PARAMETER:: nbtr = max(1, nqmx - 2) |
20 | ! (nombre de vrais traceurs) | ! (nombre de vrais traceurs) |
21 | ||
22 | REAL,save:: zmasq(KLON) ! fraction of land | REAL,save:: zmasq(KLON) ! fraction of land |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |