intro hhook
α : Type u_1
r : α → α → Prop
inst✝ : Trans r r r
a : α
as bs : List α
⊢ HookedAscending r (a :: as) bs → HookedAscending r as bs
α : Type u_1
r : α → α → Prop
inst✝ : Trans r r r
a : α
as bs : List α
hhook : HookedAscending r (a :: as) bs
⊢ HookedAscending r as bs