Ignore:
Timestamp:
Feb 20, 2011, 12:20:51 PM (14 years ago)
Author:
aslmd
Message:

LMD_MM_MARS: corrections cycle de l'eau propagees a la nouvelle physique. + corrections readmeteo.F90 [version synchronisee precedemment n etait pas la plus a jour] + corrections api.F90 pour avoir cp, R comme GCM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/mesoscale/LMD_MM_MARS/SRC/POSTPROC/api.F90

    r19 r73  
    4848      ! MARS CONSTANTS
    4949      !
    50       REAL, PARAMETER :: Rd  = 192.     ! gas constant m2 s-2 K-1
    51       REAL, PARAMETER :: Cp  = 844.6    ! r= 8.314511E+0*1000.E+0/mugaz
    52 !REAL, PARAMETER :: Rd  = 191.0
    53 !REAL, PARAMETER :: Cp  = 744.5
     50      !REAL, PARAMETER :: Rd  = 192.     ! gas constant m2 s-2 K-1
     51      !REAL, PARAMETER :: Cp  = 844.6    ! r= 8.314511E+0*1000.E+0/mugaz
     52      REAL, PARAMETER :: Rd  = 191.0
     53      REAL, PARAMETER :: Cp  = 744.5
    5454      REAL, PARAMETER :: RCP = Rd/Cp
    5555      REAL, PARAMETER :: p0  = 610.
Note: See TracChangeset for help on using the changeset viewer.