| dirs = abs-dirs(fs, ri), err = err1, files = abs-files(fs, ri), inode = mkinode(m, md, boolvar0, m0, m1, m2), fs[ri[inodekey(m)]].directory, orphans(fs, ri).inodes?, fo.inodes?, afs-cons(abs-dirs(fs, ri), abs-files(fs, ri)), file-node-cons(fs, ri), log-cons(log, fs), orphans-cons(fs, ri, orphans(fs, ri)), replay-cons-strong(fs, ri, orphans(fs, ri), fi, fo, log), ri-inj(ri), ri-inj(fi), ubifs-cons(fs, ri, orphans(fs, ri), fi, fo, log), inodekey(m) ∈ ri, asynced → boolvar ⊦ ⟨if pre-readdir(inode.ino, dirs, files) then {{strings0 := dom dirs[inode.ino].entries; err := ESUCCESS} or {choose strings with true in strings0 := strings; fail#(; ; err)}} else abort⟩ ((asynced → boolvar) ∧ dentries(inodekey(m), ri) = strings0 ∧ ESUCCESS = err) |
dirs = abs-dirs(fs, ri), err = err1, files = abs-files(fs, ri), inode = mkinode(m, md, boolvar0, m0, m1, m2), fs[ri[inodekey(m)]].directory, fo.inodes?, orphans(fs, ri).inodes?, afs-cons(abs-dirs(fs, ri), abs-files(fs, ri)), file-node-cons(fs, ri), log-cons(log, fs), orphans-cons(fs, ri, orphans(fs, ri)), replay-cons-strong(fs, ri, orphans(fs, ri), fi, fo, log), ri-inj(fi), ri-inj(ri), ubifs-cons(fs, ri, orphans(fs, ri), fi, fo, log), inodekey(m) ∈ ri, asynced → boolvar ⊦ ⟨{strings0 := dom dirs[inode.ino].entries; err := ESUCCESS} or {choose strings with true in strings0 := strings; fail#(; ; err)}⟩ ((asynced → boolvar) ∧ dentries(inodekey(m), ri) = strings0 ∧ ESUCCESS = err)
Used simplifier rules: ⊦ mkinode(m, md, boolvar, m0, m1, m2).ino = m; (s)% ⊦ pre-readdir(ino, dirs, files) ↔ valid-dir-ino(ino, dirs, files); (s)% ⊦ valid-dir-ino(ino, dirs, files) ↔ ino ∈ dirs; (s)%⊦ ino ∈ abs-dirs(fs, ri) ↔ inodekey(ino) ∈ ri ∧ fs[ri[inodekey(ino)]].directory; (s)