245 |
REAL diafra(klon, llm) ! fraction nuageuse |
REAL diafra(klon, llm) ! fraction nuageuse |
246 |
REAL cldliq(klon, llm) ! eau liquide nuageuse |
REAL cldliq(klon, llm) ! eau liquide nuageuse |
247 |
REAL cldfra(klon, llm) ! fraction nuageuse |
REAL cldfra(klon, llm) ! fraction nuageuse |
248 |
REAL cldtau(klon, llm) ! epaisseur optique |
REAL cldtau(klon, llm) ! \'epaisseur optique |
249 |
REAL cldemi(klon, llm) ! emissivite infrarouge |
REAL cldemi(klon, llm) ! \'emissivit\'e infrarouge |
250 |
|
|
251 |
REAL flux_q(klon, nbsrf) ! flux turbulent d'humidite à la surface |
REAL flux_q(klon, nbsrf) ! flux turbulent d'humidite à la surface |
252 |
|
|
349 |
real ratqss(klon, llm), ratqsc(klon, llm) |
real ratqss(klon, llm), ratqsc(klon, llm) |
350 |
real:: ratqsbas = 0.01, ratqshaut = 0.3 |
real:: ratqsbas = 0.01, ratqshaut = 0.3 |
351 |
|
|
352 |
! Parametres lies au nouveau schema de nuages (SB, PDF) |
! Param\`etres li\'es au nouveau sch\'ema de nuages : |
353 |
real:: fact_cldcon = 0.375 |
real:: fact_cldcon = 0.375 |
354 |
real:: facttemps = 1.e-4 |
real:: facttemps = 1.e-4 |
355 |
logical:: ok_newmicro = .true. |
logical:: ok_newmicro = .true. |