| # lax = # gndx0, # ax = # referenced-adrs(lax.to-adr(n1), fi2), # nodes(gstore2 ↓, jro0)[referenced-adrs(lax.to-adr(n1), fi2)].keys = # ax, gstore2[n1] = groupblock(gndx0, lax, m0), abs-log(nx0, gstore3 ↓) = abs-log(nx1, gstore2 ↓) + ax, nodes(gstore3 ↓, jro) = nodes(gstore2 ↓, jro0)[ax, nodes(gstore2 ↓, jro0)[referenced-adrs(lax.to-adr(n1), fi2)]], remove-refsize0(gstore1) = gstore1, elems nx0 ∩ jro = ∅, (nx0.toSet \ nx1.toSet) ∩ dom gstore2 = ∅, elems nx1 ∩ jro0 = ∅, ax.toSet ∩ range fi2 = ∅, dom gstore1 ∪ elems nx0 = dom gstore3 ∪ jro, dom gstore1 ∪ elems nx1 = dom gstore2 ∪ jro0, jro1 < jmaxino0, fi2[nodes(gstore2 ↓, jro0)[referenced-adrs(lax.to-adr(n1), fi2)].keys, ax].inos < jmaxino0, fi1.inos < pmaxino, fi2.inos < jmaxino, p_os < pmaxino, jro1 < jmaxino, inv(gstore3 \ jro), inv(gstore2 \ jro0), inv(gstore1), inv(groupblock(gndx0, lax, m0)), new(ax, nodes(gstore2 ↓, jro0)), refsize-cons(gstore3, (range fi2 \ fi2[nodes(gstore2 ↓, jro0)[referenced-adrs(lax.to-adr(n1), fi2)].keys].toSet) ∪ ax.toSet), refsize-cons(gstore1, range fi1), refsize-cons(gstore2, range fi2), ri-cons(fi2, nodes(gstore2 ↓, jro0)), ri-inj(fi2[nodes(gstore2 ↓, jro0)[referenced-adrs(lax.to-adr(n1), fi2)].keys, ax]), ri-inj(fi1), ri-inj(fi2), @(n1, m1, m2) ∈ (range fi2 \ fi2[nodes(gstore2 ↓, jro0)[referenced-adrs(lax.to-adr(n1), fi2)].keys].toSet) ∪ ax.toSet, n1 ∈ gstore2, n1 ∈ gstore1, n1 ∈ dom gstore3 ∪ jro, n1 ∈ gstore3, pmaxino ≤ jmaxino0, jmaxino ≤ jmaxino0, pmaxino ≤ jmaxino, fi2[nodes(gstore2 ↓, jro0)[referenced-adrs(lax.to-adr(n1), fi2)].keys, ax].lebs ⊆ dom gstore3, dom gstore2 ⊆ dom gstore3, range fi2 ⊆ dom nodes(gstore2 ↓, jro0), fi1.lebs ⊆ dom gstore1, fi2.lebs ⊆ dom gstore2, fi2.lebs ⊆ dom gstore3, nodes(gstore2 ↓, jro0)[referenced-adrs(lax.to-adr(n1), fi2)].keys.toSet ⊆ dom fi2, jvalid4 ∧ nx1 ≠ [] → valid-journal-head(nx1, gstore2, jro0), jvalid0 ∧ nx0 ≠ [] → valid-journal-head(nx0, gstore3, jro) ⊦ #(dom gstore3 ∪ jro) = 0, jmaxino = 0, jmaxino0 = 0, m0 = 0, pmaxino = 0, dom gstore3 ∪ jro = ∅, dups(nx0), dups(nx1), dups(ax), dups(nodes(gstore2 ↓, jro0)[referenced-adrs(lax.to-adr(n1), fi2)].keys), n1 ∈ nx0, n1 ∈ jro0, n1 ∈ nx1 |
# lax = # gndx0, # ax = # referenced-adrs(lax.to-adr(n1), fi2), gstore2[n1] = groupblock(gndx0, lax, m0), abs-log(nx0, gstore3 ↓) = abs-log(nx1, gstore2 ↓) + ax, nodes(gstore3 ↓, jro) = nodes(gstore2 ↓, jro0)[ax, nodes(gstore2 ↓, jro0)[referenced-adrs(lax.to-adr(n1), fi2)]], remove-refsize0(gstore1) = gstore1, elems nx0 ∩ jro = ∅, (nx0.toSet \ nx1.toSet) ∩ dom gstore2 = ∅, elems nx1 ∩ jro0 = ∅, dom gstore1 ∪ elems nx0 = dom gstore3 ∪ jro, dom gstore1 ∪ elems nx1 = dom gstore2 ∪ jro0, jro1 < jmaxino0, fi2[nodes(gstore2 ↓, jro0)[referenced-adrs(lax.to-adr(n1), fi2)].keys, ax].inos < jmaxino0, fi1.inos < pmaxino, fi2.inos < jmaxino, p_os < pmaxino, jro1 < jmaxino, inv(gstore3 \ jro), inv(gstore2 \ jro0), inv(gstore1), inv(groupblock(gndx0, lax, m0)), new(ax, nodes(gstore2 ↓, jro0)), refsize-cons(gstore3, (range fi2 \ referenced-adrs(lax.to-adr(n1), fi2).toSet) ∪ ax.toSet), refsize-cons(gstore1, range fi1), refsize-cons(gstore2, range fi2), ri-cons(fi2, nodes(gstore2 ↓, jro0)), ri-inj(fi2[nodes(gstore2 ↓, jro0)[referenced-adrs(lax.to-adr(n1), fi2)].keys, ax]), ri-inj(fi1), ri-inj(fi2), @(n1, m1, m2) ∈ (range fi2 \ referenced-adrs(lax.to-adr(n1), fi2).toSet) ∪ ax.toSet, n1 ∈ gstore2, n1 ∈ gstore1, n1 ∈ dom gstore3 ∪ jro, n1 ∈ gstore3, pmaxino ≤ jmaxino0, jmaxino ≤ jmaxino0, pmaxino ≤ jmaxino, fi2[nodes(gstore2 ↓, jro0)[referenced-adrs(lax.to-adr(n1), fi2)].keys, ax].lebs ⊆ dom gstore3, dom gstore2 ⊆ dom gstore3, range fi2 ⊆ dom nodes(gstore2 ↓, jro0), fi1.lebs ⊆ dom gstore1, fi2.lebs ⊆ dom gstore2, fi2.lebs ⊆ dom gstore3, jvalid4 ∧ nx1 ≠ [] → valid-journal-head(nx1, gstore2, jro0), jvalid0 ∧ nx0 ≠ [] → valid-journal-head(nx0, gstore3, jro) ⊦ #(dom gstore3 ∪ jro) = 0, #((range fi2 \ referenced-adrs(lax.to-adr(n1), fi2).toSet) ∪ ax.toSet) = 0, jmaxino = 0, jmaxino0 = 0, m0 = 0, pmaxino = 0, (range fi2 \ referenced-adrs(lax.to-adr(n1), fi2).toSet) ∪ ax.toSet = ∅, dom gstore3 ∪ jro = ∅, dups(nx0), dups(nx1), dups(ax), dups(nodes(gstore2 ↓, jro0)[referenced-adrs(lax.to-adr(n1), fi2)].keys), n1 ∈ nx0, n1 ∈ jro0, n1 ∈ nx1
Used simplifier rules: size-zero-01: ⊦ as ≠ ∅ → # as ≠ 0; (forward) from specification set-basic[node-store]%ne-01: ⊦ adr ∈ as → as ≠ ∅; (forward) from specification set-basic[node-store]%⊦ ri-cons(ri, fs) → ri[fs[referenced-adrs(ax, ri)].keys] = referenced-adrs(ax, ri); (s)% ⊦ ri-cons(ri, fs) → fs[referenced-adrs(ax, ri)].keys.toSet ⊆ dom ri; (s)% ⊦ # fs[ax] = # ax; (s)% ⊦ # ndx.keys = # ndx; (s)%int-c: ⊦ as ∩ as0 = as0 ∩ as; from specification set-union[node-store]%int-a: ⊦ (as ∩ as0) ∩ as1 = as ∩ as0 ∩ as1; from specification set-union[node-store]% ⊦ as ⊆ dom fs ∧ new(ax, fs) → ax.toSet ∩ as = ∅; (s)