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

Last change on this file since 820 was 793, checked in by Laurent Fairhead, 17 years ago

Modifications suite a la transformation des fichiers include pour
qu'ils soient compatibles a la fois au format fixe et au format libre
Un bon nombre de fichiers *.inc du coup disparaissent
LF

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 2.4 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
[793]33!IM lev_histhf  : niveau sorties 6h
34!IM lev_histday : niveau sorties journalieres
35!IM lev_histmth : niveau sorties mensuelles
[524]36       INTEGER lev_histhf, lev_histday, lev_histmth
[644]37       CHARACTER*4 type_run
38       LOGICAL ok_isccp, ok_regdyn
39       REAL lonmin_ins, lonmax_ins, latmin_ins, latmax_ins
[684]40       REAL ecrit_ins, ecrit_hf, ecrit_hf2mth, ecrit_day
41       REAL ecrit_mth, ecrit_tra, ecrit_reg
42       REAL freqin_isccp, freqout_isccp
43       INTEGER :: ip_ebil_phy
44       LOGICAL ok_slab_sicOBS
[524]45
[793]46       COMMON/clesphys/cycle_diurne, soil_model, new_oliq,              &
47     &     ok_orodr, ok_orolf, ok_limitvrai, nbapp_rad, iflag_con       &
48     &     , co2_ppm, solaire, RCO2, RCH4, RN2O, RCFC11, RCFC12         &
49     &     , CH4_ppb, N2O_ppb, CFC11_ppt, CFC12_ppt                     &
50     &     , top_height, overlap, cdmmax, cdhmax, ksta, ksta_ter        &
51     &     , ok_kzmin, lev_histhf, lev_histday, lev_histmth             &
52     &     , type_run, ok_isccp, ok_regdyn                              &
53     &     , lonmin_ins, lonmax_ins, latmin_ins, latmax_ins             &
54     &     , ecrit_ins, ecrit_hf, ecrit_hf2mth, ecrit_day               &
55     &     , ecrit_mth, ecrit_tra, ecrit_reg                            &
56     &     , freqin_isccp, freqout_isccp, ip_ebil_phy                   &
57     &     , ok_slab_sicOBS, ok_lic_melt, cvl_corr
[766]58     
[793]59!$OMP THREADPRIVATE(/clesphys/)
[766]60 
Note: See TracBrowser for help on using the repository browser.