| C = C0 _ v5, t1 _ t2 = C[S _ v1 _ v2 _ v3], value(v1), value(v2), value(v3), context(C), ∀ t'. ¬ t1 => t' ⊦ value(t1), ∃ v, v4, v0. t1 _ t2 = S _ v _ v4 _ v0 ∧ C[v1 _ v3 _ (v2 _ v3)] = v _ v0 _ (v4 _ v0) ∧ value(v) ∧ value(v4) ∧ value(v0), ∃ v. t1 _ t2 = K _ C[v1 _ v3 _ (v2 _ v3)] _ v ∧ value(C[v1 _ v3 _ (v2 _ v3)]) ∧ value(v) |
context(C0), value(v3), value(v2), value(v1), ∀ t'. ¬ C0[S _ v1 _ v2 _ v3] => t' ⊦ ∃ v. C0[S _ v1 _ v2 _ v3] _ v5 = K _ (C0[v1 _ v3 _ (v2 _ v3)] _ v5) _ v ∧ value(C0[v1 _ v3 _ (v2 _ v3)] _ v5) ∧ value(v), ∃ v, v0, v4. C0[S _ v1 _ v2 _ v3] _ v5 = S _ v _ v0 _ v4 ∧ C0[v1 _ v3 _ (v2 _ v3)] _ v5 = v _ v4 _ (v0 _ v4) ∧ value(v) ∧ value(v0) ∧ value(v4)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ value(C[S _ t _ t0 _ t1])], [CSIMPSEQ : ⊦ context(C _ t) ↔ context(C)], [CSIMPSEQ : ⊦ t _ t0 = t1 _ t2 ↔ t = t1 ∧ t0 = t2], [CSIMPSEQ : ⊦ (C _ t1)[t] = C[t] _ t1])]]