source: LMDZ4/trunk/libf/phylmd/clesphys.h @ 998

Last change on this file since 998 was 998, checked in by Laurent Fairhead, 16 years ago

Modifications necessaires a la preparation au passage au nouveau rayonnement
RRTM MPL
LF

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 2.7 KB
RevLine 
[524]1!
2! $Header$
3!
[793]4!
5!  ATTENTION!!!!: ce fichier include est compatible format fixe/format libre
6!                 veillez à n'utiliser que des ! pour les commentaires
7!                 et à bien positionner les & des lignes de continuation
8!                 (les placer en colonne 6 et en colonne 73)
9!
10!..include cles_phys.h
11!
[524]12       LOGICAL cycle_diurne,soil_model,new_oliq,ok_orodr,ok_orolf
13       LOGICAL ok_limitvrai
14       INTEGER nbapp_rad, iflag_con
15       REAL co2_ppm, solaire
16       REAL*8 RCO2, RCH4, RN2O, RCFC11, RCFC12 
17       REAL*8 CH4_ppb, N2O_ppb, CFC11_ppt, CFC12_ppt
[766]18
[793]19!OM ---> correction du bilan d'eau global
20!OM Correction sur precip KE
[766]21       REAL cvl_corr
[793]22!OM Fonte calotte dans bilan eau
[766]23       LOGICAL ok_lic_melt
24
[793]25!IM simulateur ISCCP
[524]26       INTEGER top_height, overlap
[793]27!IM seuils cdrm, cdrh
[524]28       REAL cdmmax, cdhmax
[793]29!IM param. stabilite s/ terres et en dehors
[524]30       REAL ksta, ksta_ter
[793]31!IM ok_kzmin : clef calcul Kzmin dans la CL de surface cf FH
[524]32       LOGICAL ok_kzmin
[900]33!IM, MAFo fmagic, pmagic : parametres - additionnel et multiplicatif - 
34!                          pour regler l albedo sur ocean
35       REAL fmagic, pmagic
[889]36! Hauteur (imposee) du contenu en eau du sol
37           REAL qsol0
[793]38!IM lev_histhf  : niveau sorties 6h
39!IM lev_histday : niveau sorties journalieres
40!IM lev_histmth : niveau sorties mensuelles
[524]41       INTEGER lev_histhf, lev_histday, lev_histmth
[644]42       CHARACTER*4 type_run
43       LOGICAL ok_isccp, ok_regdyn
44       REAL lonmin_ins, lonmax_ins, latmin_ins, latmax_ins
[684]45       REAL ecrit_ins, ecrit_hf, ecrit_hf2mth, ecrit_day
46       REAL ecrit_mth, ecrit_tra, ecrit_reg
[828]47       REAL freq_ISCCP, ecrit_ISCCP
[998]48       INTEGER :: ip_ebil_phy, iflag_rrtm
49       LOGICAL ok_slab_sicOBS
[524]50
[793]51       COMMON/clesphys/cycle_diurne, soil_model, new_oliq,              &
52     &     ok_orodr, ok_orolf, ok_limitvrai, nbapp_rad, iflag_con       &
53     &     , co2_ppm, solaire, RCO2, RCH4, RN2O, RCFC11, RCFC12         &
54     &     , CH4_ppb, N2O_ppb, CFC11_ppt, CFC12_ppt                     &
55     &     , top_height, overlap, cdmmax, cdhmax, ksta, ksta_ter        &
[900]56     &     , ok_kzmin, fmagic, pmagic                                   &
57     &     , lev_histhf, lev_histday, lev_histmth                       &
[793]58     &     , type_run, ok_isccp, ok_regdyn                              &
59     &     , lonmin_ins, lonmax_ins, latmin_ins, latmax_ins             &
60     &     , ecrit_ins, ecrit_hf, ecrit_hf2mth, ecrit_day               &
61     &     , ecrit_mth, ecrit_tra, ecrit_reg                            &
[828]62     &     , freq_ISCCP, ecrit_ISCCP, ip_ebil_phy                       &
[998]63     &     , ok_slab_sicOBS, ok_lic_melt, cvl_corr                      &
64     &     , qsol0, iflag_rrtm
[766]65     
[793]66!$OMP THREADPRIVATE(/clesphys/)
[766]67 
Note: See TracBrowser for help on using the repository browser.