subroutine qcsice	(	real (kind=kind_io8), dimension(len)	ais,
		real (kind=kind_io8), dimension(len)	glacir,
		real (kind=kind_io8), dimension(len)	amxice,
		real (kind=kind_io8)	aicice,
		real (kind=kind_io8)	aicsea,
		real (kind=kind_io8)	sllnd,
		real (kind=kind_io8), dimension(len)	slmask,
		real (kind=kind_io8), dimension(len)	rla,
		real (kind=kind_io8), dimension(len)	rlo,
		integer	len,
		integer	me
	)

Referenced by sfccycle().