| n + 1 ≤ # kar, n ≠ 0 ⊦ heap-order(kar, n) ∧ kar[(n - 1) / 2] = key-index(key, m) → heap-order(kar[n, key-index(key, m)], n + 1) |
kar[(n - 1) / 2] = key-index(key, m), heap-order(kar, n), n + 1 ≤ # kar ⊦ n = 0, heap-order(kar[n, key-index(key, m)], n + 1)