CAM
mo_neu_wetdep Module Reference

Functions/Subroutines

subroutine, public neu_wetdep_init
 
subroutine, public neu_wetdep_tend (lchnk, ncol, mmr, pmid, pdel, zint, tfld, delt, prain, nevapr, cld, cmfdqr, wd_tend)
 
subroutine washo (LPAR, NTRACE, DTSCAV, QTTJFL, QM, POFL, DELZ, RLS, CLWC, CIWC, CFR, TEM, EVAPRATE, GAREA, HSTAR, TCMASS, TCKAQB, TCNION, qt_rain, qt_rime, qt_wash, qt_evap)
 
subroutine disgas (CLWX, CFX, MOLMASS, HSTAR, TM, PR, QM, QT, QTDIS)
 
subroutine raingas (RRAIN, DTSCAV, CLWX, CFX, QM, QT, QTDIS, QTRAIN)
 
subroutine washgas (RWASH, BOXF, DTSCAV, QTRTOP, HSTAR, TM, PR, QM, QT, QTWASH, QTEVAP)
 
real(r8) function dempirical (CWATER, RRATE)
 
real(r8) function gamma (X)
 

Variables

integer, dimension(:), allocatable mapping_to_heff
 
integer, dimension(:), allocatable mapping_to_mmr
 
real(r8), dimension(:), allocatable mol_weight
 
logical, dimension(:), allocatable ice_uptake
 
integer index_cldice
 
integer index_cldliq
 
integer nh3_ndx
 
integer co2_ndx
 
logical debug = .false.
 
integer hno3_ndx = 0
 
logical do_diag = .false.
 
integer, parameter kdiag = 18
 
real(r8), parameter zero = 0._r8
 
real(r8), parameter one = 1._r8
 
logical, public do_neu_wetdep
 

Function/Subroutine Documentation

◆ dempirical()

real(r8) function mo_neu_wetdep::dempirical ( real(r8), intent(in)  CWATER,
real(r8), intent(in)  RRATE 
)
private
Here is the call graph for this function:
Here is the caller graph for this function:

◆ disgas()

subroutine mo_neu_wetdep::disgas ( real(r8), intent(in)  CLWX,
real(r8), intent(in)  CFX,
real(r8), intent(in)  MOLMASS,
real(r8), intent(in)  HSTAR,
real(r8), intent(in)  TM,
real(r8), intent(in)  PR,
real(r8), intent(in)  QM,
real(r8), intent(in)  QT,
real(r8), intent(out)  QTDIS 
)
private
Here is the caller graph for this function:

◆ gamma()

real(r8) function mo_neu_wetdep::gamma ( real(r8), intent(in)  X)
private
Here is the caller graph for this function:

◆ neu_wetdep_init()

subroutine, public mo_neu_wetdep::neu_wetdep_init ( )
Here is the call graph for this function:
Here is the caller graph for this function:

◆ neu_wetdep_tend()

subroutine, public mo_neu_wetdep::neu_wetdep_tend ( integer, intent(in)  lchnk,
integer, intent(in)  ncol,
real(r8), dimension(pcols,pver,pcnst), intent(in)  mmr,
real(r8), dimension(pcols,pver), intent(in)  pmid,
real(r8), dimension(pcols,pver), intent(in)  pdel,
real(r8), dimension(pcols,pver+1), intent(in)  zint,
real(r8), dimension(pcols,pver), intent(in)  tfld,
real(r8), intent(in)  delt,
real(r8), dimension(ncol, pver), intent(in)  prain,
real(r8), dimension(ncol, pver), intent(in)  nevapr,
real(r8), dimension(ncol, pver), intent(in)  cld,
real(r8), dimension(ncol, pver), intent(in)  cmfdqr,
real(r8), dimension(pcols,pver,pcnst), intent(inout)  wd_tend 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ raingas()

subroutine mo_neu_wetdep::raingas ( real(r8), intent(in)  RRAIN,
real(r8), intent(in)  DTSCAV,
real(r8), intent(in)  CLWX,
real(r8), intent(in)  CFX,
real(r8), intent(in)  QM,
real(r8), intent(in)  QT,
real(r8), intent(in)  QTDIS,
real(r8), intent(out)  QTRAIN 
)
private
Here is the caller graph for this function:

◆ washgas()

subroutine mo_neu_wetdep::washgas ( real(r8), intent(in)  RWASH,
real(r8), intent(in)  BOXF,
real(r8), intent(in)  DTSCAV,
real(r8), intent(in)  QTRTOP,
real(r8), intent(in)  HSTAR,
real(r8), intent(in)  TM,
real(r8), intent(in)  PR,
real(r8), intent(in)  QM,
real(r8), intent(in)  QT,
real(r8), intent(out)  QTWASH,
real(r8), intent(out)  QTEVAP 
)
private
Here is the caller graph for this function:

◆ washo()

subroutine mo_neu_wetdep::washo ( integer  LPAR,
integer  NTRACE,
real(r8), intent(in)  DTSCAV,
real(r8), dimension(lpar,ntrace), intent(inout)  QTTJFL,
real(r8), dimension(lpar), intent(in)  QM,
real(r8), dimension(lpar), intent(in)  POFL,
real(r8), dimension(lpar), intent(in)  DELZ,
real(r8), dimension(lpar), intent(in)  RLS,
real(r8), dimension(lpar), intent(in)  CLWC,
real(r8), dimension(lpar), intent(in)  CIWC,
real(r8), dimension(lpar), intent(in)  CFR,
real(r8), dimension(lpar), intent(in)  TEM,
  EVAPRATE,
real(r8), intent(in)  GAREA,
real(r8), dimension(lpar,ntrace), intent(in)  HSTAR,
real(r8), dimension(ntrace), intent(in)  TCMASS,
logical, dimension(ntrace), intent(in)  TCKAQB,
logical, dimension(ntrace), intent(in)  TCNION,
real(r8), dimension(lpar), intent(inout)  qt_rain,
real(r8), dimension(lpar), intent(inout)  qt_rime,
real(r8), dimension(lpar), intent(inout)  qt_wash,
real(r8), dimension(lpar), intent(inout)  qt_evap 
)
Here is the call graph for this function:
Here is the caller graph for this function:

Variable Documentation

◆ co2_ndx

integer mo_neu_wetdep::co2_ndx
private

◆ debug

logical mo_neu_wetdep::debug = .false.
private

◆ do_diag

logical mo_neu_wetdep::do_diag = .false.
private

◆ do_neu_wetdep

logical, public mo_neu_wetdep::do_neu_wetdep

◆ hno3_ndx

integer mo_neu_wetdep::hno3_ndx = 0
private

◆ ice_uptake

logical, dimension(:), allocatable mo_neu_wetdep::ice_uptake
private

◆ index_cldice

integer mo_neu_wetdep::index_cldice
private

◆ index_cldliq

integer mo_neu_wetdep::index_cldliq
private

◆ kdiag

integer, parameter mo_neu_wetdep::kdiag = 18
private

◆ mapping_to_heff

integer, dimension(:), allocatable mo_neu_wetdep::mapping_to_heff
private

◆ mapping_to_mmr

integer, dimension(:), allocatable mo_neu_wetdep::mapping_to_mmr
private

◆ mol_weight

real(r8), dimension(:), allocatable mo_neu_wetdep::mol_weight
private

◆ nh3_ndx

integer mo_neu_wetdep::nh3_ndx
private

◆ one

real(r8), parameter mo_neu_wetdep::one = 1._r8
private

◆ zero

real(r8), parameter mo_neu_wetdep::zero = 0._r8
private