source: LMDZ.3.3/branches/rel-LF/libf/phylmd/YOMCST.h @ 433

Last change on this file since 433 was 433, checked in by lmdzadmin, 22 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: 1.2 KB
RevLine 
[98]1! A1.0 Fundamental constants
[2]2      REAL RPI,RCLUM,RHPLA,RKBOL,RNAVO
[98]3! A1.1 Astronomical constants
[2]4      REAL RDAY,REA,REPSM,RSIYEA,RSIDAY,ROMEGA
[98]5! A1.1.bis Constantes concernant l'orbite de la Terre:
[2]6      REAL R_ecc, R_peri, R_incl
[98]7! A1.2 Geoide
[2]8      REAL RA,RG,R1SA
[98]9! A1.3 Radiation
[433]10!     REAL RSIGMA,RI0
11      REAL RSIGMA
[98]12! A1.4 Thermodynamic gas phase
[2]13      REAL R,RMD,RMV,RD,RV,RCPD,RCPV,RCVD,RCVV
14      REAL RKAPPA,RETV
[98]15! A1.5,6 Thermodynamic liquid,solid phases
[2]16      REAL RCW,RCS
[98]17! A1.7 Thermodynamic transition of phase
[2]18      REAL RLVTT,RLSTT,RLMLT,RTT,RATM
[98]19! A1.8 Curve of saturation
[2]20      REAL RESTT,RALPW,RBETW,RGAMW,RALPS,RBETS,RGAMS
21      REAL RALPD,RBETD,RGAMD
[98]22!
[433]23!    S      ,RSIGMA,RI0
[2]24      COMMON/YOMCST/RPI   ,RCLUM ,RHPLA ,RKBOL ,RNAVO
25     S      ,RDAY  ,REA   ,REPSM ,RSIYEA,RSIDAY,ROMEGA
26     s      ,R_ecc, R_peri, R_incl
27     S      ,RA    ,RG    ,R1SA
[433]28     S      ,RSIGMA
[2]29     S      ,R     ,RMD   ,RMV   ,RD    ,RV    ,RCPD
30     S      ,RCPV  ,RCVD  ,RCVV  ,RKAPPA,RETV
31     S      ,RCW   ,RCS
32     S      ,RLVTT ,RLSTT ,RLMLT ,RTT   ,RATM
33     S      ,RESTT ,RALPW ,RBETW ,RGAMW ,RALPS ,RBETS ,RGAMS
34     S      ,RALPD ,RBETD ,RGAMD
[98]35!    ------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.