Changeset 4787


Ignore:
Timestamp:
Jan 19, 2024, 11:36:10 AM (4 months ago)
Author:
idelkadi
Message:

Continued work on implementing the Ecrad code in LMDZ (Integration of tropospheric aerosols when using the RRTMG and ECCKD gas modules):

  • Added aerosol optical properties files
  • Addition of output dignostics for tropospheric aerosols
Location:
LMDZ6/trunk/libf/phylmd/ecrad/radiation
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/ecrad/radiation/radiation_scheme.F90

    r4773 r4787  
    572572     &  single_level, thermodynamics, gas, cloud, aerosol, flux)
    573573
     574 if (rad_config%use_aerosols) then
     575    if (rad_config%i_gas_model == IGasModelIFSRRTMG) then     
     576       CALL aeropt_5wv_ecrad(kidia, kfdia, 1, klev, &
     577                             rad_config,thermodynamics,aerosol)
     578    endif                 
     579 endif               
     580
    574581print*,'*********** Sortie flux ****************'
    575 
    576582! Cloud cover
    577583ecrad_cloud_cover_sw = flux%cloud_cover_sw

  • LMDZ6/trunk/libf/phylmd/ecrad/radiation/radiation_setup.F90

    r4773 r4787  
    1818       &                       ISolverMcICA, ISolverSpartacus, &
    1919       &                       ILiquidModelSlingo, ILiquidModelSOCRATES, &
    20        &                       IIceModelFu, IIceModelBaran, &
    21        &                       IOverlapExponentialRandom
     20       &                       IIceModelFu, IIceModelBaran, IGasModelECCKD, &
     21       &                       IGasModelIFSRRTMG, IOverlapExponentialRandom
    2222
    2323  USE radiation_interface,      ONLY : setup_radiation
Note: See TracChangeset for help on using the changeset viewer.