n ≤ # x ⊦ (x to n) from n = []
Used simplifier rules: lels: ⊦ ¬ m < n ↔ n ≤ m; from specification nat