Ignore:
Timestamp:
Jan 4, 2023, 12:42:33 PM (2 years ago)
Author:
mturbet
Message:

add the CO2-H2 CIA opacity from Turbet2020 in the model

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.GENERIC/libf/phystd/optci.F90

    r2655 r2860  
    200200                       call interpolateN2H2(wn_cont,T_cont,p_cross,p_cont,dtempc,.false.,interm)
    201201                       indi(nw,igas,jgas) = interm
     202                    elseif(jgas.eq.igas_CO2)then
     203                       interm = indi(nw,igas,jgas)
     204                       call interpolateCO2H2(wn_cont,T_cont,p_cross,p_cont,dtempc,.false.,interm)
     205                       indi(nw,igas,jgas) = interm
    202206                    elseif(jgas.eq.igas_He)then
    203207                       interm = indi(nw,igas,jgas)
Note: See TracChangeset for help on using the changeset viewer.