| gstore[nx.last] = groupblock(gndx, lax, m) ⊦ abs-log(nx, gstore) = abs-log(nx.butlast, gstore) + ax ↔ ax = lax.to-adr(nx.last), nx = [] |
⊦ nx = [] ↔ ¬(∃ nx0, n. nx = nx0 + n ')
Used simplifier rules: abs-log-append-one: ⊦ abs-log(nx + n ', gstore) = abs-log(nx, gstore) + gstore[n].ladrlist.to-adr(n);% ⊦ (nx + n ').last = n; (s)%a: ⊦ (nx + nx0) + nx1 = nx + nx0 + nx1; from specification list[nat-list-set]% ⊦ (nx + n ').butlast = nx; (s)% ⊦ ax + ax0 = ax + ax1 ↔ ax0 = ax1; (s)%a: ⊦ (ax + ax0) + ax1 = ax + ax0 + ax1; from specification list[address-list-set]% ⊦ groupblock(gndx, lax, m).ladrlist = lax; (s)% ⊦ lax0.to-adr(n) = lax1.to-adr(n) ↔ lax0 = lax1; (s) Used terms: nx