| remove-refsize0(istore1) = istore1, remove-refsize0(gstore0) = gstore0, elems nx ∩ ginval1 = ∅, dom gstore0 ∪ elems nx = dom gstore ∪ ginval1, inv(istore1), inv(istore2), inv(gstore0), inv(gstore \ ginval1), maxino2 ∈ gstore, n0 ∈ crash(gstore, gstore0, ginval1, nx), istore1 ⊑ istore2, pstate.index? → pstate.lnum ∈ istore2, pstate.journal? → nx ≠ [] ∧ pstate.lnum = nx.last ∧ pstate.lnum ∈ gstore ⊦ dups(nx), (n0 ∈ crash(gstore, gstore0, ginval1, nx) ↔ n0 ∈ crash(gstore[maxino2, gstore[maxino2].ref-size:= n], gstore0, ginval1, nx)) ∧ ( n0 ∈ crash(gstore, gstore0, ginval1, nx) → (n0 ∈ nx ∨ ¬ n0 ∈ ginval1 ⊃ groupblock(gstore[n0].gndlist, gstore[n0].ladrlist, (n0 ∈ gstore0 ⊃ gstore0[n0].ref-size;0));gstore0[n0]) = crash(gstore[maxino2, gstore[maxino2].ref-size:= n], gstore0, ginval1, nx)[n0]) |
remove-refsize0(istore1) = istore1, remove-refsize0(gstore0) = gstore0, elems nx ∩ ginval1 = ∅, dom gstore0 ∪ elems nx = dom gstore ∪ ginval1, inv(istore1), inv(istore2), inv(gstore0), inv(gstore \ ginval1), maxino2 ∈ gstore, n0 ∈ crash(gstore, gstore0, ginval1, nx), n0 ∈ crash(gstore[maxino2, gstore[maxino2].ref-size:= n], gstore0, ginval1, nx), istore1 ⊑ istore2, pstate.index? → pstate.lnum ∈ istore2, pstate.journal? → nx ≠ [] ∧ pstate.lnum = nx.last ∧ pstate.lnum ∈ gstore ⊦ (n0 ∈ nx ∨ ¬ n0 ∈ ginval1 ⊃ groupblock(gstore[n0].gndlist, gstore[n0].ladrlist, (n0 ∈ gstore0 ⊃ gstore0[n0].ref-size;0));gstore0[n0]) = (n0 ∈ nx ∨ ¬ n0 ∈ ginval1 ⊃ groupblock (gstore[maxino2, gstore[maxino2].ref-size:= n][n0].gndlist, gstore[maxino2, gstore[maxino2].ref-size:= n][n0].ladrlist, (n0 ∈ gstore0 ⊃ gstore0[n0].ref-size;0)) ;gstore0[n0] ), dups(nx)
Used simplifier rules: ⊦ n ∈ gstore[n0, gblock] ↔ n = n0 ∨ n ∈ gstore; (ws)% ⊦ n ∈ crash(gstore, gstore0, ginval, nx) ↔ n ∈ gstore ∨ n ∈ ginval; (ws)%⊦ n ∈ crash(gstore, gstore0, ginval, nx) → crash(gstore, gstore0, ginval, nx)[n] = (n ∈ nx ∨ ¬ n ∈ ginval ⊃ groupblock (gstore[n].gndlist, gstore[n].ladrlist, (n ∈ gstore0 ⊃ gstore0[n].ref-size;0)) ;gstore0[n] ); (s)