Parent Directory | Revision Log
Move Sources/* to root directory.
1 | module dimphy |
2 | |
3 | use dimens_m, only: iim, jjm, llm |
4 | |
5 | implicit none |
6 | |
7 | private iim, jjm, llm |
8 | |
9 | INTEGER, PARAMETER:: klon = iim * (jjm - 1) + 2 |
10 | ! (number of distinct scalar grid points) |
11 | ! (Les points de la physique sont les points scalaires de la dynamique. |
12 | ! Numerotation : |
13 | ! 1 pour le pole nord |
14 | ! (jjm - 1) * iim pour l'interieur du domaine |
15 | ! klon pour le pole sud) |
16 | |
17 | INTEGER, PARAMETER:: KLEV = llm |
18 | REAL, save:: zmasq(KLON) ! fraction of land |
19 | |
20 | end module dimphy |
ViewVC Help | |
Powered by ViewVC 1.1.21 |