| ⊦ ( (# gs.ar ≠ 0 ∧ htok(gs.ar)) ∧ ls.e ≠ ls.e0 ∧ (ls.e0 ≠ ⊥ ∧ ls.e0 = gs.ar[ls.n]) ∧ allslotsfull(gs.ar, ls.n0, ls.n, ls.e, false) ∧ ls.n < # gs.ar ∧ ls.e ≠ ⊥ ∧ ls.sz = # gs.ar ∧ (ls.n0 < # gs.ar ∧ ls.n0 = get_hash(ls.e, ls.sz)) ∧ ¬ ls.b) ∧ pre(gs, ls, I11, a) ∧ pcstepf(gs, ls, I11, a) = I17 → (# gstepf(gs, ls, I11, a).ar ≠ 0 ∧ htok(gstepf(gs, ls, I11, a).ar)) ∧ allslotsfull(gstepf(gs, ls, I11, a).ar, lstepf(gs, ls, I11, a).n0, lstepf(gs, ls, I11, a).n, lstepf(gs, ls, I11, a).e, true) ∧ lstepf(gs, ls, I11, a).n < # gstepf(gs, ls, I11, a).ar ∧ lstepf(gs, ls, I11, a).e ≠ ⊥ ∧ lstepf(gs, ls, I11, a).sz = # gstepf(gs, ls, I11, a).ar ∧ ( lstepf(gs, ls, I11, a).n0 < # gstepf(gs, ls, I11, a).ar ∧ lstepf(gs, ls, I11, a).n0 = get_hash(lstepf(gs, ls, I11, a).e, lstepf(gs, ls, I11, a).sz)) ∧ ¬ lstepf(gs, ls, I11, a).b |
ls.e0 = gs.ar[ls.n], ls.n0 = get_hash(ls.e, ls.sz), ls.sz = # gs.ar, pcstepf(gs, ls, I11, a) = I17, # gs.ar ≠ 0, ls.e ≠ ⊥, ls.e ≠ ls.e0, ls.e0 ≠ ⊥, ls.n < # gs.ar, ls.n0 < # gs.ar, allslotsfull(gs.ar, ls.n0, ls.n, ls.e, false), htok(gs.ar), pre(gs, ls, I11, a), ¬ ls.b ⊦ (# gstepf(gs, ls, I11, a).ar ≠ 0 ∧ htok(gstepf(gs, ls, I11, a).ar)) ∧ allslotsfull(gstepf(gs, ls, I11, a).ar, lstepf(gs, ls, I11, a).n0, lstepf(gs, ls, I11, a).n, lstepf(gs, ls, I11, a).e, true) ∧ lstepf(gs, ls, I11, a).n < # gstepf(gs, ls, I11, a).ar ∧ lstepf(gs, ls, I11, a).e ≠ ⊥ ∧ lstepf(gs, ls, I11, a).sz = # gstepf(gs, ls, I11, a).ar ∧ ( lstepf(gs, ls, I11, a).n0 < # gstepf(gs, ls, I11, a).ar ∧ lstepf(gs, ls, I11, a).n0 = get_hash(lstepf(gs, ls, I11, a).e, lstepf(gs, ls, I11, a).sz)) ∧ ¬ lstepf(gs, ls, I11, a).b
| ls.e0 = gs.ar[ls.n], ls.n0 = get_hash(ls.e, ls.sz), ls.sz = # gs.ar, pcstepf(gs, ls, I11, a) = I17, # gs.ar ≠ 0, ls.e ≠ ⊥, ls.e ≠ ls.e0, ls.e0 ≠ ⊥, ls.n < # gs.ar, ls.n0 < # gs.ar, allslotsfull(gs.ar, ls.n0, ls.n, ls.e, false), htok(gs.ar), pre(gs, ls, I11, a), ¬ ls.b ⊦ (# gstepf(gs, ls, I11, a).ar ≠ 0 ∧ htok(gstepf(gs, ls, I11, a).ar)) ∧ allslotsfull(gstepf(gs, ls, I11, a).ar, lstepf(gs, ls, I11, a).n0, lstepf(gs, ls, I11, a).n, lstepf(gs, ls, I11, a).e, true) ∧ lstepf(gs, ls, I11, a).n < # gstepf(gs, ls, I11, a).ar ∧ lstepf(gs, ls, I11, a).e ≠ ⊥ ∧ lstepf(gs, ls, I11, a).sz = # gstepf(gs, ls, I11, a).ar ∧ ( lstepf(gs, ls, I11, a).n0 < # gstepf(gs, ls, I11, a).ar ∧ lstepf(gs, ls, I11, a).n0 = get_hash(lstepf(gs, ls, I11, a).e, lstepf(gs, ls, I11, a).sz)) ∧ ¬ lstepf(gs, ls, I11, a).b |
ls.e0 = gs.ar[ls.n], ls.n0 = get_hash(ls.e, ls.sz), ls.sz = # gs.ar, ls.e ≠ ⊥, ls.e ≠ ls.e0, ls.e0 ≠ ⊥, ls.n0 < ls.sz, ls.n < ls.sz, allslotsfull(gs.ar, ls.n0, ls.n, ls.e, false), htok(gs.ar), ¬ ls.b, ¬ allslotsfull(gs.ar, ls.n0, (ls.n + 1) % ls.sz, ls.e, true) ⊦
Used simplifier rules: n ≠ 0 ⊦ m % n < n; (s) ⊦ m < n → n ≠ 0; (s) ⊦ (ls.n:= sz1).b ↔ ls.b; (s) ⊦ lstepf(gs, ls, I11, τ) = ls.n:= ((ls.n + 1) % ls.sz); (s) ⊦ (ls.n:= sz1).sz = ls.sz; (s) ⊦ (ls.n:= sz1).e = ls.e; (s) ⊦ (ls.n:= sz1).n0 = ls.n0; (s) ⊦ gstepf(gs, ls, I11, τ) = gs; (s) ⊦ (ls.n:= sz1).n = sz1; (s) lf-01: ⊦ m < n ∧ n = n0 → m < n0; (forward) from specification nat-basic lf-02: ⊦ m < n ∧ m = n0 → n0 < n; (forward) from specification nat-basic f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic ⊦ pre(gs, ls, I11, a) ↔ a = τ; (s) ⊦ pcstepf(gs, ls, I11, a) = I17; (s)
| ls.e0 = gs.ar[ls.n], ls.n0 = get_hash(ls.e, ls.sz), ls.sz = # gs.ar, ls.e ≠ ⊥, ls.e ≠ ls.e0, ls.e0 ≠ ⊥, ls.n0 < ls.sz, ls.n < ls.sz, allslotsfull(gs.ar, ls.n0, ls.n, ls.e, false), htok(gs.ar), ¬ ls.b, ¬ allslotsfull(gs.ar, ls.n0, (ls.n + 1) % ls.sz, ls.e, true) ⊦ |
n < # ar, n0 < # ar ⊦ ar[n] ≠ ⊥ ∧ ar[n] ≠ e ∧ sz = # ar → (allslotsfull(ar, n0, (n + 1) % sz, e, true) ↔ allslotsfull(ar, n0, n, e, false))
Used terms: ls.n0, gs.ar, ls.e, ls.sz, ls.n
| n < # ar, n0 < # ar ⊦ ar[n] ≠ ⊥ ∧ ar[n] ≠ e ∧ sz = # ar → (allslotsfull(ar, n0, (n + 1) % sz, e, true) ↔ allslotsfull(ar, n0, n, e, false)) |
The following image shows the proof tree of sequent calculus. The proved goal is at the bottom. You can click on the nodes to view additional rules. See here for details on colors in a proof tree.