| zbrar[n0] = mkzentry(zbrar[n1].key, adr), zbrar[n1].entry?, n1 + 1 < # zbrar, n0 < # zbrar, nused < # zbrar, n < # zbrar, n1 < n0, n1 < # zbrar, n1 < nused, sorted(zbrar, 0, nused + 1), zbrar[n1].key ∈ payload(shl(zbrar, n, nused + 1), 0, nused), n0 ≤ nused, n ≤ nused ⊦ payload(shl(zbrar, n, nused + 1), 0, nused)[zbrar[n1].key] = payload(zbrar, 0, nused + 1)[zbrar[n1].key], zbrar[n].entry? |
Used simplifier rules: ⊦ m < n + 1 ↔ ¬ n < m; (s)% ⊦ m ≤ n → (n < m ↔ false); (s)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic% ⊦ m < n → ¬ n < m; (s)% ⊦ m + 1 ≤ n ↔ m < n; (s)%m0 < m, m1 < m, m ≤ # zbrar ⊦ sorted(zbrar, 0, m) ∧ zbrar[m0] = mkzentry(key, adr0) → (zbrar[m1] = mkzentry(key, adr1) ↔ m0 = m1 ∧ adr0 = adr1); (ws)%lf-02: ⊦ m < n ∧ m = n0 → n0 < n; (forward) from specification nat-basic%lf-01: ⊦ m < n ∧ n = n0 → m < n0; (forward) from specification nat-basic%⊦ zbr.entry? → (key = zbr.key ∧ adr = zbr.adr ↔ zbr = mkzentry(key, adr)); (elim) Used terms: zbrar[n1], key, adr0