| ro.inodes?, fo.inodes?, log-cons(log, fs), new(adr1 ', fs), node-cons(nd.key, nd), ri-cons(ri, fs), ri-inj(ri), ri-inj(fi) ⊦ ⟪adr := adr1; fs[adr] := nd, log := log + adr, err := ESUCCESS; boolvar := ?⟫ (log-cons(log, fs) ∧ ri-cons(ri, fs)), dups(adr1 ') |
fo.inodes?, ro.inodes?, log-cons(log, fs), node-cons(nd.key, nd), ri-cons(ri, fs), ri-inj(fi), ri-inj(ri), ¬ adr1 ∈ fs ⊦ ⟪adr := adr1; fs[adr] := nd, log := log + adr ', err := ESUCCESS; boolvar := ?⟫ (log-cons(log, fs) ∧ ri-cons(ri, fs))
Used simplifier rules: ⊦ ax + adr = ax + adr '; (s)% ⊦ ¬ dups(adr '); (s)% ⊦ new(adr ', fs) ↔ ¬ adr ∈ fs; (s)