| buf1 = mk(mkarray(2), 2, 0, 0), ar0 = buf1 .data ∧ a2 = a ∧ i0 = 0, buf = buf1 .data:= ar0[i→n(i0), a2] .len:= ((buf1 .data:= ar0[i→n(i0), a2]) .len + 1) ⊦ ⟪push#(b; buf)⟫ ⟪pop#(; buf, a0) ; assert#(a0 = a) ; push#(c; buf) ; pop#(; buf, a0) ; assert#(a0 = b) ; pop#(; buf, a0) ; assert#(a0 = c)⟫ true |
buf = mk(mkarray(2)[0, a], 2, 0, 1) ⊦ ⟪push#(b; buf)⟫ ⟪pop#(; buf, a0) ; assert#(a0 = a) ; push#(c; buf) ; pop#(; buf, a0) ; assert#(a0 = b) ; pop#(; buf, a0) ; assert#(a0 = c)⟫ true
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ mk(ar, i, i0, i1) .len:= i4 = mk(ar, i, i0, i4)], [CSIMPSEQ : ⊦ mk(ar, i, i0, i1) .len = i1], [CSIMPSEQ : ⊦ mk(ar, i, i0, i1) .data:= ar0 = mk(ar0, i, i0, i1)], [CSIMPSEQ : ⊦ mk(ar, i, i0, i1) .data = ar])]]