| ⊦ ¬ dups(x) → (dups(x -p n) ↔ false) |
¬(dups(x -p n) ↔ false), ¬ dups(x) ⊦
| ¬(dups(x -p n) ↔ false), ¬ dups(x) ⊦ |
dups(x -p n), ¬ dups(x) ⊦
| dups(x -p n), ¬ dups(x) ⊦ |
dups((a + x0) -p n), ¬ dups(a + x0), ∀ n. ¬(dups(x0 -p n) ∧ ¬ dups(x0)) ⊦
Used simplifier rules: delpos-empty: ⊦ [] -p n = []; list freely generated by [], +;; ⊦ ¬ dups([]); (s)
| dups((a + x0) -p n), ¬ dups(a + x0), ∀ n. ¬(dups(x0 -p n) ∧ ¬ dups(x0)) ⊦ |
dups((a ' + x0) -p n), ¬ dups(x0), ¬ a ∈ x0, ∀ n0. ¬ dups(x0 -p n0) ⊦
Used simplifier rules: a: ⊦ (x + y) + z = x + y + z; from specification list ⊦ dups(a ' + x) ↔ a ∈ x ∨ dups(x); (s) ⊦ a + x = a ' + x; (s)
| dups((a ' + x0) -p n), ¬ dups(x0), ¬ a ∈ x0, ∀ n0. ¬ dups(x0 -p n0) ⊦ |
n = n1 +1, dups((a ' + x0) -p n), ¬ dups(x0), ¬ a ∈ x0, ∀ n0. ¬ dups(x0 -p n0) ⊦
Used simplifier rules: delpos-base: ⊦ (a ' + x) -p 0 = x; nat freely generated by 0, +1;; a: ⊦ (x + y) + z = x + y + z; from specification list
| n = n1 +1, dups((a ' + x0) -p n), ¬ dups(x0), ¬ a ∈ x0, ∀ n0. ¬ dups(x0 -p n0) ⊦ |
¬ dups(x0), ¬ a ∈ x0, ∀ n0. ¬ dups(x0 -p n0), a ∈ x0 -p n1 ∨ dups(x0 -p n1) ⊦
Used simplifier rules: delpos-rec: ⊦ (a ' + x) -p (n + 1) = a + (x -p n); a: ⊦ (x + y) + z = x + y + z; from specification list ⊦ dups(a ' + x) ↔ a ∈ x ∨ dups(x); (s) c: ⊦ m + n = n + m; from specification nat-basic a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic ⊦ a + x = a ' + x; (s) ⊦ m +1 = m + 1; (s)
| ¬ dups(x0), ¬ a ∈ x0, ∀ n0. ¬ dups(x0 -p n0), a ∈ x0 -p n1 ∨ dups(x0 -p n1) ⊦ |
dups(x0 -p n1), ¬ dups(x0), ¬ a ∈ x0, ∀ n0. ¬ dups(x0 -p n0), a ∈ x0 -p n1 ∨ dups(x0 -p n1) ⊦
¬ dups(x0 -p n1), ¬ dups(x0), ¬ a ∈ x0, ∀ n0. ¬ dups(x0 -p n0), a ∈ x0 -p n1 ∨ dups(x0 -p n1) ⊦
Used formulas: dups(x0 -p n1)
| dups(x0 -p n1), ¬ dups(x0), ¬ a ∈ x0, ∀ n0. ¬ dups(x0 -p n0), a ∈ x0 -p n1 ∨ dups(x0 -p n1) ⊦ |
dups(x0 -p n1), ¬ dups(x0), ¬ a ∈ x0, ∀ n0. ¬ dups(x0 -p n0) ⊦
| dups(x0 -p n1), ¬ dups(x0), ¬ a ∈ x0, ∀ n0. ¬ dups(x0 -p n0) ⊦ |
Used terms: n1
| ¬ dups(x0 -p n1), ¬ dups(x0), ¬ a ∈ x0, ∀ n0. ¬ dups(x0 -p n0), a ∈ x0 -p n1 ∨ dups(x0 -p n1) ⊦ |
a ∈ x0 -p n1, ¬ dups(x0 -p n1), ¬ dups(x0), ¬ a ∈ x0, ∀ n0. ¬ dups(x0 -p n0) ⊦
| a ∈ x0 -p n1, ¬ dups(x0 -p n1), ¬ dups(x0), ¬ a ∈ x0, ∀ n0. ¬ dups(x0 -p n0) ⊦ |
⊦ ¬ dups(x) ∧ n < # x → (a ∈ x -p n ↔ a ≠ x[n] ∧ a ∈ x)
Used simplifier rules: rmtoobigpos: ⊦ # x ≤ n → x -p n = x; ⊦ m < n ↔ ¬ n ≤ m; (ss) Used terms: n1, x0, a
| ⊦ ¬ dups(x) ∧ n < # x → (a ∈ x -p n ↔ a ≠ x[n] ∧ a ∈ x) |
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.