| isdir ↔ isdir0, ino = LEB_SIZE ⊦ ⟪if ino = LEB_SIZE then { {dirs := ∅, files := ∅; dirs := dirs ++ ROOT_INO; dirs[ROOT_INO] := mkdir(0, md, 0, 0, ∅); asynced := true; err := ESUCCESS} or {dirs := ?, files := ?, asynced := ?; fail#(; ; err)}} else abort⟫ ( ( err = ESUCCESS → ⟨posix_format#(n, isdir0, LEB_SIZE, md; ; root, fs0, ofh0, psynced, err0)⟩ (ofh0 = ∅ ∧ fs0 = abs-files(files) ∧ abs(root, ROOT_INO)(dirs) ∧ (psynced → asynced) ∧ ESUCCESS = err0)) ∧ ( err ≠ ESUCCESS → (∀ tree, fs, ofh, isdir. ⟨posix_format#(n, isdir0, LEB_SIZE, md; ; root, fs0, ofh0, psynced, err0)⟩ (tree = root ∧ fs = fs0 ∧ ofh = ofh0 ∧ (isdir ↔ psynced) ∧ err = err0)))) |
isdir ↔ isdir0, ino = LEB_SIZE ⊦ ⟪ {dirs := ∅, files := ∅; dirs := dirs ++ ROOT_INO; dirs[ROOT_INO] := mkdir(0, md, 0, 0, ∅); asynced := true; err := ESUCCESS} or {dirs := ?, files := ?, asynced := ?; fail#(; ; err)}⟫ ( ( err = ESUCCESS → ⟨posix_format#(n, isdir0, LEB_SIZE, md; ; root, fs0, ofh0, psynced, err0)⟩ (ofh0 = ∅ ∧ fs0 = abs-files(files) ∧ abs(root, ROOT_INO)(dirs) ∧ (psynced → asynced) ∧ ESUCCESS = err0)) ∧ ( err ≠ ESUCCESS → (∀ tree, fs, ofh, isdir. ⟨posix_format#(n, isdir0, LEB_SIZE, md; ; root, fs0, ofh0, psynced, err0)⟩ (tree = root ∧ fs = fs0 ∧ ofh = ofh0 ∧ (isdir ↔ psynced) ∧ err = err0))))