| x2 = x, x ≠ [], max(x) < 0, head(x) ∈ x → head(x) ≤ max(x) ⊦ 〈build_rec#(0; x, to)〉 〈to0 := to, x0 := x ; if x0 ≠ [] then to0 := fail〉 (to0 = fail → (∀ t. x2 ≠ depths(t, 0))) |
x2 = x, x ≠ [], max(x) < 0, head(x) ≤ max(x), head(x) < 0 ⊦ 〈build_rec#(0; x, to)〉 〈to0 := to, x0 := x ; if x0 ≠ [] then to0 := fail〉 (to0 = fail → (∀ t. x2 ≠ depths(t, 0)))
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ i ≤ j ∧ j < j0 → i < j0], [CSIMPSEQ : ⊦ head(x) ∈ x ↔ x ≠ []])]]