| C0[t] .1 = S, value(C0[t] .2), value(t0), ap(C0[t]), context(C0), ∀ t1. value(C0[t1]) → value(t1) ⊦ C0[t] = K, C0[t] = S, value(t) |
C0[t] = t2 _ t3, t2 = S, value(t3), value(t0), ap(C0[t]), context(C0), ∀ t1. value(C0[t1]) → value(t1) ⊦ C0[t] = K, C0[t] = S, value(t)
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ ap(t) → ( t0 = t .1 ∧ t1 = t .2 ↔ t = t0 _ t1)])], [EXTRATERMS : (C0[t], t2, t3)]]