| ⟨afs_create_ino#(m, md, ino0; dent, err, dirs1, files1)⟩ (dent = dent0 ∧ err = err0 ∧ dirs1 = dirs0 ∧ files1 = files0), dirs1[m] = mkdir(m0, md2, # links(m, dirs1), m2, entries0), dent = negdentry(str), # links(m, dirs1) ≠ 0, ino0 ≠ 0, links(m, dirs1) ≠ ∅, m ≠ ROOT_INO, afs-cons(dirs0, files0), afs-cons(dirs1, files1), afs-cons(dirs0, files0[m, (files0[m].size:= m0).meta:= md0]), m ∈ dirs1, m ∈ files0, ¬ dent0.dentry?, ¬ str ∈ entries0, ¬ ino0 ∈ files1, ¬ ino0 ∈ dirs1 ⊦ |
⟨dirs[p_ino].entries[dent.name] := ino; dirs[p_ino].size := dirs[p_ino].size + 1; files := files ++ ino; files[ino] := mkfile(0, md, 1, ∅); dent := mkdentry(dent.name, ino); err := ESUCCESS⟩ (dent = dent0 ∧ err = err0 ∧ dirs = dirs0 ∧ files = files0), dirs1[m] = mkdir(m0, md2, # links(m, dirs1), m2, entries0), dent = negdentry(str), dirs = dirs1, files = files1, ino = ino0, p_ino = m, afs-cons(dirs0, files0[m, (files0[m].size:= m0).meta:= md0]), afs-cons(dirs1, files1), afs-cons(dirs0, files0), m ∈ files0, m ∈ dirs1 ⊦ # links(m, dirs1) = 0, ino0 = 0, links(m, dirs1) = ∅, m = ROOT_INO, dent0.dentry?, str ∈ entries0, ino0 ∈ files1, ino0 ∈ dirs1
Used simplifier rules: create-ino: ⊦ ;