source: LMDZ4/trunk/libf/phytherm/clesphys.h @ 1072

Last change on this file since 1072 was 833, checked in by lmdzadmin, 17 years ago

Ajout parametres "fmagic" reglage albedo, "ok_hf", frequence calcul "freq_ISCCP" et sortie "ecrit_ISCCP" ISCCP
IM

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 2.4 KB
Line 
1!
2! $Header$
3!
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!
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
18
19!OM ---> correction du bilan d'eau global
20!OM Correction sur precip KE
21       REAL cvl_corr
22!OM Fonte calotte dans bilan eau
23       LOGICAL ok_lic_melt
24
25!IM simulateur ISCCP
26       INTEGER top_height, overlap
27!IM seuils cdrm, cdrh
28       REAL cdmmax, cdhmax
29!IM param. stabilite s/ terres et en dehors
30       REAL ksta, ksta_ter
31!IM ok_kzmin : clef calcul Kzmin dans la CL de surface cf FH
32       LOGICAL ok_kzmin
33!IM fmagic : parametre pour regler l albedo sur ocean
34       REAL fmagic
35!IM lev_histhf  : niveau sorties 6h
36!IM lev_histday : niveau sorties journalieres
37!IM lev_histmth : niveau sorties mensuelles
38       INTEGER lev_histhf, lev_histday, lev_histmth
39       CHARACTER*4 type_run
40       LOGICAL ok_isccp, ok_regdyn
41       REAL lonmin_ins, lonmax_ins, latmin_ins, latmax_ins
42       REAL ecrit_ins, ecrit_hf, ecrit_hf2mth, ecrit_day
43       REAL ecrit_mth, ecrit_tra, ecrit_reg
44       REAL freq_ISCCP, ecrit_ISCCP
45       INTEGER :: ip_ebil_phy
46       LOGICAL ok_slab_sicOBS
47
48       COMMON/clesphys/cycle_diurne, soil_model, new_oliq,              &
49     &     ok_orodr, ok_orolf, ok_limitvrai, nbapp_rad, iflag_con       &
50     &     , co2_ppm, solaire, RCO2, RCH4, RN2O, RCFC11, RCFC12         &
51     &     , CH4_ppb, N2O_ppb, CFC11_ppt, CFC12_ppt                     &
52     &     , top_height, overlap, cdmmax, cdhmax, ksta, ksta_ter        &
53     &     , ok_kzmin, fmagic, lev_histhf, lev_histday, lev_histmth     &
54     &     , type_run, ok_isccp, ok_regdyn                              &
55     &     , lonmin_ins, lonmax_ins, latmin_ins, latmax_ins             &
56     &     , ecrit_ins, ecrit_hf, ecrit_hf2mth, ecrit_day               &
57     &     , ecrit_mth, ecrit_tra, ecrit_reg                            &
58     &     , freq_ISCCP, ecrit_ISCCP, ip_ebil_phy                       &
59     &     , ok_slab_sicOBS, ok_lic_melt, cvl_corr
60     
61!$OMP THREADPRIVATE(/clesphys/)
62 
Note: See TracBrowser for help on using the repository browser.