| ⊦ mon<(nσ) ∧ ⌜n⌝ < # nσ → min(nσ, nσ(n)) = n |
min(nσ, nσ(n)) ≠ n, mon<(nσ), ⌜n⌝ < # nσ ⊦
| min(nσ, nσ(n)) ≠ n, mon<(nσ), ⌜n⌝ < # nσ ⊦ |
min(nσ, nσ(n)) ≠ n, mon<(nσ), ⌜n⌝ < # nσ ⊦
| min(nσ, nσ(n)) ≠ n, mon<(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, mon<(nσ), ⌜n⌝ < # 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, mon<(nσ), ⌜n⌝ < # 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σ ≠ [], mon<(nσ), ⌜n⌝ < # 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σ ≠ [], mon<(nσ), ⌜n⌝ < # 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σ ≠ [], mon<(nσ), ⌜n⌝ < # nσ, nσ((# nσ).n - 1) < nσ(n) ⊦
min(nσ, nσ(n)) ≠ n, nσ ≠ [], ⌜min(nσ, nσ(n))⌝ < # nσ, mon<(nσ), ⌜n⌝ < # nσ, nσ(n) ≤ nσ(min(nσ, nσ(n))), # nσ = ∞ ∨ ¬ nσ((# nσ).n - 1) < 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σ ≠ [], mon<(nσ), ⌜n⌝ < # nσ, nσ((# nσ).n - 1) < nσ(n) ⊦ |
min(nσ, nσ(n)) = (# nσ).n, # nσ ≠ ∞, min(nσ, nσ(n)) ≠ n, nσ ≠ [], mon<(nσ), ⌜n⌝ < # nσ, nσ(min(nσ, nσ(n)) - 1) < nσ(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σ ≠ [], mon<(nσ), ⌜n⌝ < # nσ, nσ(min(nσ, nσ(n)) - 1) < nσ(n) ⊦ |
# nσ = ⌜n0⌝ , min(nσ, nσ(n)) = n0, # nσ ≠ ∞, min(nσ, nσ(n)) ≠ n, nσ ≠ [], mon<(nσ), ⌜n⌝ < # nσ, nσ(min(nσ, nσ(n)) - 1) < nσ(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σ ≠ [], mon<(nσ), ⌜n⌝ < # nσ, nσ(min(nσ, nσ(n)) - 1) < nσ(n) ⊦ |
# nσ = ⌜min(nσ, nσ(n))⌝ , min(nσ, nσ(n)) ≠ n, nσ ≠ [], mon<(nσ), n < min(nσ, nσ(n)), nσ(min(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; (s) ⊦ ⌜n⌝ ≠ ∞; (s)
| # nσ = ⌜min(nσ, nσ(n))⌝ , min(nσ, nσ(n)) ≠ n, nσ ≠ [], mon<(nσ), n < min(nσ, nσ(n)), nσ(min(nσ, nσ(n)) - 1) < nσ(n) ⊦ |
# nσ = ⌜min(nσ, nσ(n))⌝ , min(nσ, nσ(n)) = n0 + 1, min(nσ, nσ(n)) ≠ 0, min(nσ, nσ(n)) ≠ n, nσ ≠ [], mon<(nσ), n < min(nσ, nσ(n)), nσ(n0) < nσ(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σ ≠ [], mon<(nσ), n < min(nσ, nσ(n)), nσ(n0) < nσ(n) ⊦ |
# nσ = ⌜n0⌝ + ⌜1⌝ , min(nσ, nσ(n)) = n0 + 1, n0 + 1 ≠ n, nσ ≠ [], mon<(nσ), n ≤ n0, nσ(n0) < nσ(n) ⊦
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σ ≠ [], mon<(nσ), n ≤ n0, nσ(n0) < nσ(n) ⊦ |
⊦ mon<(nσ) ∧ m < n ∧ ⌜n⌝ < # nσ → nσ(m) < nσ(n)
Used simplifier rules: add-comm: ⊦ n∞1 + n∞2 = n∞2 + n∞1; from specification nat-inf add-assoc: ⊦ (n∞ + n∞1) + n∞2 = n∞ + n∞1 + n∞2; 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σ ≠ [], ⌜min(nσ, nσ(n))⌝ < # nσ, mon<(nσ), ⌜n⌝ < # nσ, nσ(n) ≤ nσ(min(nσ, nσ(n))), # nσ = ∞ ∨ ¬ nσ((# nσ).n - 1) < nσ(n), ∀ m. ⌜m⌝ < # nσ ∧ nσ(n) ≤ nσ(m) → min(nσ, nσ(n)) ≤ m ⊦ |
min(nσ, nσ(n)) ≠ n, nσ ≠ [], ⌜min(nσ, nσ(n))⌝ < # nσ, mon<(nσ), ⌜n⌝ < # nσ, nσ(n) ≤ nσ(min(nσ, nσ(n))), # nσ = ∞ ∨ ¬ nσ((# nσ).n - 1) < nσ(n), ∀ m. ⌜m⌝ < # nσ ∧ nσ(n) ≤ nσ(m) → min(nσ, nσ(n)) ≤ m ⊦
| min(nσ, nσ(n)) ≠ n, nσ ≠ [], ⌜min(nσ, nσ(n))⌝ < # nσ, mon<(nσ), ⌜n⌝ < # nσ, nσ(n) ≤ nσ(min(nσ, nσ(n))), # nσ = ∞ ∨ ¬ nσ((# nσ).n - 1) < nσ(n), ∀ m. ⌜m⌝ < # nσ ∧ nσ(n) ≤ nσ(m) → min(nσ, nσ(n)) ≤ m ⊦ |
min(nσ, nσ(n)) ≠ n, nσ ≠ [], ⌜min(nσ, nσ(n))⌝ < # nσ, mon<(nσ), ⌜n⌝ < # nσ, nσ(n) ≤ nσ(min(nσ, nσ(n))), # nσ = ∞ ∨ ¬ nσ((# nσ).n - 1) < nσ(n), ∀ m. ⌜m⌝ < # nσ ∧ nσ(n) ≤ nσ(m) → min(nσ, nσ(n)) ≤ m, ⌜n⌝ < # nσ ∧ nσ(n) ≤ nσ(n) → min(nσ, nσ(n)) ≤ n ⊦
Used terms: n
| min(nσ, nσ(n)) ≠ n, nσ ≠ [], ⌜min(nσ, nσ(n))⌝ < # nσ, mon<(nσ), ⌜n⌝ < # nσ, nσ(n) ≤ nσ(min(nσ, nσ(n))), # nσ = ∞ ∨ ¬ nσ((# nσ).n - 1) < nσ(n), ∀ m. ⌜m⌝ < # nσ ∧ nσ(n) ≤ nσ(m) → min(nσ, nσ(n)) ≤ m, ⌜n⌝ < # nσ ∧ nσ(n) ≤ nσ(n) → min(nσ, nσ(n)) ≤ n ⊦ |
min(nσ, nσ(n)) ≠ n, nσ ≠ [], min(nσ, nσ(n)) < n, ⌜min(nσ, nσ(n))⌝ < # nσ, mon<(nσ), ⌜n⌝ < # nσ, nσ(n) ≤ nσ(min(nσ, nσ(n))), # nσ = ∞ ∨ ¬ nσ((# nσ).n - 1) < nσ(n), ∀ m. ⌜m⌝ < # nσ ∧ nσ(n) ≤ nσ(m) → min(nσ, nσ(n)) ≤ m ⊦
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, ⌜min(nσ, nσ(n))⌝ < # nσ, mon<(nσ), ⌜n⌝ < # nσ, nσ(n) ≤ nσ(min(nσ, nσ(n))), # nσ = ∞ ∨ ¬ nσ((# nσ).n - 1) < nσ(n), ∀ m. ⌜m⌝ < # nσ ∧ nσ(n) ≤ nσ(m) → min(nσ, nσ(n)) ≤ m ⊦ |
⊦ 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.