| σ = ⌜x⌝ ⊦ (σ to n) from n = [], # σ < ⌜n⌝ |
n ≤ # x ⊦ (x to n) from n = []
Used simplifier rules: to-fin: ⊦ ⌜x⌝ to n = ⌜x to n⌝ ;%from-fin: ⊦ ⌜x⌝ from n = ⌜x from n⌝ ;%fin-empty: ⊦ ⌜x⌝ = [] ↔ x = [];%size-fin: ⊦ # ⌜x⌝ = ⌜# x⌝ ;%lels: ⊦ ¬ m < n ↔ n ≤ m; from specification nat%less-fin: ⊦ ⌜m⌝ < ⌜n⌝ ↔ m < n; from specification nat-inf