| boolvar, fi0 = fi, fo0 = fo, fs0 = fs, log0 = log, ro.inodes?, fo.inodes?, log-cons(log, fs), ri-cons(ri, fs), ri-inj(ri), ri-inj(fi) ⊦ ⟨if ri-cons(ri, fs) then { {choose as with as ∩ range ri = ∅ in fi := ri, fo := ro, fs := fs \ as, log := [], err := ESUCCESS; boolvar := true} or {fail#(; ; err); boolvar := ?}} else abort⟩ (boolvar ∧ fi0 = fi ∧ fo0 = fo ∧ fs0 = fs ∧ log0 = log) |
boolvar, fi0 = fi, fo0 = fo, fs0 = fs, log0 = log, fo.inodes?, ro.inodes?, log-cons(log, fs), ri-cons(ri, fs), ri-inj(fi), ri-inj(ri) ⊦ ⟨ {choose as with as ∩ range ri = ∅ in fi := ri, fo := ro, fs := fs \ as, log := [], err := ESUCCESS; boolvar := true} or {fail#(; ; err); boolvar := ?}⟩ (boolvar ∧ fi0 = fi ∧ fo0 = fo ∧ fs0 = fs ∧ log0 = log)
Used simplifier rules: ⊦ ri-cons(ri, fs) → ( ri-cons(ri0, fs0) ↔ (∀ key. (key ∈ ri → ri[key] ∈ fs ∧ key-cons(key, fs[ri[key]])) → key ∈ ri0 → ri0[key] ∈ fs0 ∧ key-cons(key, fs0[ri0[key]]))); (ss)