| err = ESUCCESS, err = ESUCCESS → syn ∧ btree-inv(rp, adr, istore0, istore, zh, ri0, fi) ∧ inv(gstore0 \ ginval0) ∧ inv(gstore) ∧ elems nx ∩ ginval0 = ∅ ∧ ¬ dups(nx) ∧ dom gstore ∪ elems nx = dom gstore0 ∪ ginval0 ∧ remove-refsize0(gstore) = gstore ∧ inv(istore0) ∧ inv(istore) ∧ istore ⊑ istore0 ∧ remove-refsize0(istore) = istore ∧ (pstate.journal? → nx ≠ [] ∧ pstate.lnum = nx.last ∧ pstate.lnum ∈ gstore0) ∧ (pstate.index? → pstate.lnum ∈ istore0), err = ESUCCESS → btree-inv(rp, adr, istore0, istore, zh, ∅, ∅) ∧ gstore0 = ∅ ∧ ginval0 = ∅ ∧ maxino = maxino2 ∧ nx = [] ∧ ginval = ∅, err = ESUCCESS ∨ ⌊err⌋ ⊦ ⟨index_format#(maxino3, LEB_SIZE, maxino2; ; fi1, fi2, ginval3, gstore3, gstore4, nx1, maxino5, ginval4, syn1, err0)⟩ ( ginval3 = ginval0 ∧ gstore3 = gstore0 ∧ gstore4 = gstore ∧ nx1 = nx ∧ maxino5 = maxino ∧ ginval4 = ginval ∧ btree-inv(rp, adr, istore0, istore, zh, fi1, fi2) ∧ ri = fi1 ∧ fi3 = fi2 ∧ (syn1 ↔ syn) ∧ ESUCCESS = err0) |
remove-refsize0(istore) = istore, btree-inv(rp, adr, istore0, istore, zh, ∅, ∅), btree-inv(rp, adr, istore0, istore, zh, ri0, fi), inv(istore0), inv(istore), istore ⊑ istore0, ¬ pstate.journal?, pstate.index? → pstate.lnum ∈ istore0 ⊦ ⟨index_format#(maxino3, LEB_SIZE, maxino2; ; fi1, fi2, ginval3, gstore3, gstore4, nx1, maxino5, ginval4, syn1, err0)⟩ ( ginval3 = ∅ ∧ gstore3 = ∅ ∧ gstore4 = ∅ ∧ nx1 = [] ∧ maxino5 = maxino2 ∧ ginval4 = ∅ ∧ btree-inv(rp, adr, istore0, istore, zh, fi1, fi2) ∧ ri = fi1 ∧ fi3 = fi2 ∧ syn1 ∧ ESUCCESS = err0)
Used simplifier rules: ⊦ remove-refsize0(∅) = ∅; (s)% ⊦ ¬ dups([]); (s)% ⊦ inv(∅); (s)% ⊦ ∅ \ ns = ∅; (s)%int-c: ⊦ ns ∩ ns0 = ns0 ∩ ns; from specification set-union[nat-set]%int-a: ⊦ (ns ∩ ns0) ∩ ns1 = ns ∩ ns0 ∩ ns1; from specification set-union[nat-set]% ⊦ ns ∩ ∅ = ∅; (s)% ⊦ dom gstore = ∅ ↔ gstore = ∅; (s)% ⊦ dom ∅ = ∅; (s)%unc: ⊦ ns ∪ ns0 = ns0 ∪ ns; from specification set-union[nat-set]%una: ⊦ (ns ∪ ns0) ∪ ns1 = ns ∪ ns0 ∪ ns1; from specification set-union[nat-set]% ⊦ ns ∪ ∅ = ns; (s)% ⊦ elems [] = ∅; (s)