| wlar[m].status = free, boolvar0 ↔ false, ¬ boolvar ↔ free-ecs(wlar, m) = ∅, m = m0, m1 = 0, m < # wlar, m ≤ # wlar, boolvar → n = free-ecs(wlar, m).min, wlar[m].status = free → boolvar → m < # wlar, ¬ boolvar ∨ wlar[m].ec < n ⊦ (m + 1 ≤ # wlar ∧ (true → wlar[m].ec = free-ecs(wlar, m + 1).min) ∧ (¬ true ↔ free-ecs(wlar, m + 1) = ∅)) ∧ # wlar - m + 1 < # wlar - m0 |
wlar[m0].status = free, ¬ boolvar ↔ free-ecs(wlar, m0) = ∅, m0 < # wlar, boolvar → n = free-ecs(wlar, m0).min, ¬ boolvar ∨ wlar[m0].ec < n ⊦ wlar[m0].ec = free-ecs(wlar, m0 + 1).min ∧ free-ecs(wlar, m0 + 1) ≠ ∅
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ ¬ n < n; (s)% ⊦ m < n + 1 ↔ ¬ n < m; (s)% ⊦ n < m → (m - n) + n = m; (s)%n0 ≤ n ⊦ n - n0 < m ↔ n < m + n0; (s)% ⊦ m < n → (n ≤ m ↔ false); (s)% ⊦ m < n ↔ ¬ n ≤ m; (ss)%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ m + 1 ≤ n ↔ m < n; (s)% ⊦ m < n → m ≤ n; (s)