Changeset 97 for trunk/libf/phytitan/clesphys.h

Timestamp:

Mar 22, 2011, 5:25:44 PM (14 years ago)

Author:

slebonnois

Message:

Serie de modifs SL pour homogeneisation des phytitan et phyvenus
Ca touche aussi aux liens phy/dyn (surtout a propos de clesphy0),
a verifier avec les autres, donc...

File:

• trunk/libf/phytitan/clesphys.h (modified) (1 diff)

trunk/libf/phytitan/clesphys.h

@@ -1 +1 @@
 !
-! $Header: /home/cvsroot/LMDZ4/libf/phylmd/clesphys.h,v 1.1.1.1 2004/05/19 12:53:08 lmdzadmin Exp $
+!  ATTENTION!!!!: ce fichier include est compatible format fixe/format libre
+!                 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)
 !
-c..include cles_phys.h
-c
-       LOGICAL cycle_diurne,soil_model,new_oliq,ok_orodr,ok_orolf 
-       LOGICAL ok_limitvrai
+!..include cles_phys.h
+!
+       LOGICAL cycle_diurne,soil_model,ok_orodr,ok_orolf 
+       LOGICAL ok_orodr,ok_orolf,ok_gw_nonoro
        INTEGER nbapp_rad, nbapp_chim, iflag_con, iflag_ajs
+       REAL    ecritphy
        REAL    solaire
-
-c Parametres pour PBL:
-       real z0,lmixmin
-       REAL ksta
+       REAL    z0, lmixmin
+       REAL    ksta, inertie
        LOGICAL ok_kzmin
-
-c Parametres Chimie:
+       INTEGER lev_histmth, lev_histday
        logical chimi,ylellouch,hcnrad
        integer vchim,aerprod,htoh2
-       
-c Parametres Microphysique:
        integer microfi,cutoff
-       real tx,tcorrect
-       
-c surface
-       real inertie
+       real    tx,tcorrect
 
-cIM lev_histmth : niveau sorties mensuelles
-cIM lev_histday : niveau sorties journalieres
-       INTEGER lev_histmth, lev_histday
 
-       COMMON/clesphys/cycle_diurne, soil_model, new_oliq,
-     ,     ok_orodr, ok_orolf, ok_limitvrai, nbapp_rad, nbapp_chim
-     ,     , iflag_con, iflag_ajs, solaire, z0, lmixmin, ksta
-     ,     , ok_kzmin, lev_histmth, lev_histday
-     ,     , inertie, chimi,vchim,aerprod,htoh2,ylellouch,hcnrad
-     ,     , microfi,cutoff,tx,tcorrect
+       COMMON/clesphys/cycle_diurne, soil_model,                        &
+     &     ok_orodr, ok_orolf, ok_gw_nonoro, nbapp_rad, nbapp_chim      &
+     &     , ecritphy                                                   &
+     &     , iflag_con, iflag_ajs, solaire, z0, lmixmin, ksta           &
+     &     , ok_kzmin, lev_histmth, lev_histday                         &
+     &     , inertie, chimi,vchim,aerprod,htoh2,ylellouch,hcnrad        &
+     &     , microfi,cutoff,tx,tcorrect
+