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