| remove-refsize0(gstore2) = gstore2, remove-refsize0(istore1) = istore1, elems nx0 ∩ ginval0 = ∅, dom gstore2 ∪ elems nx0 = dom gstore0 ∪ ginval0, btree-inv(rp, adr1, istore2, istore1, zh, fi, fi0), inv(gstore0 \ ginval0), inv(gstore2), inv(istore2), inv(istore1), ri-inj(fi), ri-inj(fi0), @(m, m0, m1) ∈ gstore0, istore1 ⊑ istore2, ¬ dups(nx0), ¬ m ∈ ginval0, pstate.journal? → nx0 ≠ [] ∧ pstate.lnum = nx0.last ∧ pstate.lnum ∈ gstore0, pstate.index? → pstate.lnum ∈ istore2, pstate = unbuffered → syn0 ⊦ ⟨index_read_gnd#(@(m, m0, m1), fi, fi0, ginval0, gstore0, gstore2, nx0, maxino0, ginval2, syn0; gnd0; err1)⟩ (gstore0[@(m, m0, m1)] = gnd0 ∧ ESUCCESS = err1) |
syn ↔ syn0, adr = @(m, m0, m1), fi = fi1, fi0 = fi2, ginval = ginval2, gnd = gnd0, gstore = gstore2, maxino = maxino0, nx = nx0, remove-refsize0(istore1) = istore1, remove-refsize0(gstore2) = gstore2, elems nx0 ∩ ginval0 = ∅, dom gstore2 ∪ elems nx0 = dom gstore0 ∪ ginval0, btree-inv(rp, adr1, istore2, istore1, zh, fi2, fi1), inv(istore1), inv(istore2), inv(gstore2), inv(gstore0 \ ginval0), ri-inj(fi1), ri-inj(fi2), @(m, m0, m1) ∈ gstore0, istore1 ⊑ istore2, pstate = unbuffered → syn0, pstate.index? → pstate.lnum ∈ istore2, pstate.journal? → nx0 ≠ [] ∧ pstate.lnum = nx0.last ∧ pstate.lnum ∈ gstore0 ⊦ ⟨if adr ∈ gstore0 ∧ ¬ adr.lnum ∈ ginval0 then {fail_or_success#(; ; err); if err = ESUCCESS then gnd := gstore0[adr] else gnd := ?} else abort⟩ (gstore0[@(m, m0, m1)] = gnd ∧ ESUCCESS = err), dups(nx0), m ∈ ginval0
Used simplifier rules: index_read_gnd# (ADR, PRI, PFI, PINVAL, PSTORE, PSTORE0, PNL, PMAXINO, P_OS, ISYNCED ; GND ; ERR ) {if ADR ∈ PSTORE ∧ ¬ ADR.lnum ∈ PINVAL then {fail_or_success#(; ; ERR); if ERR = ESUCCESS then GND := PSTORE[ADR] else GND := ?} else abort };