intros M H0
α : Type u
inst✝¹ : DecidableEq α
inst✝ : Preorder α
a : α
H : ∀ (b : α) (M : Multiset α), b < a → AccM_1 M → AccM_1 (b ::ₘ M)
⊢ ∀ (M : Multiset α), Acc MultisetRedLt M → Acc MultisetRedLt (a ::ₘ M)
α : Type u
inst✝¹ : DecidableEq α
inst✝ : Preorder α
a : α
H : ∀ (b : α) (M : Multiset α), b < a → AccM_1 M → AccM_1 (b ::ₘ M)
M : Multiset α
H0 : Acc MultisetRedLt M
⊢ Acc MultisetRedLt (a ::ₘ M)