| fs0 = fs, log0 = log, fo.inodes?, ro.inodes?, log-cons(log, fs), node-cons(nd4.key, nd4), node-cons(nd5.key, nd5), node-cons(nd1.key, nd1), node-cons(nd6.key, nd6), node-cons(nd7.key, nd7), ri-cons(ri, fs), ri-inj(fi), ri-inj(ri) ⊦ (∀ adr1, adr2, adr3, adr4, adr5. ¬(new(adr1 ' + adr2 ' + adr3 ' + (adr4 ' + adr5), fs) ∧ ¬ dups(adr1 ' + adr2 ' + adr3 ' + adr4 ' + adr5 '))) ∧ ⟨err := ENOSPC; boolvar := ?⟩ (boolvar ∧ fs0 = fs ∧ log0 = log), ∃ adr1, adr2, adr3, adr4, adr5. (new(adr1 ' + adr2 ' + adr3 ' + (adr4 ' + adr5), fs) ∧ ¬ dups(adr1 ' + adr2 ' + adr3 ' + adr4 ' + adr5 ')) ∧ ⟨adr8 := adr1, adr7 := adr2, adr6 := adr3, adr0 := adr4, adr := adr5; fs := fs[adr8, nd7][adr7, nd6][adr6, nd1][adr0, nd5][adr, nd4], log := ((((log + adr8) + adr7) + adr6) + adr0) + adr, err := ESUCCESS; boolvar := ?⟩ (boolvar ∧ fs0 = fs ∧ log0 = log), ⟨fail#(; ; err); adr8 := ?, adr7 := ?, adr6 := ?, adr0 := ?, adr := ?; boolvar := ?⟩ boolvar |
ro.inodes?, fo.inodes?, log-cons(log, fs), node-cons(nd7.key, nd7), node-cons(nd6.key, nd6), node-cons(nd1.key, nd1), node-cons(nd5.key, nd5), node-cons(nd4.key, nd4), ri-cons(ri, fs), ri-inj(ri), ri-inj(fi) ⊦ ⟨fail#(; ; err); adr8 := ?, adr7 := ?, adr6 := ?, adr0 := ?, adr := ?; boolvar := ?⟩ boolvar, ( adr ∈ fs ∨ adr0 ∈ fs ∨ adr1 ∈ fs ∨ adr2 ∈ fs ∨ adr3 ∈ fs ∨ adr = adr0 ∨ adr = adr1 ∨ adr = adr2 ∨ adr = adr3 ∨ adr0 = adr1 ∨ adr0 = adr2 ∨ adr0 = adr3 ∨ adr1 = adr2 ∨ adr1 = adr3 ∨ adr2 = adr3) ∧ ⟨err := ENOSPC; boolvar := ?⟩ boolvar, ∃ adr4, adr5, adr9, adr10, adr11. ¬ adr4 ∈ fs ∧ ¬ adr5 ∈ fs ∧ ¬ adr9 ∈ fs ∧ ¬ adr10 ∈ fs ∧ ¬ adr11 ∈ fs ∧ adr4 ≠ adr5 ∧ adr4 ≠ adr9 ∧ adr4 ≠ adr10 ∧ adr4 ≠ adr11 ∧ adr5 ≠ adr9 ∧ adr5 ≠ adr10 ∧ adr5 ≠ adr11 ∧ adr9 ≠ adr10 ∧ adr9 ≠ adr11 ∧ adr10 ≠ adr11 ∧ ⟨adr8 := adr4, adr7 := adr5, adr6 := adr9, adr0 := adr10, adr := adr11; fs1 := fs[adr8, nd7][adr7, nd6][adr6, nd1][adr0, nd5][adr, nd4], log1 := ((((log + adr8 ') + adr7 ') + adr6 ') + adr0 ') + adr ', err := ESUCCESS; boolvar := ?⟩ (boolvar ∧ fs = fs1 ∧ log = log1)
Used simplifier rules: ⊦ dups(adr ' + adr0 ') ↔ adr = adr0; (s)% ⊦ adr ∈ adr0 ' ↔ adr = adr0; (s)% ⊦ adr ∈ adr0 ' + ax ↔ adr = adr0 ∨ adr ∈ ax; (s)% ⊦ dups(adr ' + ax) ↔ adr ∈ ax ∨ dups(ax); (s)% ⊦ new(adr ', fs) ↔ ¬ adr ∈ fs; (s)% ⊦ new(adr ' + log, fs) ↔ ¬ adr ∈ fs ∧ new(log, fs); (s)%a: ⊦ (ax + ax0) + ax1 = ax + ax0 + ax1; from specification list[address-list-set]% ⊦ ax + adr = ax + adr '; (s)