◆ warm_rain()

subroutine gfdl_cloud_microphys_v3_mod::warm_rain	(	real(kind_phys), intent(in)	dts,
		integer, intent(in)	ks,
		integer, intent(in)	ke,
		real(kind_phys), dimension (ks:ke), intent(in)	dp,
		real(kind_phys), dimension (ks:ke), intent(in)	dz,
		real (kind = r8), dimension (ks:ke), intent(inout)	tz,
		real(kind_phys), dimension (ks:ke), intent(inout)	qv,
		real(kind_phys), dimension (ks:ke), intent(inout)	ql,
		real(kind_phys), dimension (ks:ke), intent(inout)	qr,
		real(kind_phys), dimension (ks:ke), intent(inout)	qi,
		real(kind_phys), dimension (ks:ke), intent(inout)	qs,
		real(kind_phys), dimension (ks:ke), intent(inout)	qg,
		real(kind_phys), dimension (ks:ke), intent(in)	den,
		real(kind_phys), dimension (ks:ke), intent(in)	denfac,
		real(kind_phys), dimension (ks:ke), intent(in)	vtw,
		real(kind_phys), dimension (ks:ke), intent(in)	vtr,
		real(kind_phys), dimension (ks:ke), intent(inout)	ccn,
		real(kind_phys), intent(in)	rh_rain,
		real(kind_phys), intent(in)	h_var,
		real(kind_phys), intent(out)	reevap
	)

private