| n ≤ # x0 + 1, ∀ n. n ≤ # x0 → firstn(n, x0) ⊑ x0 ⊦ firstn(n, a ' + x0) ⊑ a ' + x0 |
⊦ n ≠ 0 → firstn(n, a ' + x) = a ' + firstn(n -1, x)
n ≠ 0, n ≤ # x0 + 1, ∀ n. n ≤ # x0 → firstn(n, x0) ⊑ x0 ⊦ a ' + firstn(n -1, x0) ⊑ a ' + x0
Used simplifier rules: firstN-zero: ⊦ firstn(0, x) = [];%lez: ⊦ 0 ≤ m; from specification nat%prefix-nil: ⊦ [] ⊑ x; from specification list-last Used terms: x0, a, n