| @(n, m, m0) ' + lax.to-adr(n) = lax1.to-adr(n), lax1 = ladr + lax0, @(m, m0) ∈ lax1, ∀ n, lax1. lax.to-adr(n) = lax1.to-adr(n) → lax = lax1 ⊦ @(m, m0) ' + lax = lax1 |
lax.to-adr(n) = lax0.to-adr(n), ∀ n, lax1. lax.to-adr(n) = lax1.to-adr(n) → lax = lax1, @(ladr.off, ladr.size) = ladr ∨ @(ladr.off, ladr.size) ∈ lax0 ⊦ @(ladr.off, ladr.size) ' + lax = ladr ' + lax0
Used simplifier rules: adrs-rec: ⊦ (ladr ' + lax).to-adr(n) = @(n, ladr.off, ladr.size) + lax.to-adr(n);% ⊦ ladr ∈ ladr0 ' + lax ↔ ladr = ladr0 ∨ ladr ∈ lax; (s)% ⊦ @(m, m0, m1) = @(m2, m3, m4) ↔ m = m2 ∧ m0 = m3 ∧ m1 = m4; (ws)%a: ⊦ (ax + ax0) + ax1 = ax + ax0 + ax1; from specification list[address-list-set]% ⊦ adr ' + ax = adr0 ' + ax0 ↔ adr = adr0 ∧ ax = ax0; (ws)%a: ⊦ (lax + lax0) + lax1 = lax + lax0 + lax1; from specification list[laddress-list]% ⊦ adr + ax = adr ' + ax; (s)% ⊦ ladr + lax = ladr ' + lax; (s)