| # links (entries[str], dirs0[m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0] [m0, (m0 = m ⊃ mkdir(m1 + 1, md0, m4, m6, entries1[str0, entries[str]]);mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])).meta:= md1 ]) = # links(entries[str], dirs0), (m0 = m ⊃ mkdir(m2, md3, # links(m, dirs0), m5, entries -- str);mkdir(m7, md4, # links(m0, dirs0), m9, entries2)) = mkdir(m1, md2, m4, m6, entries1), ( m ∈ dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] ⊃ mkinode (m, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m ] .meta, true, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m ] .nlink, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m ] .nsubdirs, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m ] .size) ;mkinode(m, files[m].meta, false, files[m].nlink, 0, files[m].size) ) = mkinode(m8, md5, boolvar, m10, m11, m12), dirs0[m0] = mkdir(m7, md4, # links(m0, dirs0), m9, entries2), files[entries[str]] = mkfile(m3, md, # links(entries[str], dirs0), content0), dirs0[m] = mkdir(m2 + 1, md3, # links(m, dirs0), m5, entries), err = ESUCCESS, afs-cons (dirs0[m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0] [m0, (m0 = m ⊃ mkdir(m1 + 1, md0, m4, m6, entries1[str0, entries[str]]);mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])).meta:= md1 ], files), afs-cons(dirs0, files), dcache-cons(dcache, dirs0, files), icache-cons(icache, dirs0, files), pcache-cons(pcache, dirs0, files), synced(dirs0, icache, pcache), m ∈ dirs0, m0 ∈ dirs0, entries[str] ∈ files, str ∈ entries, m0 = m → md1 = md0, asynced2 → synced(files, icache, pcache), links(m0, dirs0) ≠ ∅ ∨ m0 = ROOT_INO, links(m, dirs0) ≠ ∅ ∨ m = ROOT_INO ⊦ ⟪icache_set# (( m ∈ dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] ⊃ mkinode (m, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m ] .meta, true, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m ] .nlink, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m ] .nsubdirs, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m ] .size) ;mkinode(m, files[m].meta, false, files[m].nlink, 0, files[m].size) ), false ; err, icache); icache_set# (( m0 ∈ dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] ⊃ mkinode (m0, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .meta, true, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .nlink, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .nsubdirs, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .size) ;mkinode(m0, files[m0].meta, false, files[m0].nlink, 0, files[m0].size) ), false ; err, icache); skip; dcache_delete#(m8, mkdentry(str, entries[str]).name; err, dcache); dcache_set# (( m0 ∈ dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] ⊃ mkinode (m0, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .meta, true, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .nlink, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .nsubdirs, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .size) ;mkinode(m0, files[m0].meta, false, files[m0].nlink, 0, files[m0].size) ) .ino, mkdentry(str0, mkdentry(str, entries[str]).ino).name, mkdentry(str0, mkdentry(str, entries[str]).ino) ; err, dcache)⟫ ( icache-cons (icache, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, (m0 = m ⊃ mkdir(m1 + 1, md0, m4, m6, entries1[str0, entries[str]]);mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])).meta:= md1 ], files) ∧ dcache-cons (dcache, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, (m0 = m ⊃ mkdir(m1 + 1, md0, m4, m6, entries1[str0, entries[str]]);mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])).meta:= md1 ], files) ∧ pcache-cons (pcache, dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, (m0 = m ⊃ mkdir(m1 + 1, md0, m4, m6, entries1[str0, entries[str]]);mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])).meta:= md1 ], files) ∧ synced (dirs0 [m, (m = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m, dirs0), m5, entries -- str)).meta:= md0 ] [m0, (m0 = m ⊃ mkdir(m1 + 1, md0, m4, m6, entries1[str0, entries[str]]);mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])).meta:= md1 ], icache, pcache) ∧ (asynced2 → synced(files, icache, pcache))), entries[str] ∈ dirs0, str0 ∈ entries2 |
# links (entries[str], dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, (m0 = m8 ⊃ mkdir(m1 + 1, md0, m4, m6, entries1[str0, entries[str]]);mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])).meta:= md1 ]) = # links(entries[str], dirs0), (m0 = m8 ⊃ mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str);mkdir(m7, md4, # links(m0, dirs0), m9, entries2)) = mkdir(m1, md2, m4, m6, entries1), dirs0[m0] = mkdir(m7, md4, # links(m0, dirs0), m9, entries2), files[entries[str]] = mkfile(m3, md, # links(entries[str], dirs0), content0), dirs0[m8] = mkdir(m2 + 1, md3, # links(m8, dirs0), m5, entries), err = ESUCCESS, afs-cons (dirs0[m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0] [m0, (m0 = m8 ⊃ mkdir(m1 + 1, md0, m4, m6, entries1[str0, entries[str]]);mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])).meta:= md1 ], files), afs-cons(dirs0, files), dcache-cons(dcache, dirs0, files), icache-cons(icache, dirs0, files), pcache-cons(pcache, dirs0, files), synced(dirs0, icache, pcache), m8 ∈ dirs0, m0 ∈ dirs0, entries[str] ∈ files, str ∈ entries, ¬ entries[str] ∈ dirs0, ¬ str0 ∈ entries2, m0 = m8 → md1 = md0, asynced2 → synced(files, icache, pcache), links(m0, dirs0) ≠ ∅ ∨ m0 = ROOT_INO, links(m8, dirs0) ≠ ∅ ∨ m8 = ROOT_INO ⊦ ⟪icache_set# (mkinode (m8, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m8 ] .meta, true, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m8 ] .nlink, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m8 ] .nsubdirs, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)) .meta:= md0 ] [m0 ] .meta:= md1 ] [m8 ] .size), false ; err, icache); icache_set# (( m0 ∈ dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]) ;mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str) ) .meta:= md0 ] [m0 ] .meta:= md1 ] ⊃ mkinode (m0, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]) ;mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str) ) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .meta, true, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]) ;mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str) ) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .nlink, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]) ;mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str) ) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .nsubdirs, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]) ;mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str) ) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .size) ;mkinode(m0, files[m0].meta, false, files[m0].nlink, 0, files[m0].size) ), false ; err, icache); skip; dcache_delete#(m8, mkdentry(str, entries[str]).name; err, dcache); dcache_set# (( m0 ∈ dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]) ;mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str) ) .meta:= md0 ] [m0 ] .meta:= md1 ] ⊃ mkinode (m0, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]) ;mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str) ) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .meta, true, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]) ;mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str) ) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .nlink, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]) ;mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str) ) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .nsubdirs, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, dirs0[m0, mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])] [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]) ;mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str) ) .meta:= md0 ] [m0 ] .meta:= md1 ] [m0 ] .size) ;mkinode(m0, files[m0].meta, false, files[m0].nlink, 0, files[m0].size) ) .ino, mkdentry(str0, mkdentry(str, entries[str]).ino).name, mkdentry(str0, mkdentry(str, entries[str]).ino) ; err, dcache)⟫ ( icache-cons (icache, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, (m0 = m8 ⊃ mkdir(m1 + 1, md0, m4, m6, entries1[str0, entries[str]]);mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])).meta:= md1 ], files) ∧ dcache-cons (dcache, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, (m0 = m8 ⊃ mkdir(m1 + 1, md0, m4, m6, entries1[str0, entries[str]]);mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])).meta:= md1 ], files) ∧ pcache-cons (pcache, dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, (m0 = m8 ⊃ mkdir(m1 + 1, md0, m4, m6, entries1[str0, entries[str]]);mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])).meta:= md1 ], files) ∧ synced (dirs0 [m8, (m8 = m0 ⊃ mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]]);mkdir(m2, md3, # links(m8, dirs0), m5, entries -- str)).meta:= md0 ] [m0, (m0 = m8 ⊃ mkdir(m1 + 1, md0, m4, m6, entries1[str0, entries[str]]);mkdir(m1 + 1, md2, m4, m6, entries1[str0, entries[str]])).meta:= md1 ], icache, pcache) ∧ (asynced2 → synced(files, icache, pcache)))
Used simplifier rules: afs-cons-file-nlink: ⊦ afs-cons(dirs, files) ∧ ino ∈ files ∧ files[ino] = mkfile(m, md, n, content) → # links(ino, dirs) = n; (forward) from specification afs-base%⊦ mkinode(m, md, boolvar, m0, m1, m2) = mkinode(m3, md0, boolvar0, m4, m5, m6) ↔ m = m3 ∧ md = md0 ∧ (boolvar ↔ boolvar0) ∧ m0 = m4 ∧ m1 = m5 ∧ m2 = m6; (ws)%⊦ mkdir(m, md, m0, m1, entries).meta:= md0 = mkdir(m, md0, m0, m1, entries); (s)% ⊦ ino ∈ dirs[ino0, ad] ↔ ino ∈ dirs; (s)% ⊦ dirs[ino, ad][ino0] = (ino0 = ino ∧ ino ∈ dirs ⊃ ad;dirs[ino0]); (s)