| kar[0, key-index(key, n)][ar[m3].idx] = key-index(key0, m1), kar[m] = key-index(key, n), ar[n, ar[n].idx:= 0][m1] = elemindex(a, m2), kar[ar[m3].idx] = key-index(key1, m3), ar[m3].idx < # kar, ar[m3].idx < m, m < # kar, m3 < # ar, ar[m3].idx + 1 < # kar, ∀ m0. ¬ m < m0 → kar[m0].idx < # ar ∧ ar[kar[m0].idx].idx = m0 ⊦ m1 < # ar ∧ m2 = ar[m3].idx |
kar[m4] = key-index(key1, m3), ar[n, ar[n].idx:= 0][m1] = elemindex(a, m2), kar[m] = key-index(key, n), kar[0, key-index(key, n)][m4] = key-index(key0, m1), ar[m3] = elemindex(a0, m4), m4 + 1 < # kar, m3 < # ar, m < # kar, m4 < m, m4 < # kar, ∀ m0. ¬ m < m0 → kar[m0].idx < # ar ∧ ar[kar[m0].idx].idx = m0 ⊦ m1 < # ar ∧ m2 = m4
Used simplifier rules: ⊦ a = ei.elem ∧ m = ei.idx ↔ ei = elemindex(a, m); (elim) Used terms: ar[m3], a0, m4