CAM
aer_rad_props Module Reference

Functions/Subroutines

subroutine, public aer_rad_props_init ()
 
subroutine, public aer_rad_props_sw (list_idx, state, pbuf, nnite, idxnite, is_cmip6_volc, tau, tau_w, tau_w_g, tau_w_f)
 
subroutine, public aer_rad_props_lw (is_cmip6_volc, list_idx, state, pbuf, odap_aer)
 
subroutine get_hygro_rad_props (ncol, krh, wrh, mass, ext, ssa, asm, tau, tau_w, tau_w_g, tau_w_f)
 
subroutine get_nonhygro_rad_props (ncol, mass, ext, ssa, asm, tau, tau_w, tau_w_g, tau_w_f)
 
subroutine get_volcanic_radius_rad_props (lchnk, ncol, mass, pbuf, r_ext, r_scat, r_ascat, r_mu, tau, tau_w, tau_w_g, tau_w_f)
 
subroutine volcanic_cmip_sw (state, pbuf, trop_level, ext_cmip6_sw, tau, tau_w, tau_w_g, tau_w_f)
 
subroutine get_volcanic_rad_props (ncol, mass, ext, scat, ascat, tau, tau_w, tau_w_g, tau_w_f)
 
subroutine aer_vis_diag_out (lchnk, ncol, nnite, idxnite, iaer, tau, diag_idx)
 

Variables

integer top_lev = 1
 
real(r8), parameter km_inv_to_m_inv = 0.001_r8
 
character(len=fieldname_len), dimension(:), pointer odv_names
 
integer idx_ext_sw
 
integer idx_ssa_sw
 
integer idx_af_sw
 
integer idx_ext_lw
 
integer ihuge
 
real(r8) rhuge
 

Function/Subroutine Documentation

◆ aer_rad_props_init()

subroutine, public aer_rad_props::aer_rad_props_init ( )
Here is the call graph for this function:
Here is the caller graph for this function:

◆ aer_rad_props_lw()

subroutine, public aer_rad_props::aer_rad_props_lw ( logical, intent(in)  is_cmip6_volc,
integer, intent(in)  list_idx,
type(physics_state), intent(in), target  state,
type(physics_buffer_desc), dimension(:), pointer  pbuf,
real(r8), dimension(pcols,pver,nlwbands), intent(out)  odap_aer 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ aer_rad_props_sw()

subroutine, public aer_rad_props::aer_rad_props_sw ( integer, intent(in)  list_idx,
type(physics_state), intent(in), target  state,
type(physics_buffer_desc), dimension(:), pointer  pbuf,
integer, intent(in)  nnite,
integer, dimension(:), intent(in)  idxnite,
logical, intent(in)  is_cmip6_volc,
real(r8), dimension (pcols,0:pver,nswbands), intent(out)  tau,
real(r8), dimension (pcols,0:pver,nswbands), intent(out)  tau_w,
real(r8), dimension(pcols,0:pver,nswbands), intent(out)  tau_w_g,
real(r8), dimension(pcols,0:pver,nswbands), intent(out)  tau_w_f 
)
Here is the call graph for this function:
Here is the caller graph for this function:

◆ aer_vis_diag_out()

subroutine aer_rad_props::aer_vis_diag_out ( integer, intent(in)  lchnk,
integer, intent(in)  ncol,
integer, intent(in)  nnite,
integer, dimension(:), intent(in)  idxnite,
integer, intent(in)  iaer,
real(r8), dimension(:,:), intent(in)  tau,
integer, intent(in)  diag_idx 
)
private
Here is the call graph for this function:
Here is the caller graph for this function:

◆ get_hygro_rad_props()

subroutine aer_rad_props::get_hygro_rad_props ( integer, intent(in)  ncol,
integer, dimension(pcols,pver), intent(in)  krh,
real(r8), dimension(pcols,pver), intent(in)  wrh,
real(r8), dimension(pcols,pver), intent(in)  mass,
real(r8), dimension(:,:), intent(in)  ext,
real(r8), dimension(:,:), intent(in)  ssa,
real(r8), dimension(:,:), intent(in)  asm,
real(r8), dimension (pcols,pver,nswbands), intent(out)  tau,
real(r8), dimension (pcols,pver,nswbands), intent(out)  tau_w,
real(r8), dimension(pcols,pver,nswbands), intent(out)  tau_w_g,
real(r8), dimension(pcols,pver,nswbands), intent(out)  tau_w_f 
)
Here is the caller graph for this function:

◆ get_nonhygro_rad_props()

subroutine aer_rad_props::get_nonhygro_rad_props ( integer, intent(in)  ncol,
real(r8), dimension(pcols, pver), intent(in)  mass,
real(r8), dimension(:), intent(in)  ext,
real(r8), dimension(:), intent(in)  ssa,
real(r8), dimension(:), intent(in)  asm,
real(r8), dimension (pcols, pver, nswbands), intent(out)  tau,
real(r8), dimension (pcols, pver, nswbands), intent(out)  tau_w,
real(r8), dimension(pcols, pver, nswbands), intent(out)  tau_w_g,
real(r8), dimension(pcols, pver, nswbands), intent(out)  tau_w_f 
)
private
Here is the caller graph for this function:

◆ get_volcanic_rad_props()

subroutine aer_rad_props::get_volcanic_rad_props ( integer, intent(in)  ncol,
real(r8), dimension(pcols, pver), intent(in)  mass,
real(r8), dimension(:), intent(in)  ext,
real(r8), dimension(:), intent(in)  scat,
real(r8), dimension(:), intent(in)  ascat,
real(r8), dimension (pcols, pver, nswbands), intent(out)  tau,
real(r8), dimension (pcols, pver, nswbands), intent(out)  tau_w,
real(r8), dimension(pcols, pver, nswbands), intent(out)  tau_w_g,
real(r8), dimension(pcols, pver, nswbands), intent(out)  tau_w_f 
)
private
Here is the caller graph for this function:

◆ get_volcanic_radius_rad_props()

subroutine aer_rad_props::get_volcanic_radius_rad_props ( integer, intent(in)  lchnk,
integer, intent(in)  ncol,
real(r8), dimension(pcols, pver), intent(in)  mass,
type(physics_buffer_desc), dimension(:), pointer  pbuf,
real(r8), dimension(:,:), intent(in)  r_ext,
real(r8), dimension(:,:), intent(in)  r_scat,
real(r8), dimension(:,:), intent(in)  r_ascat,
real(r8), dimension(:), intent(in)  r_mu,
real(r8), dimension (pcols, pver, nswbands), intent(out)  tau,
real(r8), dimension (pcols, pver, nswbands), intent(out)  tau_w,
real(r8), dimension(pcols, pver, nswbands), intent(out)  tau_w_g,
real(r8), dimension(pcols, pver, nswbands), intent(out)  tau_w_f 
)
private
Here is the call graph for this function:
Here is the caller graph for this function:

◆ volcanic_cmip_sw()

subroutine aer_rad_props::volcanic_cmip_sw ( type(physics_state), intent(in), target  state,
type(physics_buffer_desc), dimension(:), pointer  pbuf,
integer, dimension(pcols), intent(in)  trop_level,
real(r8), dimension(pcols,pver,nswbands), intent(in)  ext_cmip6_sw,
real(r8), dimension (pcols,0:pver,nswbands), intent(inout)  tau,
real(r8), dimension (pcols,0:pver,nswbands), intent(inout)  tau_w,
real(r8), dimension(pcols,0:pver,nswbands), intent(inout)  tau_w_g,
real(r8), dimension(pcols,0:pver,nswbands), intent(inout)  tau_w_f 
)
Here is the caller graph for this function:

Variable Documentation

◆ idx_af_sw

integer aer_rad_props::idx_af_sw
private

◆ idx_ext_lw

integer aer_rad_props::idx_ext_lw
private

◆ idx_ext_sw

integer aer_rad_props::idx_ext_sw
private

◆ idx_ssa_sw

integer aer_rad_props::idx_ssa_sw
private

◆ ihuge

integer aer_rad_props::ihuge
private

◆ km_inv_to_m_inv

real(r8), parameter aer_rad_props::km_inv_to_m_inv = 0.001_r8
private

◆ odv_names

character(len=fieldname_len), dimension(:), pointer aer_rad_props::odv_names
private

◆ rhuge

real(r8) aer_rad_props::rhuge
private

◆ top_lev

integer aer_rad_props::top_lev = 1
private