16 |
! Arguments d'entree: |
! Arguments d'entree: |
17 |
REAL, intent(in):: paprs(klon,klev+1) ! pression (Pa) a inter-couche |
REAL, intent(in):: paprs(klon,klev+1) ! pression (Pa) a inter-couche |
18 |
REAL, intent(in):: pplay(klon,klev) ! pression (Pa) au milieu de couche |
REAL, intent(in):: pplay(klon,klev) ! pression (Pa) au milieu de couche |
|
REAL t(klon,klev) ! temperature (K) |
|
|
REAL q(klon,klev) ! humidite specifique (Kg/Kg) |
|
19 |
REAL rain(klon) ! pluie convective (kg/m2/s) |
REAL rain(klon) ! pluie convective (kg/m2/s) |
20 |
REAL snow(klon) ! neige convective (kg/m2/s) |
REAL snow(klon) ! neige convective (kg/m2/s) |
21 |
INTEGER ktop(klon) ! sommet de la convection |
INTEGER ktop(klon) ! sommet de la convection |