source: trunk/LMDZ.VENUS/libf/phyvenus/clesphys.h @ 2745

Last change on this file since 2745 was 2580, checked in by slebonnois, 3 years ago

SL: Version used for VCD 1.1 (tuneupperatm => key+photochemistry, nirco2abs) add prod and loss from photochem new nonorographic routine (not used for VCD 1.1) update of deftank files

File size: 1.7 KB
Line 
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!
8!..include cles_phys.h
9!
10       LOGICAL cycle_diurne,soil_model
11       LOGICAL ok_orodr,ok_orolf,ok_gw_nonoro
12       LOGICAL ok_kzmin,tuneupperatm
13       LOGICAL callnlte,callnirco2,callthermos
14       LOGICAL ok_cloud, ok_chem, reinit_trac, ok_sedim
15       LOGICAL ok_clmain, physideal, startphy_file
16       INTEGER nbapp_rad, nbapp_chim, iflag_con, iflag_ajs
17       INTEGER lev_histins, lev_histday, lev_histmth
18       INTEGER tr_scheme, cl_scheme
19       INTEGER nircorr, nltemodel, solvarmod
20       INTEGER nb_mode
21       INTEGER solarchoice
22       REAL    ecriphy
23       REAL    z0, lmixmin
24       REAL    ksta, inertie
25       REAL    euveff, fixed_euv_value
26
27       COMMON/clesphys_l/ cycle_diurne, soil_model,                     &
28     &     ok_orodr, ok_orolf, ok_gw_nonoro, ok_kzmin,                  &
29     &     tuneupperatm,callnlte,callnirco2,callthermos,                &
30     &     ok_cloud, ok_chem, reinit_trac, ok_sedim,                    &
31     &     ok_clmain, physideal, startphy_file
32
33       COMMON/clesphys_i/ nbapp_rad, nbapp_chim,                        &
34     &     iflag_con, iflag_ajs,                                        &
35     &     lev_histins, lev_histday, lev_histmth, tr_scheme,            &
36     &     cl_scheme, nircorr, nltemodel, solvarmod, nb_mode,           &
37     &     solarchoice
38
39       COMMON/clesphys_r/ ecriphy, z0, lmixmin,                         &
40     &     ksta, inertie, euveff, fixed_euv_value
41
Note: See TracBrowser for help on using the repository browser.