| n ≤ n2 ∧ n2 ≤ # x, n2 ≤ # x, n + n1 ≤ n2, n + n1 ≤ # x ⊦ firstn(n1, firstn(n2 - n, restn(n, x))) = firstn(n1, restn(n, x)) |
n ≤ n2, n2 ≤ # x, n + n1 ≤ n2, n + n1 ≤ # x, n ≤ # x ⊦ firstn(n1, firstn(n2 - n, restn(n, x))) = firstn(n1, restn(n, x))
Used simplifier rules: let: ⊦ n ≤ n0 ∧ n0 ≤ n1 → n ≤ n1; (forward) from specification nat