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