| # kx = # ax, as ∩ ax.toSet = ∅, as ∩ log0.toSet = ∅, ax.toSet ∩ log0.toSet = ∅, as ∩ range ri0[kx, ax] = ∅, ro.inodes?, fo.inodes?, file-node-cons(fs0, ri0), log-cons(log0, fs0[ax, fs0[ri0[kx]]] \ as), log-cons(ax, fs0[ax, fs0[ri0[kx]]] \ as), log-cons(log0, fs0), new(ax, fs0), orphans-cons(fs0, ri0, ro), replay-cons-strong(fs0, ri0, ro, fi, fo, log0), ri-closed(ri0, fs0, ro), ri-cons(ri0[kx, ax], fs0[ax, fs0[ri0[kx]]] \ as), ri-cons(ri0, fs0), ri-inj(ri0[kx, ax]), ri-inj(ri0), ri-inj(fi), kx.toSet ⊆ dom ri0, ro ⊆ dom ri0, fo ⊆ dom fi ⊦ dups(ax), dups(kx), dups(log0), inodekey(0) ∈ ri0, ¬ inodekey(0) ∈ ri0[kx, ax] ∧ ¬ dups(log0 + ax) ∧ ri-closed(ri0[kx, ax], fs0[ax, fs0[ri0[kx]]] \ as, ro) ∧ ro ⊆ dom ri0 ∪ kx.toSet ∧ replay-cons-strong(fs0[ax, fs0[ri0[kx]]] \ as, ri0[kx, ax], ro, fi, fo, log0 + ax) ∧ file-node-cons(fs0[ax, fs0[ri0[kx]]] \ as, ri0[kx, ax]) ∧ orphans-cons(fs0[ax, fs0[ri0[kx]]] \ as, ri0[kx, ax], ro) |
# kx = # ax, as ∩ range ri0[kx, ax] = ∅, ax.toSet ∩ log0.toSet = ∅, as ∩ log0.toSet = ∅, as ∩ ax.toSet = ∅, fo.inodes?, ro.inodes?, file-node-cons(fs0, ri0), log-cons(log0, fs0), log-cons(ax, fs0[ax, fs0[ri0[kx]]] \ as), log-cons(log0, fs0[ax, fs0[ri0[kx]]] \ as), new(ax, fs0), orphans-cons(fs0, ri0, ro), replay-cons-strong(fs0, ri0, ro, fi, fo, log0), ri-closed(ri0, fs0, ro), ri-cons(ri0, fs0), ri-cons(ri0[kx, ax], fs0[ax, fs0[ri0[kx]]] \ as), ri-inj(fi), ri-inj(ri0), ri-inj(ri0[kx, ax]), fo ⊆ dom fi, ro ⊆ dom ri0, kx.toSet ⊆ dom ri0 ⊦ dups(log0), dups(kx), dups(ax), inodekey(0) ∈ ri0, ri-closed(ri0[kx, ax], fs0[ax, fs0[ri0[kx]]] \ as, ro) ∧ replay-cons-strong(fs0[ax, fs0[ri0[kx]]] \ as, ri0[kx, ax], ro, fi, fo, log0 + ax) ∧ file-node-cons(fs0[ax, fs0[ri0[kx]]] \ as, ri0[kx, ax]) ∧ orphans-cons(fs0[ax, fs0[ri0[kx]]] \ as, ri0[kx, ax], ro)
Used simplifier rules: unc: ⊦ ks ∪ ks0 = ks0 ∪ ks; from specification set-union[node-index]%una: ⊦ (ks ∪ ks0) ∪ ks1 = ks ∪ ks0 ∪ ks1; from specification set-union[node-index]% ⊦ ks ⊆ ks0 → ks ⊆ ks0 ∪ ks1; (s)%a: ⊦ (ax + ax0) + ax1 = ax + ax0 + ax1; from specification list[address-list-set]%⊦ new(ax, fs) ∧ ¬ dups(ax) ∧ ¬ dups(log) ∧ log-cons(log, fs) → (dups(log + ax) ↔ false); (s)% ⊦ kx.toSet ⊆ dom ri ∧ ¬ key ∈ ri → ¬ key ∈ kx; (s)% ⊦ # kx = # ax → (key ∈ ri[kx, ax] ↔ key ∈ ri ∨ key ∈ kx); (ws)