| m < # zbrar, m + nused0 < # zbrar, (m + 1) + nused0 ≤ # zbrar → (key ∈ payload(zbrar, m + 1, nused0) ↔ (∃ n. n < nused0 ∧ zbrar[(m + 1) + n].entry? ∧ zbrar[(m + 1) + n].key = key)) ⊦ key ∈ (zbrar[m].entry? ⊃ payload(zbrar, m + 1, nused0)[zbrar[m].key, zbrar[m].adr];payload(zbrar, m + 1, nused0)) ↔ (∃ n. ¬ nused0 < n ∧ zbrar[m + n].entry? ∧ zbrar[m + n].key = key) |
key ∈ payload(zbrar, m + 1, nused0) ↔ (∃ n. n < nused0 ∧ zbrar[(m + 1) + n].entry? ∧ zbrar[(m + 1) + n].key = key), m + nused0 < # zbrar, m < # zbrar ⊦ key ∈ (zbrar[m].entry? ⊃ payload(zbrar, m + 1, nused0)[zbrar[m].key, zbrar[m].adr];payload(zbrar, m + 1, nused0)) ↔ (∃ n. ¬ nused0 < n ∧ zbrar[m + n].entry? ∧ zbrar[m + n].key = key)
Used simplifier rules: c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ m + 1 ≤ n ↔ m < n; (s)