| bh = bin-heap(kar, m), 2exp-size(# kar), heap-order(kar, m), no-dups-idx(kar, m), valid-idx(kar, ar, m), m ≤ # kar ⊦ ⟪skip; n := bh.ar[0].idx⟫ ∃ key. key-index(key, n) ∈ keyset(kar, m) ∧ (∀ ki. ki ∈ keyset(kar, m) → ¬ ki.key < key), # keyset(kar, m) = 0, keyset(kar, m) = ∅ |
bh = bin-heap(kar, m), 2exp-size(# kar), heap-order(kar, m), no-dups-idx(kar, m), valid-idx(kar, ar, m), m ≤ # kar ⊦ ⟪n := bh.ar[0].idx⟫ ∃ key. key-index(key, n) ∈ keyset(kar, m) ∧ (∀ ki. ki ∈ keyset(kar, m) → ¬ ki.key < key), # keyset(kar, m) = 0, keyset(kar, m) = ∅