have hr : 2*i+2 ≥ x.size := .step hl
α : Type u
lt : α → α → Bool
x : Subarray α
i : Nat
hl : 2 * i + 1 ≥ Subarray.size x
hi : i < Subarray.size x
⊢ IsHeap lt x i
α : Type u
lt : α → α → Bool
x : Subarray α
i : Nat
hl : 2 * i + 1 ≥ Subarray.size x
hi : i < Subarray.size x
hr : 2 * i + 2 ≥ Subarray.size x
⊢ IsHeap lt x i