| buf = mk(mkarray(2)[0, a], 2, 0, 1), j0 = (buf .first + buf .len) % buf .size, buf1 = buf ⊦ ⟪put#(j0, b; buf1 .data)⟫ ⟪buf1 := buf1 .len:= (buf1 .len + 1)⟫ ⟪pop#(; buf1, a0) ; assert#(a0 = a) ; push#(c; buf1) ; pop#(; buf1, a0) ; assert#(a0 = b) ; pop#(; buf1, a0) ; assert#(a0 = c)⟫ true |
buf1 = mk(mkarray(2)[0, a], 2, 0, 1) ⊦ ⟪put#(1, b; buf1 .data)⟫ ⟪buf1 := buf1 .len:= (buf1 .len + 1)⟫ ⟪pop#(; buf1, a0) ; assert#(a0 = a) ; push#(c; buf1) ; pop#(; buf1, a0) ; assert#(a0 = b) ; pop#(; buf1, a0) ; assert#(a0 = c)⟫ true
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ mk(ar, i, i0, i1) .size = i], [CSIMPSEQ : ⊦ mk(ar, i, i0, i1) .first = i0], [CSIMPSEQ : ⊦ mk(ar, i, i0, i1) .len = i1])]]