| bh0 = bh, ar0 = ar, bubble-down-inv(n, bh, ar, bh0, ar0) ⊦ ⟪bin_min_heap_bubble_down#(n; bh, ar)⟫ ( bh.size = bh0.size ∧ # bh.ar = # bh0.ar ∧ id-idx(ar0, ar) ∧ no-dups-idx(bh.ar, bh.size) ∧ valid-idx(bh.ar, ar, bh.size) ∧ heap-order(bh.ar, bh.size) ∧ keyset(bh0) = keyset(bh)) |