| 〈RED1(ks(n); tn)〉 tn = tn1, ∀ n0. n0 < n → (true → 〈RED(ks(n0); t)〉 ((even(n0) → t = K) ∧ (odd(n0) → t = K _ K))), n ≠ 1, n ≠ 0, tn1 = none → n ≤ 1, tn1 ≠ none → ¬ n ≤ 1 ∧ tn1 = some(ks(n - 2)), ¬ tn1 ≠ none ⊦ 〈t0 := ks(n)〉 ((even(n) → t0 = K) ∧ (odd(n) → t0 = K _ K)) |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m ≠ 0 → (m ≤ 1 ↔ m = 1)])]]