Changeset 1310 for trunk/LMDZ.VENUS/libf/phyvenus/clesphys.h

Timestamp:

Jul 10, 2014, 5:59:16 PM (10 years ago)

Author:

slebonnois

Message:

SL: VENUS VERTICAL EXTENSION. NLTE and thermospheric processes, to be run with 78 levels and specific inputs.

File:

• trunk/LMDZ.VENUS/libf/phyvenus/clesphys.h (modified) (2 diffs)

trunk/LMDZ.VENUS/libf/phyvenus/clesphys.h

@@ -1 +1 @@
 !
 !  ATTENTION!!!!: ce fichier include est compatible format fixe/format libre
-!                 veillez  n'utiliser que des ! pour les commentaires
+!                 veillez  n utiliser que des ! pour les commentaires
 !                 et  bien positionner les & des lignes de continuation
 !                 (les placer en colonne 6 et en colonne 73)
@@ -11 +11 @@
        LOGICAL ok_orodr,ok_orolf,ok_gw_nonoro
        LOGICAL ok_kzmin
+       LOGICAL callnlte,callnirco2,callthermos
        LOGICAL ok_cloud, ok_chem, reinit_trac, ok_sedim
        INTEGER nbapp_rad, nbapp_chim, iflag_con, iflag_ajs
        INTEGER lev_histins, lev_histday, lev_histmth
        INTEGER tr_scheme
+       INTEGER nircorr, nltemodel, solvarmod
        REAL    ecriphy
        REAL    solaire
        REAL    z0, lmixmin
        REAL    ksta, inertie
+       REAL    euveff, solarcondate
 
        COMMON/clesphys_l/ cycle_diurne, soil_model,                     &
      &     ok_orodr, ok_orolf, ok_gw_nonoro, ok_kzmin,                  &
+     &     callnlte,callnirco2,callthermos,                             &
      &     ok_cloud, ok_chem, reinit_trac, ok_sedim
 
        COMMON/clesphys_i/ nbapp_rad, nbapp_chim,                        &
      &     iflag_con, iflag_ajs,                                        &
-     &     lev_histins, lev_histday, lev_histmth, tr_scheme
+     &     lev_histins, lev_histday, lev_histmth, tr_scheme,            &
+     &     nircorr, nltemodel, solvarmod
 
        COMMON/clesphys_r/ ecriphy, solaire, z0, lmixmin,                &
-     &     ksta, inertie
+     &     ksta, inertie, euveff, solarcondate