subst this
case h.left
α : Type u
inst✝¹ : DecidableEq α
inst✝ : LT α
a : α
M N X Y : Multiset α
a0 : α
H1 : N = X + Y
H0 : a ::ₘ M = X + {a0}
H2 : ∀ y ∈ Y, y < a0
hyp : ¬a = a0
this : X = M - {a0} + {a}
⊢ X + Y = a ::ₘ (Y + (M - {a0}))
case h.left
α : Type u
inst✝¹ : DecidableEq α
inst✝ : LT α
a : α
M N Y : Multiset α
a0 : α
H2 : ∀ y ∈ Y, y < a0
hyp : ¬a = a0
H1 : N = M - {a0} + {a} + Y
H0 : a ::ₘ M = M - {a0} + {a} + {a0}
⊢ M - {a0} + {a} + Y = a ::ₘ (Y + (M - {a0}))