| ro.inodes?, fo.inodes?, log-cons(log, fs), node-cons(nd.key, nd), ri-cons(ri, fs), ri-inj(ri), ri-inj(fi) ⊦ ⟪aubifs_core_journal_add1#(nd, ri, fi, ro, fo; adr, fs, log; boolvar, err)⟫ (log-cons(log, fs) ∧ ri-cons(ri, fs)) |
fo.inodes?, ro.inodes?, log-cons(log, fs), node-cons(nd.key, nd), ri-cons(ri, fs), ri-inj(fi), ri-inj(ri) ⊦ ⟪if ri-cons(ri, fs) ∧ node-cons(nd.key, nd) then { choose adr1 with new(adr1 ', fs) ∧ ¬ dups(adr1 ') in {adr := adr1; fs[adr] := nd, log := log + adr, err := ESUCCESS} ifnone err := ENOSPC or {fail#(; ; err); adr := ?}; boolvar := ?} else abort⟫ (log-cons(log, fs) ∧ ri-cons(ri, fs))
Used simplifier rules: add1: ⊦ ;