| [3] | 1 | ! |
|---|
| [97] | 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) |
|---|
| [3] | 6 | ! |
|---|
| [97] | 7 | ! |
|---|
| 8 | !..include cles_phys.h |
|---|
| 9 | ! |
|---|
| 10 | LOGICAL cycle_diurne,soil_model |
|---|
| [3] | 11 | LOGICAL ok_orodr,ok_orolf,ok_gw_nonoro |
|---|
| [1160] | 12 | LOGICAL ok_kzmin |
|---|
| [1305] | 13 | LOGICAL ok_cloud, ok_chem, reinit_trac, ok_sedim |
|---|
| [97] | 14 | INTEGER nbapp_rad, nbapp_chim, iflag_con, iflag_ajs |
|---|
| [1305] | 15 | INTEGER lev_histins, lev_histday, lev_histmth |
|---|
| [1160] | 16 | INTEGER tr_scheme |
|---|
| [1120] | 17 | REAL ecriphy |
|---|
| [3] | 18 | REAL solaire |
|---|
| [97] | 19 | REAL z0, lmixmin |
|---|
| 20 | REAL ksta, inertie |
|---|
| [3] | 21 | |
|---|
| [1305] | 22 | COMMON/clesphys_l/ cycle_diurne, soil_model, & |
|---|
| 23 | & ok_orodr, ok_orolf, ok_gw_nonoro, ok_kzmin, & |
|---|
| 24 | & ok_cloud, ok_chem, reinit_trac, ok_sedim |
|---|
| [3] | 25 | |
|---|
| [1305] | 26 | COMMON/clesphys_i/ nbapp_rad, nbapp_chim, & |
|---|
| [1160] | 27 | & iflag_con, iflag_ajs, & |
|---|
| [1305] | 28 | & lev_histins, lev_histday, lev_histmth, tr_scheme |
|---|
| [1160] | 29 | |
|---|
| [1305] | 30 | COMMON/clesphys_r/ ecriphy, solaire, z0, lmixmin, & |
|---|
| [1160] | 31 | & ksta, inertie |
|---|
| 32 | |
|---|
