|
Last change
on this file since 433 was
433,
checked in by lmdzadmin, 21 years ago
|
|
Convergence avec la version de Ionela dec 2002
YOMCST.? : suppression RI0 (IM)
albedo.F : facteur 1.2 sur le nouveau calcul (IM)
clesphys.h : rajout de différentes ctes (concentration des gaz) (IM)
clmain.F : separation des flux LW, SW (JLD)
remplace qsurf par yqsol (IM)
conf_phys.F90 : rajout de différentes ctes (gaz + orbite) (IM)
convect3.F : DPINV+SIGD*0.5*(EVAP(1)+EVAP(2)) (SBL)
cv3_routines.F:
cvparam3.h : compatibilite avec conema3 TEMPORAIRE (FH)
phyetat0.F : lecture de co2_ppm et solaire pour tests de coherence
phyredem.F : co2_ppm et solaire passé en common
physiq.F : separation flux LW, SW
rajout diagnostiques (slp, w500)
suppression iflag_con = 4
clwcon0=qcondc (FH)
position dU "ENDIF ! ok_cvl"
radlwsw.F : passage des concentrations gaz dans un common (IM)
PEMIS(i) = 1.0 (JLD pour cohérence ORCHIDEE)
stdlevvar.F90 :
suphec.F : suppression init. des ctes orbitales (IM)
nouvelles E/S (ini_hist..., write_hist...)
|
-
Property svn:eol-style set to
native
-
Property svn:executable set to
*
-
Property svn:keywords set to
Author Date Id Revision
|
|
File size:
424 bytes
|
| Line | |
|---|
| 1 | c..include cles_phys.h |
|---|
| 2 | c |
|---|
| 3 | LOGICAL cycle_diurne,soil_model,new_oliq,ok_orodr,ok_orolf |
|---|
| 4 | LOGICAL ok_limitvrai |
|---|
| 5 | INTEGER nbapp_rad, iflag_con |
|---|
| 6 | REAL co2_ppm, solaire |
|---|
| 7 | REAL*8 RCO2, RCH4, RN2O, RCFC11, RCFC12 |
|---|
| 8 | |
|---|
| 9 | COMMON/clesphys/cycle_diurne, soil_model, new_oliq, |
|---|
| 10 | , ok_orodr, ok_orolf, ok_limitvrai, nbapp_rad, iflag_con |
|---|
| 11 | , , co2_ppm, solaire, RCO2, RCH4, RN2O, RCFC11, RCFC12 |
|---|
Note: See
TracBrowser
for help on using the repository browser.
