Changeset 2972 for LMDZ5


Ignore:
Timestamp:
Jul 26, 2017, 4:53:07 PM (7 years ago)
Author:
acozic
Message:

merge with rev 2951 to correct an error on AOD diagnostics for sulfate.

Location:
LMDZ5/branches/IPSLCM6.0.11
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • LMDZ5/branches/IPSLCM6.0.11

  • LMDZ5/branches/IPSLCM6.0.11/libf/phylmd/rrtm/aeropt_5wv_rrtm.F90

    r2858 r2972  
    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.