29 |
c |
c |
30 |
REAL dtime ! intervalle du temps (s) |
REAL dtime ! intervalle du temps (s) |
31 |
REAL, intent(in):: paprs(klon,klev+1) ! pression a inter-couche |
REAL, intent(in):: paprs(klon,klev+1) ! pression a inter-couche |
32 |
REAL pplay(klon,klev) ! pression au milieu de couche |
REAL, intent(in):: pplay(klon,klev) ! pression au milieu de couche |
33 |
REAL t(klon,klev) ! temperature (K) |
REAL t(klon,klev) ! temperature (K) |
34 |
REAL q(klon,klev) ! humidite specifique (kg/kg) |
REAL q(klon,klev) ! humidite specifique (kg/kg) |
35 |
REAL d_t(klon,klev) ! incrementation de la temperature (K) |
REAL d_t(klon,klev) ! incrementation de la temperature (K) |
96 |
c |
c |
97 |
cAA Variables traceurs: |
cAA Variables traceurs: |
98 |
cAA Provisoire !!! Parametres alpha du lessivage |
cAA Provisoire !!! Parametres alpha du lessivage |
99 |
cAA A priori on a 4 scavenging # possibles |
cAA A priori on a 4 scavenging numbers possibles |
100 |
c |
c |
101 |
REAL a_tr_sca(4) |
REAL a_tr_sca(4) |
102 |
save a_tr_sca |
save a_tr_sca |