| n ≤ # kar, m < n ⊦ heap-order(kar, n) ∧ ¬ ki.key < kar[m].key ∧ (2 * m + 1 < n → ¬ kar[2 * m + 1].key < ki.key) ∧ (2 * m + 2 < n → ¬ kar[2 * m + 2].key < ki.key) → (¬ heap-order(kar[m, ki], n) ↔ false) |
m < n, heap-order(kar, n), n ≤ # kar, 2 * m + 1 < n → ¬ kar[2 * m + 1].key < ki.key, 2 * m + 2 < n → ¬ kar[2 * m + 2].key < ki.key ⊦ ¬ heap-order(kar[m, ki], n) ↔ false, ki.key < kar[m].key