Parent Directory | Revision Log
Initial import
1 | guez | 3 | module pressure_m |
2 | |||
3 | use dimens_m, only: iim, jjm, llm | ||
4 | |||
5 | implicit none | ||
6 | |||
7 | real pls(iim + 1, jjm + 1, llm) | ||
8 | ! (pressure at mid-layer of LMDZ grid, in Pa) | ||
9 | ! "pls(i, j, l)" is at longitude "rlonv(i)", latitude "rlatu(j)", | ||
10 | ! for layer "l") | ||
11 | |||
12 | REAL p3d(iim + 1, jjm + 1, llm+1) ! pressure at layer interfaces, in Pa | ||
13 | ! "p3d(i, j, l)" is at longitude "rlonv(i)", latitude "rlatu(j)", | ||
14 | ! for interface "l") | ||
15 | |||
16 | private iim, jjm, llm | ||
17 | |||
18 | end module pressure_m |
ViewVC Help | |
Powered by ViewVC 1.1.21 |