mym_length()

subroutine module_bl_mynn::mym_length	(	integer, intent(in)	kts,
		integer, intent(in)	kte,
		real, dimension(kts:kte), intent(in)	dz,
		real, intent(in)	dx,
		real, dimension(kts:kte+1), intent(in)	zw,
		real, intent(in)	rmo,
		real, intent(in)	flt,
		real, intent(in)	flq,
		real, dimension(kts:kte), intent(in)	vt,
		real, dimension(kts:kte), intent(in)	vq,
		real, dimension(kts:kte), intent(in)	u1,
		real, dimension(kts:kte), intent(in)	v1,
		real, dimension(kts:kte), intent(in)	qke,
		real, dimension(kts:kte), intent(in)	dtv,
		real, dimension(kts:kte), intent(out)	el,
		real	zi,
		real, dimension(kts:kte), intent(in)	theta,
		real, dimension(kts:kte), intent(out)	qkw,
		real, intent(in)	Psig_bl,
		real, dimension(kts:kte), intent(in)	cldfra_bl1D,
		integer, intent(in)	bl_mynn_mixlength,
		real, dimension(kts:kte), intent(in)	edmf_w1,
		real, dimension(kts:kte), intent(in)	edmf_a1,
		real, dimension(kts:kte), intent(in)	edmf_qc1,
		integer, intent(in)	bl_mynn_edmf
	)