| zbrar[n0] = mkzentry(key, adr), payload(copy(zbrar, n0 + 1, zbrar, 2 + n0, nused0), 2 + n0, nused0) = payload(zbrar, n0 + 1, nused0), n0 < # zbrar, n0 + 1 < # zbrar, n0 + nused0 + 1 < # zbrar, ∀ n, zbrar. n + nused0 < # zbrar → payload(copy(zbrar, n, zbrar, n + 1, nused0), n + 1, nused0) = payload(zbrar, n, nused0) ⊦ payload(copy(zbrar, n0 + 1, zbrar, 2 + n0, nused0)[n0 + 1, mkzentry(key, adr)], 2 + n0, nused0)[key, adr] = payload(zbrar, n0 + 1, nused0)[key, adr] |
zbrar[n0] = mkzentry(key, adr), n0 + nused0 + 1 < # zbrar, n0 + 1 < # zbrar, n0 < # zbrar, ∀ n, zbrar. n + nused0 < # zbrar → payload(copy(zbrar, n, zbrar, n + 1, nused0), n + 1, nused0) = payload(zbrar, n, nused0) ⊦ payload(copy(zbrar, n0 + 1, zbrar, 2 + n0, nused0)[n0 + 1, mkzentry(key, adr)], 2 + n0, nused0)[key, adr] = payload(copy(zbrar, n0 + 1, zbrar, 2 + n0, nused0), 2 + n0, nused0)[key, adr]