| wlar[n0] = wl-entry(m0, stat), wlar[n] = wl-entry(m1, stat0), n < # wlar, n0 < # wlar, n ≤ n0, ∀ wlar, m. n0 ≤ # wlar → (m ∈ ecs(wlar, n0) ↔ (∃ n1. n1 < n0 ∧ wlar[n1].ec = m)) ⊦ m1 = m0, m1 ∈ ecs(wlar, n0) |
wlar[n] = wl-entry(m1, stat0), wlar[n0] = wl-entry(m0, stat), n0 < # wlar, n < # wlar, n ≤ n0, n0 ≤ # wlar → (m1 ∈ ecs(wlar, n0) ↔ (∃ n1. n1 < n0 ∧ wlar[n1].ec = m1)) ⊦ m1 = m0, m1 ∈ ecs(wlar, n0)
Used terms: wlar, m1