Changeset 2951 for LMDZ5


Ignore:
Timestamp:
Jul 14, 2017, 5:22:12 PM (7 years ago)
Author:
oboucher
Message:

Correcting an error on AOD diagnostics for sulfate.
Accumulation mode and coarse mode were swapped....

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/phylmd/rrtm/aeropt_5wv_rrtm.F90

    r2858 r2951  
    431431        soluble=.TRUE.
    432432        spsol=2
    433     ELSEIF (aerosol_name(m).EQ.id_ASSO4M_phy) THEN
     433    ELSEIF (aerosol_name(m).EQ.id_CSSO4M_phy) THEN
    434434        soluble=.TRUE.
    435435        spsol=3
    436         fac=1.375    ! (NH4)2-SO4/SO4 132/96 mass conversion factor for AOD
    437     ELSEIF (aerosol_name(m).EQ.id_CSSO4M_phy) THEN
    438         soluble=.TRUE.
    439         spsol=4
    440436        !fac=1.375    ! (NH4)2-SO4/SO4 132/96 mass conversion factor for AOD
    441437        fac=0.0      !--6 March 2017 - OB as Didier H said CSSO4 should not be used
     438    ELSEIF (aerosol_name(m).EQ.id_ASSO4M_phy) THEN
     439        soluble=.TRUE.
     440        spsol=4
     441        fac=1.375    ! (NH4)2-SO4/SO4 132/96 mass conversion factor for AOD
    442442    ELSEIF (aerosol_name(m).EQ.id_SSSSM_phy) THEN
    443443        soluble=.TRUE.
Note: See TracChangeset for help on using the changeset viewer.