| ∀ t0. #(t0) < #(t) → (¬ hasS(t0) → 〈RED(t0; t')〉 true), ¬ hasS(t) ⊦ 〈RED(t; t')〉 true |
⊦
∀ t0. #(t0) < #(t) → (¬ hasS(t0) → 〈RED(t0; t')〉 true), ¬ hasS(t) ⊦ 〈let tn = none in { RED1(t; tn) ; if tn ≠ none then RED(tn .t; t0) else t0 := t }〉 true
[[CONCRETESIMPRULES : ()]]