CCPP Scientific Documentation
v5.0.0
subroutine ugwp_lsatdis_az1 ( integer, intent(in)  levs,
integer, intent(in)  ksrc,
integer, intent(in)  nw,
real, intent(in)  kxw,
real, dimension(nw), intent(in)  ch,
real, dimension(nw), intent(in)  taub_sp,
real, intent(in)  fcor,
real, intent(in)  c2f2,
real, dimension(levs), intent(in)  zm,
real, dimension(levs+1), intent(in)  zi,
real, dimension(levs), intent(in)  rho,
real, dimension(levs+1), intent(in)  um,
real, dimension(levs+1), intent(in)  tm,
real, dimension(levs+1), intent(in)  bn2,
real, dimension(levs+1), intent(in)  bn,
real, dimension(levs+1), intent(in)  rhoi,
real, dimension(levs), intent(in)  dzirho,
real, dimension(levs), intent(in)  dzpi,
real, dimension(levs+1), intent(in)  kvg,
real, dimension(levs+1), intent(in)  ktg,
real, dimension(levs+1), intent(in)  krad,
real, dimension(levs+1), intent(in)  kion,
real, dimension(levs+1), intent(in)  kmol,
real, dimension(levs)  eps,
real, dimension(levs+1)  ked,
real, dimension(levs+1)  tau 
)