| # links(m0, dirs0) = m8, dirs0[m0] = mkdir(m6, md6, m8, 0, entries1), dirs0[m] = mkdir(m4, md3, # links(m, dirs0), m7, entries0), dirs0[entries0[str]] = mkdir(m2, md0, # links(entries0[str], dirs0), m5, ∅), dirs0[entries1[str0]] = mkdir(m1, md, # links(entries1[str0], dirs0), m3, entries2), entries1[str0] = entries[str0], dirs0[m0] = mkdir(m6, md4, m8, m9, entries), m9 = 0, afs-cons(dirs0, files), entries1[str0] ∈ dirs0, m0 ∈ dirs0, m ∈ dirs0, entries0[str] ∈ dirs0, str0 ∈ entries1, str ∈ entries0, str0 ∈ entries, 1 ≤ m6, m = m0 → md1 = md2, links(m0, dirs0) ≠ ∅ ∨ m0 = ROOT_INO, links(m, dirs0) ≠ ∅ ∨ m = ROOT_INO ⊦ entries0[str] = ROOT_INO, m6 = 0, m0 = m ∧ mkdentry(str, entries0[str]) = mkdentry(str0, entries1[str0]) |
dirs0[entries[str0]] = mkdir(m1, md, # links(entries[str0], dirs0), m3, entries2), dirs0[entries0[str]] = mkdir(m2, md0, # links(entries0[str], dirs0), m5, ∅), dirs0[m] = mkdir(m4, md3, # links(m, dirs0), m7, entries0), dirs0[m0] = mkdir(m6, md4, # links(m0, dirs0), 0, entries), afs-cons(dirs0, files), str ∈ entries0, str0 ∈ entries, entries0[str] ∈ dirs0, m ∈ dirs0, m0 ∈ dirs0, entries[str0] ∈ dirs0, 1 ≤ m6, m = m0 → md1 = md2, links(m, dirs0) ≠ ∅ ∨ m = ROOT_INO, links(m0, dirs0) ≠ ∅ ∨ m0 = ROOT_INO ⊦ entries0[str] = ROOT_INO, m6 = 0, m0 = m ∧ mkdentry(str, entries0[str]) = mkdentry(str0, entries[str0])
Used simplifier rules: ⊦ mkdir(m, md, m0, m1, entries) = mkdir(m2, md0, m3, m4, entries0) ↔ m = m2 ∧ md = md0 ∧ m0 = m3 ∧ m1 = m4 ∧ entries = entries0; (ws)%not-zero: 0 < n ⊦ (* n) ≤ m → m ≠ 0; (forward) from specification nat