sedi_melt()

subroutine gfdl_cloud_microphys_v3_mod::sedi_melt ( real(kind_phys), intent(in) dts, integer, intent(in) ks, integer, intent(in) ke, 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) dz, real(kind_phys), dimension (ks:ke), intent(in) dp, real(kind_phys), dimension (ks:ke), intent(in) vt, real(kind_phys), intent(inout) r1, real(kind_phys), intent(in) tau_mlt, real(kind_phys), dimension (ks:ke), intent(in) icpk, character (len = 2), intent(in) qflag )

private