| nd.nlink = 0, boolvar ↔ boolvar0, err = ESUCCESS, nd = fs[adr], ri0 = ri, nd.inode?, node-cons(fs[adr].key, fs[adr]), adr ∈ fs ⊦ ⟪aubifs_core_index_truncate#(nd.key, 0, fi, ro, fo, fs, log, boolvar0; ri); if err = ESUCCESS then aubifs_core_index_remove#(nd.key, fi, ro, fo, fs, log, boolvar0; ri); if nd.dentry? then if nd.ino ≠ 0 then aubifs_core_index_store#(nd.key, adr, fi, ro, fo, fs, log, boolvar0; ri) else aubifs_core_index_remove#(nd.key, fi, ro, fo, fs, log, boolvar0; ri); if nd.data? then {let key = inodekey(nd.key.ino) in aubifs_core_index_contains#(key, ri, fi, ro, fo, fs, log, boolvar0; boolvar; err); if err = ESUCCESS ∧ boolvar then aubifs_core_index_store#(nd.key, adr, fi, ro, fo, fs, log, boolvar0; ri)}; if nd.trunc? then aubifs_core_index_truncate#(nd.key, nd.size, fi, ro, fo, fs, log, boolvar0; ri)⟫ ((err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → ri = replay-one(adr, fs[adr], ri0))), nd.key.ino = ROOT_INO, nd.directory, adr ∈ ri |
fs[adr].nlink = 0, ri0 = ri, fs[adr].key.ino ≠ ROOT_INO, fs[adr].inode?, node-cons(fs[adr].key, fs[adr]), adr ∈ fs, ¬ fs[adr].directory, ¬ adr ∈ ri ⊦ ⟪aubifs_core_index_truncate#(fs[adr].key, 0, fi, ro, fo, fs, log, boolvar0; ri); nd := fs[adr]; err := ESUCCESS; if err = ESUCCESS then aubifs_core_index_remove#(nd.key, fi, ro, fo, fs, log, boolvar0; ri); if nd.dentry? then if nd.ino ≠ 0 then aubifs_core_index_store#(nd.key, adr, fi, ro, fo, fs, log, boolvar0; ri) else aubifs_core_index_remove#(nd.key, fi, ro, fo, fs, log, boolvar0; ri); boolvar := boolvar0; if nd.data? then {let key = inodekey(nd.key.ino) in aubifs_core_index_contains#(key, ri, fi, ro, fo, fs, log, boolvar0; boolvar; err); if err = ESUCCESS ∧ boolvar then aubifs_core_index_store#(nd.key, adr, fi, ro, fo, fs, log, boolvar0; ri)}; if nd.trunc? then aubifs_core_index_truncate#(nd.key, nd.size, fi, ro, fo, fs, log, boolvar0; ri)⟫ ((err = ESUCCESS ∨ ⌊err⌋ ) ∧ (err = ESUCCESS → ri = replay-one(adr, fs[adr], ri0)))