| 〈if ap(S _ t4 _ t3 _ t1) ∧ ap((S _ t4 _ t3 _ t1) .1) ∧ ap((S _ t4 _ t3 _ t1) .1 .1) ∧ (S _ t4 _ t3 _ t1) .1 .1 .1 = S then let v1 = (S _ t4 _ t3 _ t1) .1 .1 .2, v2 = (S _ t4 _ t3 _ t1) .1 .2, v3 = (S _ t4 _ t3 _ t1) .2 in if value(v1) ∧ value(v2) ∧ value(v3) then tn := some(v1 _ v3 _ (v2 _ v3)) else tn := none else tn := none〉 tn = tn0, tn0 ≠ some(t4 _ t1 _ (t3 _ t1)), n ≠ 0, value(t4), value(t3), value(t1) ⊦ |
〈let v1 = (S _ t4 _ t3 _ t1) .1 .1 .2, v2 = (S _ t4 _ t3 _ t1) .1 .2, v3 = (S _ t4 _ t3 _ t1) .2 in if value(v1) ∧ value(v2) ∧ value(v3) then tn := some(v1 _ v3 _ (v2 _ v3)) else tn := none〉 tn = tn0, tn0 ≠ some(t4 _ t1 _ (t3 _ t1)), n ≠ 0, value(t4), value(t3), value(t1) ⊦
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ap(t _ t0)], [CSIMPSEQ : ⊦ (t _ t0) .1 = t])]]