topdown_cloudrad()

subroutine module_bl_mynn::topdown_cloudrad	(	integer, intent(in)	kts,
		integer, intent(in)	kte,
		real(kind_phys), dimension(kts:kte), intent(in)	dz1,
		real(kind_phys), dimension(kts:kte+1), intent(in)	zw,
		real(kind_phys), intent(in)	xland,
		integer, intent(in)	kpbl,
		real(kind_phys), intent(in)	pblh,
		real(kind_phys), dimension(kts:kte), intent(in)	sqc,
		real(kind_phys), dimension(kts:kte), intent(in)	sqi,
		real(kind_phys), dimension(kts:kte), intent(in)	sqw,
		real(kind_phys), dimension(kts:kte), intent(in)	thl,
		real(kind_phys), dimension(kts:kte), intent(in)	th1,
		real(kind_phys), dimension(kts:kte), intent(in)	ex1,
		real(kind_phys), dimension(kts:kte), intent(in)	p1,
		real(kind_phys), dimension(kts:kte), intent(in)	rho1,
		real(kind_phys), dimension(kts:kte), intent(in)	thetav,
		real(kind_phys), dimension(kts:kte), intent(in)	cldfra_bl1d,
		real(kind_phys), dimension(kts:kte), intent(in)	rthraten,
		real(kind_phys), intent(out)	maxkhtopdown,
		real(kind_phys), dimension(kts:kte), intent(out)	khtopdown,
		real(kind_phys), dimension(kts:kte), intent(out)	tkeprodtd )