get_cloud_top()

subroutine cu_gf_deep::get_cloud_top	(	character *(*), intent(in)	name,
		integer, dimension (its:ite), intent(inout)	ktop,
		integer, dimension (its:ite), intent(inout)	ierr,
		real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in)	p_cup,
		real(kind=kind_phys), dimension (its:ite,kts:kte), intent(inout)	entr_rate_2d,
		real(kind=kind_phys), dimension (its:ite), intent(in)	hkbo,
		real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in)	heo,
		real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in)	heso_cup,
		real(kind=kind_phys), dimension (its:ite,kts:kte), intent(in)	z_cup,
		integer, dimension (its:ite), intent(in)	kstabi,
		integer, dimension (its:ite), intent(in)	k22,
		integer, dimension (its:ite), intent(in)	kbcon,
		integer, intent(in)	its,
		integer, intent(in)	ite,
		integer, intent(in)	itf,
		integer, intent(in)	kts,
		integer, intent(in)	kte,
		integer, intent(in)	ktf,
		real(kind=kind_phys), dimension (its:ite,kts:kte), intent(inout)	zuo,
		integer, dimension (its:ite), intent(in)	kpbl,
		integer, dimension (its:ite), intent(in)	klcl,
		real(kind=kind_phys), dimension (its:ite,kts:kte)	hcot )