generalize x.size/2 = n
α : Type u
lt : α → α → Bool
x : Subarray α
⊢ mkHeap.loop lt x (Subarray.size x / 2) = Nat.foldRev (fun n x => heapifyDown lt x n) (Subarray.size x / 2) x
α : Type u
lt : α → α → Bool
x : Subarray α
n : Nat
⊢ mkHeap.loop lt x n = Nat.foldRev (fun n x => heapifyDown lt x n) n x