| 1 | ! |
|---|
| 2 | ! ATTENTION!!!!: ce fichier include est compatible format fixe/format libre |
|---|
| 3 | ! veillez n'utiliser que des ! pour les commentaires |
|---|
| 4 | ! et bien positionner les & des lignes de continuation |
|---|
| 5 | ! (les placer en colonne 6 et en colonne 73) |
|---|
| 6 | ! |
|---|
| 7 | !..include cles_phys.h |
|---|
| 8 | ! |
|---|
| 9 | LOGICAL cycle_diurne,soil_model,ok_orodr,ok_orolf |
|---|
| 10 | LOGICAL ok_orodr,ok_orolf,ok_gw_nonoro |
|---|
| 11 | INTEGER nbapp_rad, nbapp_chim, iflag_con, iflag_ajs |
|---|
| 12 | REAL ecritphy |
|---|
| 13 | REAL solaire |
|---|
| 14 | REAL z0, lmixmin |
|---|
| 15 | REAL ksta, inertie |
|---|
| 16 | LOGICAL ok_kzmin |
|---|
| 17 | INTEGER lev_histmth, lev_histday |
|---|
| 18 | logical chimi,ylellouch,hcnrad |
|---|
| 19 | integer vchim,aerprod,htoh2 |
|---|
| 20 | integer microfi,cutoff |
|---|
| 21 | real tx,tcorrect |
|---|
| 22 | |
|---|
| 23 | |
|---|
| 24 | COMMON/clesphys/cycle_diurne, soil_model, & |
|---|
| 25 | & ok_orodr, ok_orolf, ok_gw_nonoro, nbapp_rad, nbapp_chim & |
|---|
| 26 | & , ecritphy & |
|---|
| 27 | & , iflag_con, iflag_ajs, solaire, z0, lmixmin, ksta & |
|---|
| 28 | & , ok_kzmin, lev_histmth, lev_histday & |
|---|
| 29 | & , inertie, chimi,vchim,aerprod,htoh2,ylellouch,hcnrad & |
|---|
| 30 | & , microfi,cutoff,tx,tcorrect |
|---|
| 31 | |
|---|