| jvalid ↔ key ∈ fi, fi = ri, fi0 = fi1, gstore = gstore1, gstore0 = gstore2, jro = jro0, ¬ jvalid, remove-refsize0(gstore1) = gstore1, elems nx ∩ jro0 = ∅, dom gstore1 ∪ elems nx = dom gstore2 ∪ jro0, p_os.keys.inodes?, jro1.keys.inodes?, fi1.inos < pmaxino, ri.inos < jmaxino, p_os < pmaxino, jro1 < jmaxino, inv(gstore1), inv(gstore2 \ jro0), log-cons(abs-log(nx, gstore2 ↓), nodes(gstore2 ↓, jro0)), refsize-cons(gstore1, range fi1), refsize-cons(gstore2, range ri), ri-inj(fi1), ri-inj(ri), pmaxino ≤ jmaxino, fi1.lebs ⊆ dom gstore1, ri.lebs ⊆ dom gstore2, jvalid1 ∧ nx ≠ [] → valid-journal-head(nx, gstore2, jro0), jvalid2 → jvalid0 ⊦ ⟪log := abs-log(nx, gstore2 ↓); fs := nodes(gstore2 ↓, jro0); if jvalid then let n = ? in {index_get_gblock_refsize#(adr.lnum, fi, fi1, jro0, gstore2, gstore1, nx, pmaxino, p_os, jvalid0; ; n); index_set_gblock_refsize#(adr.lnum, n - adr.size, fi, fi1, jro0, gstore1, nx, pmaxino, p_os, jvalid0; gstore2)}⟫ ⟨aubifs_core_index_remove#(key, fi1, jro1.keys, p_os.keys, fs, log, jvalid2; ri)⟩ (fi = ri ∧ log = abs-log(nx, gstore2 ↓) ∧ fs = nodes(gstore2 ↓, jro0) ∧ (jvalid2 → jvalid0)), jmaxino = 0, pmaxino = 0, dups(nx) |
jvalid ↔ key ∈ fi, fi = ri, fi0 = fi1, gstore = gstore1, gstore0 = gstore2, jro = jro0, ¬ jvalid, log = abs-log(nx, gstore2 ↓), remove-refsize0(gstore1) = gstore1, elems nx ∩ jro0 = ∅, dom gstore1 ∪ elems nx = dom gstore2 ∪ jro0, jro1.keys.inodes?, p_os.keys.inodes?, jro1 < jmaxino, p_os < pmaxino, ri.inos < jmaxino, fi1.inos < pmaxino, inv(gstore2 \ jro0), inv(gstore1), log-cons(abs-log(nx, gstore2 ↓), nodes(gstore2 ↓, jro0)), refsize-cons(gstore2, range ri), refsize-cons(gstore1, range fi1), ri-inj(ri), ri-inj(fi1), pmaxino ≤ jmaxino, ri.lebs ⊆ dom gstore2, fi1.lebs ⊆ dom gstore1, jvalid2 → jvalid0, jvalid1 ∧ nx ≠ [] → valid-journal-head(nx, gstore2, jro0) ⊦ ⟪fs := nodes(gstore2 ↓, jro0); if jvalid then let n = ? in {index_get_gblock_refsize#(adr.lnum, fi, fi1, jro0, gstore2, gstore1, nx, pmaxino, p_os, jvalid0; ; n); index_set_gblock_refsize#(adr.lnum, n - adr.size, fi, fi1, jro0, gstore1, nx, pmaxino, p_os, jvalid0; gstore2)}⟫ ⟨aubifs_core_index_remove#(key, fi1, jro1.keys, p_os.keys, fs, log, jvalid2; ri)⟩ (fi = ri ∧ log = abs-log(nx, gstore2 ↓) ∧ fs = nodes(gstore2 ↓, jro0) ∧ (jvalid2 → jvalid0)), jmaxino = 0, pmaxino = 0, dups(nx)