| zbrar[n] = mkzentry(key, adr), n < # zbrar, nused < # zbrar, sorted(zbrar, 0, nused + 1), n ≤ nused ⊦ payload(shl(zbrar, n, nused + 1), 0, nused) = payload(zbrar, 0, nused + 1) -- key |
⊦ ri = ri0 ↔ (∀ key. (key ∈ ri ↔ key ∈ ri0) ∧ (key ∈ ri → ri[key] = ri0[key]))
zbrar[n] = mkzentry(key, adr), nused < # zbrar, n < # zbrar, sorted(zbrar, 0, nused + 1), n ≤ nused ⊦ ∀ key0. (key0 ∈ payload(shl(zbrar, n, nused + 1), 0, nused) ↔ key0 ∈ payload(zbrar, 0, nused + 1) -- key) ∧ ( key0 ∈ payload(shl(zbrar, n, nused + 1), 0, nused) → payload(shl(zbrar, n, nused + 1), 0, nused)[key0] = (payload(zbrar, 0, nused + 1) -- key)[key0])
Used terms: payload(zbrar, 0, nused + 1) -- key, payload(shl(zbrar, n, nused + 1), 0, nused)