| adr = adr0, ginval = ginval2, ginval0 = ginval1, gstore1 = crash(gstore, gstore0, ginval1, nx), istore = istore1, istore0 = istore2, maxino = maxino0, pstate = journal(nx.last), remove-refsize0(gstore0) = gstore0, remove-refsize0(istore1) = istore1, syn, elems nx ∩ ginval1 = ∅, dom gstore0 ∪ elems nx = dom gstore ∪ ginval1, inv(gstore \ ginval1), inv(gstore0), inv(istore2), inv(istore1), inv(gstore[nx.last]), nx.last ∈ gstore, istore1 ⊑ istore2 ⊦ ⟨if pstate.journal? ∨ pstate = readonly then if pstate = readonly then err0 := EROFS else {choose lax, err with (⌊err⌋ ∨ err = ESUCCESS) ∧ ¬ dups(gstore[pstate.lnum].ladrlist + lax) ∧ # lax ≤ # gndx ∧ inv-flashsize(prefixn(# lax, gndx), lax) ∧ (err = ESUCCESS ↔ # lax = # gndx) in {ax := lax.to-adr(pstate.lnum), err0 := err; gstore[pstate.lnum].gndlist := gstore[pstate.lnum].gndlist + prefixn(# lax, gndx); gstore[pstate.lnum].ladrlist := gstore[pstate.lnum].ladrlist + lax; if err0 ≠ ESUCCESS then ax := ?, pstate := readonly}; syn := ?} else abort⟩ (syn ∧ gstore1 = crash(gstore, gstore0, ginval1, nx)), nx = [], dups(nx) |
adr = adr0, ginval = ginval2, ginval0 = ginval1, gstore1 = crash(gstore, gstore0, ginval1, nx), istore = istore1, istore0 = istore2, maxino = maxino0, pstate = journal(nx.last), remove-refsize0(istore1) = istore1, remove-refsize0(gstore0) = gstore0, syn, elems nx ∩ ginval1 = ∅, dom gstore0 ∪ elems nx = dom gstore ∪ ginval1, inv(gstore[nx.last]), inv(istore1), inv(istore2), inv(gstore0), inv(gstore \ ginval1), nx.last ∈ gstore, istore1 ⊑ istore2 ⊦ ⟨if pstate = readonly then err0 := EROFS else {choose lax, err with (⌊err⌋ ∨ err = ESUCCESS) ∧ ¬ dups(gstore[pstate.lnum].ladrlist + lax) ∧ # lax ≤ # gndx ∧ inv-flashsize(prefixn(# lax, gndx), lax) ∧ (err = ESUCCESS ↔ # lax = # gndx) in {ax := lax.to-adr(pstate.lnum), err0 := err; gstore[pstate.lnum].gndlist := gstore[pstate.lnum].gndlist + prefixn(# lax, gndx); gstore[pstate.lnum].ladrlist := gstore[pstate.lnum].ladrlist + lax; if err0 ≠ ESUCCESS then ax := ?, pstate := readonly}; syn := ?}⟩ (syn ∧ gstore1 = crash(gstore, gstore0, ginval1, nx)), nx = [], dups(nx)
Used simplifier rules: ⊦ journal(m).journal?; (s)