Changeset 4014


Ignore:
Timestamp:
Jan 19, 2026, 2:32:18 PM (3 days ago)
Author:
debatzbr
Message:

Titan PCM: Add HC3N condensation.
BBT

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.TITAN/libf/muphytitan/mm_methods.f90

    r3496 r4014  
    378378      res = (1.0e5 / pres) * exp(1.393e1 - 3.624e3/temp - 1.325e5/temp**2 + 6.314e6/temp**3 - 1.128e8/temp**4)
    379379   
     380    ELSE IF(xESP%name == "HC3N") THEN
     381      ! Fray and Schmidt (2009)
     382      res = (1.0e5 / pres) * exp(1.301e1 - 4.426e3/temp)
     383   
    380384    ELSE IF (xESP%name == "CH4") THEN
    381385      ! Fray and Schmidt (2009)
    … …  
    417421      ! Fray and Schmidt (2009)
    418422      res = (1.0e5 / pres) * exp(1.393e1 - 3.624e3/temp - 1.325e5/temp**2 + 6.314e6/temp**3 - 1.128e8/temp**4)
     423   
     424    ELSE IF(xESP%name == "HC3N") THEN
     425      ! Fray and Schmidt (2009)
     426      res = (1.0e5 / pres) * exp(1.301e1 - 4.426e3/temp)
    419427   
    420428    ! Peculiar case : CH4 : x0.85 (dissolution in N2)
Note: See TracChangeset for help on using the changeset viewer.