| 〈build_rec#(i + 1; x2, to2)〉 (x2 = [] ∧ to2 = some(t)), ∀ j0, i0, x, x0, to. i→n(j0 - i0) < i→n(i1) → (x = x0 ∧ x0 ≠ [] ∧ i0 ≤ j0 ∧ max(x0) ≤ j0 → 〈build_rec#(i0; x, to)〉 (to ≠ fail → x0 = depths(to .t, i0) + x)), x1 = [], x2 = depths(t, i + 1), to2 = fail, d ' + y = depths(t, i + 1), 0 ≠ i1, d ∈ depths(t, i + 1), max(depths(t, i + 1)) ≤ i1 + i, i < d, 0 < i1, x0 = x1 ∧ d1 = i + 1 ⊦ 〈if fail = fail then to0 := fail else to0 := some(Node(t, fail .t))〉 (to0 ≠ fail → d ' + y = depths(to0 .t, i) + x0) |
〈build_rec#(i + 1; x2, to2)〉 (x2 = [] ∧ to2 = some(t)), ∀ j0, i0, x, x0, to. i→n(j0 - i0) < i→n(i1) → (x = x0 ∧ x0 ≠ [] ∧ i0 ≤ j0 ∧ max(x0) ≤ j0 → 〈build_rec#(i0; x, to)〉 (to ≠ fail → x0 = depths(to .t, i0) + x)), x1 = [], x2 = depths(t, i + 1), to2 = fail, d ' + y = depths(t, i + 1), 0 ≠ i1, d ∈ depths(t, i + 1), max(depths(t, i + 1)) ≤ i1 + i, i < d, 0 < i1, x0 = x1 ∧ d1 = i + 1 ⊦ 〈to0 := fail〉 (to0 ≠ fail → d ' + y = depths(to0 .t, i) + x0)
[[CONCRETESIMPRULES : ()]]