Last change
on this file since 23 was
4,
checked in by dumas, 10 years ago
|
initial import GRISLI trunk
|
File size:
942 bytes
|
Line | |
---|
1 | module declare_month_lapsecouche |
---|
2 | |
---|
3 | USE module3D_phy |
---|
4 | |
---|
5 | implicit none |
---|
6 | |
---|
7 | ! 1=decalaration variables |
---|
8 | !------------------------- |
---|
9 | |
---|
10 | integer,parameter :: mois=12 |
---|
11 | integer :: mo |
---|
12 | |
---|
13 | real,dimension(nx,ny,mois+1) :: Tm_surf ! surface temperature |
---|
14 | !(after topo. correction) |
---|
15 | ! 13 mois pour modulo |
---|
16 | |
---|
17 | real,dimension(nx,ny,mois+1) :: Pm_surf ! surface precipitation |
---|
18 | ! (after topo. correction) |
---|
19 | |
---|
20 | real,dimension(nx,ny) :: S0CLIM ! topo de reference du GCM |
---|
21 | real,dimension(nx,ny,mois+1) :: Tm_0 ! surface temperature at S0CLIM mensual (ref) |
---|
22 | real,dimension(nx,ny,mois+1) :: Tsol ! temperature de S0CLIM ramenee au niveau du sol |
---|
23 | |
---|
24 | real,dimension(mois,4) :: lapserate ! le lapserate mensuel suivant 3 tranches d'altitude |
---|
25 | |
---|
26 | |
---|
27 | |
---|
28 | end module declare_month_lapsecouche |
---|
Note: See
TracBrowser
for help on using the repository browser.