16 |
REAL:: cdmmax = 1.3E-3, cdhmax = 1.1E-3 ! seuils cdrm, cdrh |
REAL:: cdmmax = 1.3E-3, cdhmax = 1.1E-3 ! seuils cdrm, cdrh |
17 |
|
|
18 |
REAL:: ksta = 1.0e-10, ksta_ter = 1.0e-10 |
REAL:: ksta = 1.0e-10, ksta_ter = 1.0e-10 |
19 |
! param\`etres stabilit\'e sur terre et en dehors |
! param\`etres de stabilit\'e sur terre et en dehors |
20 |
|
|
21 |
LOGICAL:: ok_kzmin = .true.! calcul Kzmin dans la couche limite de surface |
LOGICAL:: ok_kzmin = .true.! calcul de Kzmin dans la couche limite de surface |
22 |
INTEGER, save:: ecrit_ins |
INTEGER, save:: ecrit_ins |
23 |
logical:: ok_instan = .false. ! sorties instantanees dans le fichier histins |
logical:: ok_instan = .false. ! sorties instantanees dans le fichier histins |
24 |
|
|