| 〈RED1(t2; tn)〉 tn = tn1, ∀ t0. #(t0) < #(t1 _ t2) → (¬ hasS(t0) → 〈RED1(t0; tn)〉 (tn ≠ none → ¬ hasS(tn) ∧ #(tn) < #(t0))), value(t1), ¬ hasS(t1), ¬ hasS(t2), ¬ ap(t1), tn1 ≠ none → ¬ hasS(tn1) ∧ #(tn1) < #(t2), tn1 ≠ none ⊦ 〈tn1 := some(t1 _ tn1 .t)〉 (tn1 ≠ none → ¬ hasS(tn1) ∧ ¬ #(t1) + #(t2) < #(tn1)) |
〈RED1(t2; tn)〉 tn = tn1, ∀ t0. #(t0) < #(t1 _ t2) → (¬ hasS(t0) → 〈RED1(t0; tn)〉 (tn ≠ none → ¬ hasS(tn) ∧ #(tn) < #(t0))), value(t1), ¬ hasS(t1), ¬ hasS(t2), ¬ ap(t1), tn1 ≠ none → ¬ hasS(tn1) ∧ #(tn1) < #(t2), tn1 ≠ none, ¬ (some(t1 _ tn1 .t) ≠ none → ¬ hasS(some(t1 _ tn1 .t)) ∧ ¬ #(t1) + #(t2) < #(some(t1 _ tn1 .t))) ⊦
[[CONCRETESIMPRULES : ()]]