| # kar0 = # kar, m / 2 = m6 + 1, kar0[m6 / 2] = key-index(key3, m5), kar0[m + 1] = key-index(key2, m4), kar0[m6 + 1] = key-index(key1, m3), kar[n1] = key-index(key, m0), kar[(n1 - 1) / 2] = key-index(key0, m1), keyset(kar0, m2) = keyset(kar, m2), key2 < key3, key1 < key3, m6 + 1 < # kar, m6 + 1 < m2, m4 < # ar, key2 < key1, m3 < # ar, n1 < m2, n1 < # kar, m + 1 < m2, m + 1 < # kar, id-idx(ar1, ar), no-dups-idx(kar0, m2), no-dups-idx(kar, m2), valid-idx(kar0, ar, m2), valid-idx(kar, ar1, m2), m2 ≤ # kar, n1 = 0 ∨ ¬ key < key0 → heap-order(kar, m2), n1 ≠ 0 ∧ key < key0 → heap-order(kar[n1, key-index(key0, m1)], m2), ∀ m0. m0 < m2 ∧ m0 ≠ 0 → ¬ kar0[m + 1, key-index(key1, m3)][m0].key < kar0[m + 1, key-index(key1, m3)][(m0 - 1) / 2].key ⊦ # kar = 1, m6 / 2 = m + 1, m = 1, m = 0, m2 = 1, heap-order(kar0[m + 1, key-index(key1, m3)][m6 + 1, key-index(key3, m5)], m2) |
Used simplifier rules: ⊦ m + 1 ≠ 0; (s)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic% ⊦ m + n = m + n0 ↔ n = n0; (s)%m ≠ n ⊦ kar[m, ki][n] = kar[n]; (s)% ⊦ n ≤ m → m + n0 - n = (m - n) + n0; (s)% ⊦ n + 0 = n; (s)% ⊦ m ≠ n → kar[n, ki][m] = kar[m]; (s)% ⊦ key-index(key, m).key = key; (s) Used terms: m6 + 1