| 〈RED1(ks(n0); tn)〉 tn = tn0, tn0 = none → n0 ≤ 1, tn0 ≠ none → ¬ n0 ≤ 1 ∧ tn0 = some(ks(n0 - 2)) ⊦ 〈RED1(ks(n0 +1); tn)〉 ((tn = none → n0 +1 ≤ 1) ∧ (tn ≠ none → ¬ n0 +1 ≤ 1 ∧ tn = some(ks(n0 +1 - 2)))) |
〈RED1(ks(n0); tn)〉 tn = tn0, tn0 = none → n0 ≤ 1, tn0 ≠ none → ¬ n0 ≤ 1 ∧ tn0 = some(ks(n0 - 2)) ⊦ 〈RED1(ks(n0) _ K; tn)〉 ((tn = none → n0 = 0) ∧ (tn ≠ none → n0 ≠ 0 ∧ tn = some(ks(n0 + 1 - 2))))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ m + m0 ≤ m ↔ m0 = 0], [CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ ks(n + 1) = ks(n) _ K], [CSIMPSEQ : ⊦ m +1 = m + 1])]]