| afs-cons(dirs, files), of-cons(of, dirs, files) ⊦ ⟪vfs_readdir#(p, user, dirs, files, asynced; strings, err)⟫ true |
⊦
afs-cons(dirs, files), of-cons(of, dirs, files) ⊦ ⟪let ino = ROOT_INO, isdir = true, mode = MODE_R in {vfs_walk#(p, user, dirs, files, asynced; ino, err); if err = ESUCCESS then choose inode with true in {vfs_may_open#(ino, isdir, mode, user, dirs, files, asynced; inode, err); if err = ESUCCESS then afs_readdir#(inode, dirs, files, asynced; strings, err)}}⟫ true
Used simplifier rules: readdir: ⊦ ;