| ∀ n0. n0 < n → (true → 〈RED(ks(n0); t)〉 ((even(n0) → t = K) ∧ (odd(n0) → t = K _ K))), n = 0 ∨ n = 1, ¬ (ap(ks(n)) ∧ ap(ks(n) .1) ∧ ks(n) .1 .1 = K ∧ value(ks(n) .1 .2) ∧ value(ks(n) .2)), ap(ks(n)) ∧ ap(ks(n) .1) ∧ ap(ks(n) .1 .1) ∧ ks(n) .1 .1 .1 = S, v = ks(n) .2, v0 = ks(n) .1 .2, v4 = ks(n) .1 .1 .2, value(v4) ∧ value(v0) ∧ value(v), tn0 = some(v4 _ v _ (v0 _ v)) ⊦ 〈RED(tn0 .t; t0)〉 ((even(n) → t0 = K) ∧ (odd(n) → t0 = K _ K)) |
∀ n0. n0 < 1 → (true → 〈RED(ks(n0); t)〉 ((even(n0) → t = K) ∧ (odd(n0) → t = K _ K))), ks(1) .1 .1 .1 = S, ks(1) .1 .1 ≠ K, value(ks(1) .2), value(ks(1) .1 .2), value(ks(1) .1 .1 .2), ap(ks(1) .1 .1), ap(ks(1) .1), ap(ks(1)) ⊦ 〈RED(ks(1) .1 .1 .2 _ ks(1) .2 _ (ks(1) .1 .2 _ ks(1) .2); t0)〉 t0 = K _ K
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ odd(1)], [CSIMPSEQ : ⊦ ¬ even(1)], [CSIMPSEQ : ⊦ some(t) .t = t], [CSIMPSEQ : ⊦ ¬ ap(K)], [CSIMPSEQ : ⊦ ks(0) = K])]]