FV3 Bundle
soradmod Module Reference

Functions/Subroutines

subroutine, public sorad (m, np, nb, cosz_dev, pl_dev, ta_dev, wa_dev, oa_dev, co2, cwc_dev, fcld_dev, ict, icb, reff_dev, hk_uv, hk_ir, taua_dev, ssaa_dev, asya_dev, rsuvbm_dev, rsuvdf_dev, rsirbm_dev, rsirdf_dev, flx_dev, CONS_GRAV, wk_uv, zk_uv, ry_uv, xk_ir, ry_ir, cah, coa, aig_uv, awg_uv, arg_uv, aib_uv, awb_uv, arb_uv, aib_nir, awb_nir, arb_nir, aia_nir, awa_nir, ara_nir, aig_nir, awg_nir, arg_nir, caib, caif)
 
subroutine, public deledd (tau1, ssc1, g01, cza1, rr1, tt1, td1)
 
subroutine, public getvistau1 (nlevs, cosz, dp, fcld, reff, hydromets, ict, icb, taubeam, taudiff, asycl, aig_uv, awg_uv, arg_uv, aib_uv, awb_uv, arb_uv, aib_nir, awb_nir, arb_nir, aia_nir, awa_nir, ara_nir, aig_nir, awg_nir, arg_nir, caib, caif, CONS_GRAV)
 
subroutine, public getnirtau1 (ib, nlevs, cosz, dp, fcld, reff, hydromets, ict, icb, taubeam, taudiff, asycl, ssacl, aig_uv, awg_uv, arg_uv, aib_uv, awb_uv, arb_uv, aib_nir, awb_nir, arb_nir, aia_nir, awa_nir, ara_nir, aig_nir, awg_nir, arg_nir, caib, caif, CONS_GRAV)
 

Function/Subroutine Documentation

◆ deledd()

subroutine, public soradmod::deledd ( real(8), intent(in)  tau1,
real(8), intent(in)  ssc1,
real(8), intent(in)  g01,
real(8), intent(in)  cza1,
real(8), intent(out)  rr1,
real(8), intent(out)  tt1,
real(8), intent(out)  td1 
)

Definition at line 1495 of file sorad.F90.

Here is the caller graph for this function:

◆ getnirtau1()

subroutine, public soradmod::getnirtau1 ( integer, intent(in)  ib,
integer, intent(in)  nlevs,
real(8), intent(in)  cosz,
real(8), dimension(nlevs), intent(in)  dp,
real(8), dimension(nlevs), intent(in)  fcld,
real(8), dimension(nlevs,4), intent(in)  reff,
real(8), dimension(nlevs,4), intent(in)  hydromets,
integer, intent(in)  ict,
integer, intent(in)  icb,
real(8), dimension(nlevs,4), intent(out)  taubeam,
real(8), dimension(nlevs,4), intent(out)  taudiff,
real(8), dimension(nlevs ), intent(out)  asycl,
real(8), dimension(nlevs ), intent(out)  ssacl,
real(8), dimension(3), intent(in)  aig_uv,
real(8), dimension(3), intent(in)  awg_uv,
real(8), dimension(3), intent(in)  arg_uv,
real(8), intent(in)  aib_uv,
real(8), dimension(2), intent(in)  awb_uv,
real(8), dimension(2), intent(in)  arb_uv,
real(8), intent(in)  aib_nir,
real(8), dimension(3,2), intent(in)  awb_nir,
real(8), dimension(3,2), intent(in)  arb_nir,
real(8), dimension(3,3), intent(in)  aia_nir,
real(8), dimension(3,3), intent(in)  awa_nir,
real(8), dimension(3,3), intent(in)  ara_nir,
real(8), dimension(3,3), intent(in)  aig_nir,
real(8), dimension(3,3), intent(in)  awg_nir,
real(8), dimension(3,3), intent(in)  arg_nir,
real(8), dimension(11,9,11), intent(in)  caib,
real(8), dimension(9,11), intent(in)  caif,
real(8), intent(in)  CONS_GRAV 
)

Definition at line 1908 of file sorad.F90.

Here is the caller graph for this function:

◆ getvistau1()

subroutine, public soradmod::getvistau1 ( integer, intent(in)  nlevs,
real(8), intent(in)  cosz,
real(8), dimension(nlevs), intent(in)  dp,
real(8), dimension(nlevs), intent(in)  fcld,
real(8), dimension(nlevs,4), intent(in)  reff,
real(8), dimension(nlevs,4), intent(in)  hydromets,
integer, intent(in)  ict,
integer, intent(in)  icb,
real(8), dimension(nlevs,4), intent(out)  taubeam,
real(8), dimension(nlevs,4), intent(out)  taudiff,
real(8), dimension(nlevs ), intent(out)  asycl,
real(8), dimension(3), intent(in)  aig_uv,
real(8), dimension(3), intent(in)  awg_uv,
real(8), dimension(3), intent(in)  arg_uv,
real(8), intent(in)  aib_uv,
real(8), dimension(2), intent(in)  awb_uv,
real(8), dimension(2), intent(in)  arb_uv,
real(8), intent(in)  aib_nir,
real(8), dimension(3,2), intent(in)  awb_nir,
real(8), dimension(3,2), intent(in)  arb_nir,
real(8), dimension(3,3), intent(in)  aia_nir,
real(8), dimension(3,3), intent(in)  awa_nir,
real(8), dimension(3,3), intent(in)  ara_nir,
real(8), dimension(3,3), intent(in)  aig_nir,
real(8), dimension(3,3), intent(in)  awg_nir,
real(8), dimension(3,3), intent(in)  arg_nir,
real(8), dimension(11,9,11), intent(in)  caib,
real(8), dimension(9,11), intent(in)  caif,
real(8), intent(in)  CONS_GRAV 
)

Definition at line 1631 of file sorad.F90.

Here is the caller graph for this function:

◆ sorad()

subroutine, public soradmod::sorad ( integer  m,
integer  np,
integer  nb,
real(8), dimension(m)  cosz_dev,
real(8), dimension(m,np+1)  pl_dev,
real(8), dimension(m,np)  ta_dev,
real(8), dimension(m,np)  wa_dev,
real(8), dimension(m,np)  oa_dev,
real(8)  co2,
real(8), dimension(m,np,4)  cwc_dev,
real(8), dimension(m,np)  fcld_dev,
integer  ict,
integer  icb,
real(8), dimension(m,np,4)  reff_dev,
real(8), dimension(5)  hk_uv,
real(8), dimension(3,10)  hk_ir,
real(8), dimension(m,np,nb)  taua_dev,
real(8), dimension(m,np,nb)  ssaa_dev,
real(8), dimension(m,np,nb)  asya_dev,
real(8), dimension(m)  rsuvbm_dev,
real(8), dimension(m)  rsuvdf_dev,
real(8), dimension(m)  rsirbm_dev,
real(8), dimension(m)  rsirdf_dev,
real(8), dimension(m,np+1)  flx_dev,
real(8), intent(in)  CONS_GRAV,
real(8), dimension(5), intent(in)  wk_uv,
real(8), dimension(5), intent(in)  zk_uv,
real(8), dimension(5), intent(in)  ry_uv,
real(8), dimension(10), intent(in)  xk_ir,
real(8), dimension(3), intent(in)  ry_ir,
real(8), dimension(43,37), intent(in)  cah,
real(8), dimension(62,101), intent(in)  coa,
real(8), dimension(3), intent(in)  aig_uv,
real(8), dimension(3), intent(in)  awg_uv,
real(8), dimension(3), intent(in)  arg_uv,
real(8), intent(in)  aib_uv,
real(8), dimension(2), intent(in)  awb_uv,
real(8), dimension(2), intent(in)  arb_uv,
real(8), intent(in)  aib_nir,
real(8), dimension(3,2), intent(in)  awb_nir,
real(8), dimension(3,2), intent(in)  arb_nir,
real(8), dimension(3,3), intent(in)  aia_nir,
real(8), dimension(3,3), intent(in)  awa_nir,
real(8), dimension(3,3), intent(in)  ara_nir,
real(8), dimension(3,3), intent(in)  aig_nir,
real(8), dimension(3,3), intent(in)  awg_nir,
real(8), dimension(3,3), intent(in)  arg_nir,
real(8), dimension(11,9,11), intent(in)  caib,
real(8), dimension(9,11), intent(in)  caif 
)

Definition at line 46 of file sorad.F90.

Here is the call graph for this function: