63 |
REAL, INTENT(IN):: play(klon, klev) ! pression au milieu de couche (Pa) |
REAL, INTENT(IN):: play(klon, klev) ! pression au milieu de couche (Pa) |
64 |
|
|
65 |
REAL, INTENT(inout):: fsnow(:, :) ! (klon, nbsrf) |
REAL, INTENT(inout):: fsnow(:, :) ! (klon, nbsrf) |
66 |
! column-density of mass of snow, in kg m-2 |
! column-density of mass of snow at the surface, in kg m-2 |
67 |
|
|
68 |
REAL, INTENT(inout):: fqsurf(klon, nbsrf) |
REAL, INTENT(inout):: fqsurf(klon, nbsrf) |
69 |
REAL, intent(inout):: falbe(klon, nbsrf) |
REAL, intent(inout):: falbe(klon, nbsrf) |
161 |
REAL yts(klon), ypctsrf(klon), yz0_new(klon) |
REAL yts(klon), ypctsrf(klon), yz0_new(klon) |
162 |
real yrugos(klon) ! longueur de rugosite (en m) |
real yrugos(klon) ! longueur de rugosite (en m) |
163 |
REAL yalb(klon) |
REAL yalb(klon) |
164 |
REAL snow(klon) ! column-density of mass of snow, in kg m-2 |
REAL snow(klon) ! column-density of mass of snow at the surface, in kg m-2 |
165 |
real yqsurf(klon), yagesno(klon) |
real yqsurf(klon), yagesno(klon) |
166 |
real yqsol(klon) ! column-density of water in soil, in kg m-2 |
real yqsol(klon) ! column-density of water in soil, in kg m-2 |
167 |
REAL yrain_fall(klon) ! liquid water mass flux (kg / m2 / s), positive down |
REAL yrain_fall(klon) ! liquid water mass flux (kg / m2 / s), positive down |