simp [insert, h]
α : Type
r : α → α → Prop
inst✝ : DecidableRel r
a : α
l : List α
a' : α
as : List α
h : ¬r a a'
⊢ List.length (insert r a (a' :: as)) = List.length (a' :: as) + 1
α : Type
r : α → α → Prop
inst✝ : DecidableRel r
a : α
l : List α
a' : α
as : List α
h : ¬r a a'
⊢ List.length (insert r a as) = List.length as + 1