source: trunk/libf/phytitan/clesphys.h @ 127

Last change on this file since 127 was 104, checked in by slebonnois, 14 years ago

SLebonnois: modification de makelmdz et create_make_gcm pour pouvoir
compiler la chimie titan. Pas de raison que ca gene les autres.
Dans cette version, les compilations de Venus et Titan fonctionnent.

Phytitan: modifications pour pouvoir compiler correctement.
Il ne manque plus que physiq.F a faire.
File size: 1.2 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!..include cles_phys.h
8!
9       LOGICAL cycle_diurne,soil_model
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
Note: See TracBrowser for help on using the repository browser.