subroutine module_bl_mynn::boulac_length0	(	integer, intent(in)	k,
		integer, intent(in)	kts,
		integer, intent(in)	kte,
		real, dimension(kts:kte+1), intent(in)	zw,
		real, dimension(kts:kte), intent(in)	dz,
		real, dimension(kts:kte), intent(in)	qtke,
		real, dimension(kts:kte), intent(in)	theta,
		real, intent(out)	lb1,
		real, intent(out)	lb2
	)