| bin-heap-inv(bh, ar), bh0 = bh ⊦ ⟪bin_min_heap_resize#(minsize; bh)⟫ (bin-heap-inv(bh, ar) ∧ bh.size = bh0.size ∧ # bh.ar ≥ minsize ∧ subarray(bh.ar, 0, bh.size) = subarray(bh0.ar, 0, bh0.size)) |
bh0 = bh, bin-heap-inv(bh, ar) ⊦ ⟪bin_min_heap_resize#(minsize; bh)⟫ (bin-heap-inv(bh, ar) ∧ bh.size = bh0.size ∧ # bh.ar ≥ minsize ∧ subarray(bh.ar, 0, bh.size) = subarray(bh0.ar, 0, bh0.size))