source: LMDZ5/trunk/libf/phylmd/clesphys.h @ 1737

Last change on this file since 1737 was 1737, checked in by idelkadi, 11 years ago

Ajout de la cles logique ok_4xCO2atm controlant le 2e appel au code de transfert radiatif (calcule du forcage radiatif quand la concentration de CO2 est quadriplee) !

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 4.6 KB
Line 
1
2!
3! $Id: clesphys.h 1737 2013-03-29 17:58:35Z idelkadi $
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, co2_ppm0, solaire
16       REAL(kind=8) RCO2, RCH4, RN2O, RCFC11, RCFC12 
17       REAL(kind=8) RCO2_act, RCH4_act, RN2O_act, RCFC11_act, RCFC12_act 
18       REAL(kind=8) CH4_ppb, N2O_ppb, CFC11_ppt, CFC12_ppt
19!IM ajout CFMIP2/CMIP5
20       REAL co2_ppm_per
21       LOGICAL ok_4xCO2atm
22       REAL(kind=8) RCO2_per,RCH4_per,RN2O_per,RCFC11_per,RCFC12_per
23       REAL(kind=8) CH4_ppb_per,N2O_ppb_per,CFC11_ppt_per,CFC12_ppt_per
24
25!OM ---> correction du bilan d'eau global
26!OM Correction sur precip KE
27       REAL cvl_corr
28!OM Fonte calotte dans bilan eau
29       LOGICAL ok_lic_melt
30
31!IM simulateur ISCCP
32       INTEGER top_height, overlap
33!IM seuils cdrm, cdrh
34       REAL cdmmax, cdhmax
35!IM param. stabilite s/ terres et en dehors
36       REAL ksta, ksta_ter
37!IM ok_kzmin : clef calcul Kzmin dans la CL de surface cf FH
38       LOGICAL ok_kzmin
39!IM, MAFo fmagic, pmagic : parametres - additionnel et multiplicatif - 
40!                          pour regler l albedo sur ocean
41       REAL fmagic, pmagic
42! Hauteur (imposee) du contenu en eau du sol
43           REAL qsol0
44! Frottement au sol (Cdrag)
45       Real f_cdrag_ter,f_cdrag_oce
46! Rugoro
47       Real f_rugoro
48
49!IM lev_histhf  : niveau sorties 6h
50!IM lev_histday : niveau sorties journalieres
51!IM lev_histmth : niveau sorties mensuelles
52!IM lev_histdayNMC : on peut sortir soit sur 8 (comme AR5) ou bien
53!                    sur 17 niveaux de pression
54       INTEGER lev_histhf, lev_histday, lev_histmth
55       INTEGER lev_histdayNMC
56       Integer lev_histins, lev_histLES 
57!IM ok_histNMC  : sortie fichiers niveaux de pression (histmthNMC, histdayNMC, histhfNMC)
58!IM freq_outNMC : frequences de sortie fichiers niveaux de pression (histmthNMC, histdayNMC, histhfNMC)
59!IM freq_calNMC : frequences de calcul fis. hist*NMC.nc
60!IM pasphys : pas de temps de physique (secondes)
61       REAL pasphys
62       LOGICAL ok_histNMC(3)
63       REAL freq_outNMC(3) , freq_calNMC(3)
64       CHARACTER(len=4) type_run
65! aer_type: pour utiliser un fichier constant dans readaerosol
66       CHARACTER*8 :: aer_type
67       LOGICAL ok_isccp, ok_regdyn
68       REAL lonmin_ins, lonmax_ins, latmin_ins, latmax_ins
69       REAL ecrit_ins, ecrit_hf, ecrit_day
70       REAL ecrit_mth, ecrit_tra, ecrit_reg
71       REAL ecrit_LES
72       REAL freq_ISCCP, ecrit_ISCCP
73       REAL freq_COSP
74       LOGICAL :: ok_cosp,ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP
75       INTEGER :: ip_ebil_phy, iflag_rrtm
76       LOGICAL :: ok_strato
77       LOGICAL :: ok_hines
78
79       COMMON/clesphys/cycle_diurne, soil_model, new_oliq,              &
80     &     ok_orodr, ok_orolf, ok_limitvrai, nbapp_rad, iflag_con       &
81     &     , co2_ppm, solaire                                           &
82     &     , RCO2, RCH4, RN2O, RCFC11, RCFC12                           &
83     &     , RCO2_act, RCH4_act, RN2O_act, RCFC11_act, RCFC12_act       &
84     &     , ok_4xCO2atm                                                & 
85     &     , RCO2_per, RCH4_per, RN2O_per, RCFC11_per, RCFC12_per       &
86     &     , CH4_ppb, N2O_ppb, CFC11_ppt, CFC12_ppt                     &
87     &     , CH4_ppb_per, N2O_ppb_per, CFC11_ppt_per, CFC12_ppt_per     &
88     &     , top_height, overlap, cdmmax, cdhmax, ksta, ksta_ter        &
89     &     , ok_kzmin, fmagic, pmagic                                   &
90     &     , f_cdrag_ter,f_cdrag_oce,f_rugoro                           &
91     &     , lev_histhf, lev_histday, lev_histmth                       &
92     &     , lev_histins, lev_histLES, lev_histdayNMC                   &
93     &     , pasphys, ok_histNMC, freq_outNMC, freq_calNMC              &
94     &     , type_run, ok_isccp, ok_regdyn, ok_cosp                     &
95     &     , ok_mensuelCOSP,ok_journeCOSP,ok_hfCOSP                     &
96     &     , lonmin_ins, lonmax_ins, latmin_ins, latmax_ins             &
97     &     , ecrit_ins, ecrit_hf, ecrit_day                             &
98     &     , ecrit_mth, ecrit_tra, ecrit_reg                            &
99     &     , freq_ISCCP, ecrit_ISCCP, freq_COSP, ip_ebil_phy            &
100     &     , ok_lic_melt, cvl_corr, aer_type                            &
101     &     , qsol0, iflag_rrtm, ok_strato,ok_hines,ecrit_LES            &
102     &     , co2_ppm0
103     
104       save /clesphys/
105!$OMP THREADPRIVATE(/clesphys/)
106 
Note: See TracBrowser for help on using the repository browser.