| ⊦ mon<(nσ) ∧ ⌜n⌝ < # nσ → min(nσ, nσ[n]) = n |
min(nσ, nσ[n]) ≠ n, ⌜n⌝ < # nσ, mon<(nσ) ⊦
| min(nσ, nσ[n]) ≠ n, ⌜n⌝ < # nσ, mon<(nσ) ⊦ |
min(nσ, nσ[n]) ≠ n, ⌜n⌝ < # nσ, mon<(nσ) ⊦
| min(nσ, nσ[n]) ≠ n, ⌜n⌝ < # nσ, mon<(nσ) ⊦ |
⊦ mon<(nσ) → (nσ = [] ⊃ min(nσ, n) = 0 ;(# nσ ≠ ∞ ∧ nσ[(# nσ).n - 1] < n ⊃ min(nσ, n) = (# nσ).n ;⌜min(nσ, n)⌝ < # nσ ∧ n ≤ nσ[min(nσ, n)] ∧ (∀ m. ⌜m⌝ < # nσ ∧ n ≤ nσ[m] → min(nσ, n) ≤ m) ) )
min(nσ, nσ[n]) ≠ n, ⌜n⌝ < # nσ, mon<(nσ), mon<(nσ) → (nσ = [] ⊃ min(nσ, nσ[n]) = 0 ;(# nσ ≠ ∞ ∧ nσ[(# nσ).n - 1] < nσ[n] ⊃ min(nσ, nσ[n]) = (# nσ).n ;⌜min(nσ, nσ[n])⌝ < # nσ ∧ nσ[n] ≤ nσ[min(nσ, nσ[n])] ∧ (∀ m. ⌜m⌝ < # nσ ∧ nσ[n] ≤ nσ[m] → min(nσ, nσ[n]) ≤ m) ) ) ⊦
Used terms: nσ, nσ[n]
| ⊦ mon<(nσ) → (nσ = [] ⊃ min(nσ, n) = 0 ;(# nσ ≠ ∞ ∧ nσ[(# nσ).n - 1] < n ⊃ min(nσ, n) = (# nσ).n ;⌜min(nσ, n)⌝ < # nσ ∧ n ≤ nσ[min(nσ, n)] ∧ (∀ m. ⌜m⌝ < # nσ ∧ n ≤ nσ[m] → min(nσ, n) ≤ m) ) ) |
| min(nσ, nσ[n]) ≠ n, ⌜n⌝ < # nσ, mon<(nσ), mon<(nσ) → (nσ = [] ⊃ min(nσ, nσ[n]) = 0 ;(# nσ ≠ ∞ ∧ nσ[(# nσ).n - 1] < nσ[n] ⊃ min(nσ, nσ[n]) = (# nσ).n ;⌜min(nσ, nσ[n])⌝ < # nσ ∧ nσ[n] ≤ nσ[min(nσ, nσ[n])] ∧ (∀ m. ⌜m⌝ < # nσ ∧ nσ[n] ≤ nσ[m] → min(nσ, nσ[n]) ≤ m) ) ) ⊦ |
min(nσ, nσ[n]) ≠ n, nσ ≠ [], ⌜n⌝ < # nσ, mon<(nσ), (# nσ ≠ ∞ ∧ nσ[(# nσ).n - 1] < nσ[n] ⊃ min(nσ, nσ[n]) = (# nσ).n ;⌜min(nσ, nσ[n])⌝ < # nσ ∧ nσ[n] ≤ nσ[min(nσ, nσ[n])] ∧ (∀ m. ⌜m⌝ < # nσ ∧ nσ[n] ≤ nσ[m] → min(nσ, nσ[n]) ≤ m) ) ⊦
Used simplifier rules: min-empty: ⊦ min([], n) = 0; ⊦ ¬ n < 0; (s) ⊦ ⌜m⌝ < ⌜n⌝ ↔ m < n; (s) ⊦ # [] = ⌜0⌝ ; (s)
| min(nσ, nσ[n]) ≠ n, nσ ≠ [], ⌜n⌝ < # nσ, mon<(nσ), (# nσ ≠ ∞ ∧ nσ[(# nσ).n - 1] < nσ[n] ⊃ min(nσ, nσ[n]) = (# nσ).n ;⌜min(nσ, nσ[n])⌝ < # nσ ∧ nσ[n] ≤ nσ[min(nσ, nσ[n])] ∧ (∀ m. ⌜m⌝ < # nσ ∧ nσ[n] ≤ nσ[m] → min(nσ, nσ[n]) ≤ m) ) ⊦ |
min(nσ, nσ[n]) = (# nσ).n, # nσ ≠ ∞, min(nσ, nσ[n]) ≠ n, nσ ≠ [], ⌜n⌝ < # nσ, nσ[(# nσ).n - 1] < nσ[n], mon<(nσ) ⊦
min(nσ, nσ[n]) ≠ n, nσ ≠ [], ⌜n⌝ < # nσ, ⌜min(nσ, nσ[n])⌝ < # nσ, mon<(nσ), nσ[n] ≤ nσ[min(nσ, nσ[n])], ∀ m. ⌜m⌝ < # nσ ∧ nσ[n] ≤ nσ[m] → min(nσ, nσ[n]) ≤ m, # nσ = ∞ ∨ ¬ nσ[(# nσ).n - 1] < nσ[n] ⊦
| min(nσ, nσ[n]) = (# nσ).n, # nσ ≠ ∞, min(nσ, nσ[n]) ≠ n, nσ ≠ [], ⌜n⌝ < # nσ, nσ[(# nσ).n - 1] < nσ[n], mon<(nσ) ⊦ |
min(nσ, nσ[n]) = (# nσ).n, # nσ ≠ ∞, min(nσ, nσ[n]) ≠ n, nσ ≠ [], ⌜n⌝ < # nσ, nσ[min(nσ, nσ[n]) - 1] < nσ[n], mon<(nσ) ⊦
Used simplifier rules: ⊦ m < n → n ≠ 0; (s) f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic
| min(nσ, nσ[n]) = (# nσ).n, # nσ ≠ ∞, min(nσ, nσ[n]) ≠ n, nσ ≠ [], ⌜n⌝ < # nσ, nσ[min(nσ, nσ[n]) - 1] < nσ[n], mon<(nσ) ⊦ |
# nσ = ⌜n0⌝ , min(nσ, nσ[n]) = n0, # nσ ≠ ∞, min(nσ, nσ[n]) ≠ n, nσ ≠ [], nσ[min(nσ, nσ[n]) - 1] < nσ[n], ⌜n⌝ < # nσ, mon<(nσ) ⊦
Used simplifier rules: ⊦ n∞ ≠ ∞ → (n = n∞.n ↔ n∞ = ⌜n⌝ ); (elim) Used terms: # nσ, n0
| # nσ = ⌜n0⌝ , min(nσ, nσ[n]) = n0, # nσ ≠ ∞, min(nσ, nσ[n]) ≠ n, nσ ≠ [], nσ[min(nσ, nσ[n]) - 1] < nσ[n], ⌜n⌝ < # nσ, mon<(nσ) ⊦ |
# nσ = ⌜min(nσ, nσ[n])⌝ , min(nσ, nσ[n]) ≠ n, nσ ≠ [], n < min(nσ, nσ[n]), nσ[min(nσ, nσ[n]) - 1] < nσ[n], mon<(nσ) ⊦
Used simplifier rules: ⊦ m < n → n ≠ 0; (s) f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic ⊦ ⌜m⌝ < ⌜n⌝ ↔ m < n; (s) ⊦ ⌜n⌝ ≠ ∞; (s)
| # nσ = ⌜min(nσ, nσ[n])⌝ , min(nσ, nσ[n]) ≠ n, nσ ≠ [], n < min(nσ, nσ[n]), nσ[min(nσ, nσ[n]) - 1] < nσ[n], mon<(nσ) ⊦ |
# nσ = ⌜min(nσ, nσ[n])⌝ , min(nσ, nσ[n]) = n0 + 1, min(nσ, nσ[n]) ≠ 0, min(nσ, nσ[n]) ≠ n, nσ ≠ [], nσ[n0] < nσ[n], n < min(nσ, nσ[n]), mon<(nσ) ⊦
Used simplifier rules: ⊦ m < n → n ≠ 0; (s) n ≠ 0 ⊦ m = n - 1 ↔ n = m + 1; (elim) Used terms: min(nσ, nσ[n]), n0
| # nσ = ⌜min(nσ, nσ[n])⌝ , min(nσ, nσ[n]) = n0 + 1, min(nσ, nσ[n]) ≠ 0, min(nσ, nσ[n]) ≠ n, nσ ≠ [], nσ[n0] < nσ[n], n < min(nσ, nσ[n]), mon<(nσ) ⊦ |
# nσ = ⌜n0⌝ + ⌜1⌝ , min(nσ, nσ[n]) = n0 + 1, n0 + 1 ≠ n, nσ ≠ [], nσ[n0] < nσ[n], mon<(nσ), n ≤ n0 ⊦
Used simplifier rules: ⊦ m < n ↔ ¬ n ≤ m; (ss) c: ⊦ m + n = n + m; from specification nat-basic a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic ⊦ m < n + 1 ↔ ¬ n < m; (s) ⊦ m + 1 ≠ 0; (s) ⊦ ⌜m + n⌝ = ⌜m⌝ + ⌜n⌝ ; (s) f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic ⊦ m < n → n ≠ 0; (s)
| # nσ = ⌜n0⌝ + ⌜1⌝ , min(nσ, nσ[n]) = n0 + 1, n0 + 1 ≠ n, nσ ≠ [], nσ[n0] < nσ[n], mon<(nσ), n ≤ n0 ⊦ |
⊦ mon<(nσ) ∧ m < n ∧ ⌜n⌝ < # nσ → nσ[m] < nσ[n]
Used simplifier rules: add-assoc: ⊦ (n∞ + n∞1) + n∞2 = n∞ + n∞1 + n∞2; from specification nat-inf add-comm: ⊦ n∞1 + n∞2 = n∞2 + n∞1; from specification nat-inf ⊦ n∞ = ⌜m⌝ + ⌜n0⌝ → (⌜n⌝ < n∞ ↔ n < m + n0); (s) ⊦ m < n + 1 ↔ ¬ n < m; (s) ⊦ m < n → ¬ n < m; (s) ⊦ m < n ↔ ¬ n ≤ m; (ss) ⊦ m ≤ n → (n ≤ m ↔ m = n); (s) ⊦ m = m + n ↔ n = 0; (s) a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic c: ⊦ m + n = n + m; from specification nat-basic ⊦ ¬ n < n; (s) Used terms: nσ, n, n0
| ⊦ mon<(nσ) ∧ m < n ∧ ⌜n⌝ < # nσ → nσ[m] < nσ[n] |
| min(nσ, nσ[n]) ≠ n, nσ ≠ [], ⌜n⌝ < # nσ, ⌜min(nσ, nσ[n])⌝ < # nσ, mon<(nσ), nσ[n] ≤ nσ[min(nσ, nσ[n])], ∀ m. ⌜m⌝ < # nσ ∧ nσ[n] ≤ nσ[m] → min(nσ, nσ[n]) ≤ m, # nσ = ∞ ∨ ¬ nσ[(# nσ).n - 1] < nσ[n] ⊦ |
min(nσ, nσ[n]) ≠ n, nσ ≠ [], ⌜min(nσ, nσ[n])⌝ < # nσ, ⌜n⌝ < # nσ, mon<(nσ), nσ[n] ≤ nσ[min(nσ, nσ[n])], ∀ m. ⌜m⌝ < # nσ ∧ nσ[n] ≤ nσ[m] → min(nσ, nσ[n]) ≤ m, # nσ = ∞ ∨ ¬ nσ[(# nσ).n - 1] < nσ[n] ⊦
| min(nσ, nσ[n]) ≠ n, nσ ≠ [], ⌜min(nσ, nσ[n])⌝ < # nσ, ⌜n⌝ < # nσ, mon<(nσ), nσ[n] ≤ nσ[min(nσ, nσ[n])], ∀ m. ⌜m⌝ < # nσ ∧ nσ[n] ≤ nσ[m] → min(nσ, nσ[n]) ≤ m, # nσ = ∞ ∨ ¬ nσ[(# nσ).n - 1] < nσ[n] ⊦ |
min(nσ, nσ[n]) ≠ n, nσ ≠ [], ⌜n⌝ < # nσ, ⌜min(nσ, nσ[n])⌝ < # nσ, mon<(nσ), nσ[n] ≤ nσ[min(nσ, nσ[n])], ⌜n⌝ < # nσ ∧ nσ[n] ≤ nσ[n] → min(nσ, nσ[n]) ≤ n, ∀ m. ⌜m⌝ < # nσ ∧ nσ[n] ≤ nσ[m] → min(nσ, nσ[n]) ≤ m, # nσ = ∞ ∨ ¬ nσ[(# nσ).n - 1] < nσ[n] ⊦
Used terms: n
| min(nσ, nσ[n]) ≠ n, nσ ≠ [], ⌜n⌝ < # nσ, ⌜min(nσ, nσ[n])⌝ < # nσ, mon<(nσ), nσ[n] ≤ nσ[min(nσ, nσ[n])], ⌜n⌝ < # nσ ∧ nσ[n] ≤ nσ[n] → min(nσ, nσ[n]) ≤ n, ∀ m. ⌜m⌝ < # nσ ∧ nσ[n] ≤ nσ[m] → min(nσ, nσ[n]) ≤ m, # nσ = ∞ ∨ ¬ nσ[(# nσ).n - 1] < nσ[n] ⊦ |
min(nσ, nσ[n]) ≠ n, nσ ≠ [], min(nσ, nσ[n]) < n, ⌜n⌝ < # nσ, ⌜min(nσ, nσ[n])⌝ < # nσ, mon<(nσ), nσ[n] ≤ nσ[min(nσ, nσ[n])], ∀ m. ⌜m⌝ < # nσ ∧ nσ[n] ≤ nσ[m] → min(nσ, nσ[n]) ≤ m, # nσ = ∞ ∨ ¬ nσ[(# nσ).n - 1] < nσ[n] ⊦
Used simplifier rules: ⊦ m < n → n ≠ 0; (s) f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic ⊦ m ≠ n → (m ≤ n ↔ m < n); (s) ⊦ m ≤ m; (s)
| min(nσ, nσ[n]) ≠ n, nσ ≠ [], min(nσ, nσ[n]) < n, ⌜n⌝ < # nσ, ⌜min(nσ, nσ[n])⌝ < # nσ, mon<(nσ), nσ[n] ≤ nσ[min(nσ, nσ[n])], ∀ m. ⌜m⌝ < # nσ ∧ nσ[n] ≤ nσ[m] → min(nσ, nσ[n]) ≤ m, # nσ = ∞ ∨ ¬ nσ[(# nσ).n - 1] < nσ[n] ⊦ |
⊦ mon<(nσ) ∧ m < n ∧ ⌜n⌝ < # nσ → nσ[m] < nσ[n]
Used simplifier rules: mininv-inverts-weak: ⊦ mon<(nσ) ∧ ⌜min(nσ, n)⌝ < # nσ → (nσ[min(nσ, n)] < n ↔ false); Used terms: nσ, min(nσ, nσ[n]), n
| ⊦ mon<(nσ) ∧ m < n ∧ ⌜n⌝ < # nσ → nσ[m] < nσ[n] |
The following image shows the proof tree of sequent calculus. The proved goal is at the bottom. You can click on the nodes to view additional rules. See here for details on colors in a proof tree.