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