| t0 _ t1 = K _ v _ v0 ∧ t' = v ∧ value(v) ∧ value(v0), ∀ t'. t0 => t' ↔ (∃ C, t2, t1. context(C) ∧ t0 = C[t2] ∧ t2 =>top t1 ∧ t' = C[t1]), ∀ t'. t1 => t' ↔ (∃ C, t0, t2. context(C) ∧ t1 = C[t0] ∧ t0 =>top t2 ∧ t' = C[t2]) ⊦ ∃ C, t2, t3. context(C) ∧ t0 _ t1 = C[t2] ∧ t2 =>top t3 ∧ t' = C[t3] |
value(v0), value(v), ∀ t'. v0 => t' ↔ (∃ C, t0, t2. context(C) ∧ v0 = C[t0] ∧ t0 =>top t2 ∧ t' = C[t2]), ∀ t'. K _ v => t' ↔ (∃ C, t2, t1. context(C) ∧ K _ v = C[t2] ∧ t2 =>top t1 ∧ t' = C[t1]) ⊦ ∃ C, t2, t3. context(C) ∧ K _ v _ v0 = C[t2] ∧ t2 =>top t3 ∧ v = C[t3]
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ t _ t0 = t1 _ t2 ↔ t = t1 ∧ t0 = t2])]]