| # links(m, cache_dirs) = cache_dirs[m].nlink, cache_files[entries[str]] = mkfile(m1, md3, # links(entries[str], cache_dirs), content), ((cache_files ⊕ cache_pcache) ⊕ cache_icache)[entries[str]] = mkfile(m7, md2, # links(entries[str], cache_dirs), content0), cache_dirs[m] = mkdir(cache_dirs[m].size, md4, cache_dirs[m].nlink, cache_dirs[m].nsubdirs, entries), entries[str] = cache_dirs[m].entries[str], p_ino = m, afs-cons(cache_dirs, (cache_files ⊕ cache_pcache) ⊕ cache_icache), afs-cons(cache_dirs, cache_files), dcache-cons(cache_dcache, cache_dirs, cache_files), icache-cons(cache_icache, cache_dirs, cache_files), pcache-cons(cache_pcache, cache_dirs, cache_files), synced(cache_dirs, cache_icache, cache_pcache), entries[str] ∈ cache_files, m ∈ cache_dirs, str ∈ entries, str ∈ cache_dirs[m].entries, ⌊err0⌋ , cache_sync → synced(cache_files, cache_icache, cache_pcache), links(m, cache_dirs) ≠ ∅ ∨ m = ROOT_INO ⊦ ⟨fail#(; ; err); asynced := ?⟩ ((asynced ↔ asynced0) ∧ err0 = err), str ∈ entries ∧ str ∈ entries ∧ cache_dirs[p_ino, cache_dirs[p_ino].entries:= (cache_dirs[p_ino].entries -- mkdentry(str, entries[str]).name)][p_ino].size ≥ 1 ∧ str ∈ entries |
# links(m, cache_dirs) = cache_dirs[m].nlink, cache_dirs[m].size = 0, entries[str] = cache_dirs[m].entries[str], cache_dirs[m] = mkdir(0, md4, cache_dirs[m].nlink, cache_dirs[m].nsubdirs, entries), ((cache_files ⊕ cache_pcache) ⊕ cache_icache)[entries[str]] = mkfile(m7, md2, # links(entries[str], cache_dirs), content0), cache_files[entries[str]] = mkfile(m1, md3, # links(entries[str], cache_dirs), content), afs-cons(cache_dirs, cache_files), afs-cons(cache_dirs, (cache_files ⊕ cache_pcache) ⊕ cache_icache), dcache-cons(cache_dcache, cache_dirs, cache_files), icache-cons(cache_icache, cache_dirs, cache_files), pcache-cons(cache_pcache, cache_dirs, cache_files), synced(cache_dirs, cache_icache, cache_pcache), str ∈ cache_dirs[m].entries, str ∈ entries, m ∈ cache_dirs, entries[str] ∈ cache_files, ⌊err0⌋ , cache_sync → synced(cache_files, cache_icache, cache_pcache), links(m, cache_dirs) ≠ ∅ ∨ m = ROOT_INO ⊦ ⟨fail#(; ; err); asynced := ?⟩ ((asynced ↔ asynced0) ∧ err0 = err)
Used simplifier rules: ⊦ m < 1 ↔ m = 0; (s)% ⊦ m ≤ n ↔ ¬ n < m; (ss)% ⊦ n ≥ m ↔ m ≤ n; (s)% ⊦ (ad.entries:= entries).size = ad.size; (s)% ⊦ dirs[ino, ad][ino0] = (ino0 = ino ∧ ino ∈ dirs ⊃ ad;dirs[ino0]); (s)% ⊦ mkdentry(str, m).name = str; (s)