subroutine cu_gf_deep::get_melting_profile	(	integer, dimension(its:ite), intent(in)	ierr,
		real(kind=kind_phys), dimension(its:ite,kts:kte), intent(in)	tn_cup,
		real(kind=kind_phys), dimension(its:ite,kts:kte), intent(in)	po_cup,
		real(kind=kind_phys), dimension(its:ite,kts:kte), intent(in)	p_liq_ice,
		real(kind=kind_phys), dimension(its:ite,kts:kte), intent(in)	melting_layer,
		real(kind=kind_phys), dimension(its:ite,kts:kte), intent(in)	qrco,
		real(kind=kind_phys), dimension(its:ite,kts:kte), intent(in)	pwo,
		real(kind=kind_phys), dimension(its:ite), intent(in)	edto,
		real(kind=kind_phys), dimension(its:ite,kts:kte), intent(in)	pwdo,
		real(kind=kind_phys), dimension(its:ite,kts:kte), intent(inout)	melting,
		integer, intent(in)	itf,
		integer, intent(in)	ktf,
		integer, intent(in)	its,
		integer, intent(in)	ite,
		integer, intent(in)	kts,
		integer, intent(in)	kte,
		character *(*), intent(in)	cumulus
	)

References g, and melt_glac.

Referenced by cu_gf_deep_run().