| ⊦ ordered≤(ins≤(a, x)) ↔ ordered≤(x) |
¬(ordered≤(ins≤(a, x)) ↔ ordered≤(x)) ⊦
| ¬(ordered≤(ins≤(a, x)) ↔ ordered≤(x)) ⊦ |
¬(ordered≤(ins≤(a, a0 + x0)) ↔ ordered≤(a0 + x0)), ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦
Used simplifier rules: le-e: ⊦ ordered≤([]); ins-e: ⊦ ins≤(a, []) = a '; le-o: ⊦ ordered≤(a '); list freely generated by [], +;;
| ¬(ordered≤(ins≤(a, a0 + x0)) ↔ ordered≤(a0 + x0)), ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦ |
¬(ordered≤(ins≤(a, a0 ' + x0)) ↔ ordered≤(a0 ' + x0)), ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦
Used simplifier rules: ⊦ a + x = a ' + x; (s)
| ¬(ordered≤(ins≤(a, a0 ' + x0)) ↔ ordered≤(a0 ' + x0)), ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦ |
¬(ordered≤(ins≤(a, a0 ' + x0)) ↔ ordered≤(a0 ' + x0)), a0 < a, ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦
Used simplifier rules: app-01: ⊦ ordered≤(x + y) → ordered≤(y); ins-y: ⊦ ¬ b < a → ins≤(a, b ' + x) = a + b + x; le-r: ⊦ ordered≤(a ' + b ' + x) ↔ ¬ b < a ∧ ordered≤(b ' + x); ⊦ a + x = a ' + x; (s) a: ⊦ (x + y) + z = x + y + z; from specification list Used formulas: a0 < a
| ¬(ordered≤(ins≤(a, a0 ' + x0)) ↔ ordered≤(a0 ' + x0)), a0 < a, ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦ |
¬(ordered≤(a0 ' + ins≤(a, x0)) ↔ ordered≤(a0 ' + x0)), a0 < a, ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦
Used simplifier rules: ins-n: ⊦ b < a → ins≤(a, b ' + x) = b + ins≤(a, x); a: ⊦ (x + y) + z = x + y + z; from specification list ⊦ a + x = a ' + x; (s)
| ¬(ordered≤(a0 ' + ins≤(a, x0)) ↔ ordered≤(a0 ' + x0)), a0 < a, ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦ |
⊦ x ≠ [] ∧ x.tail ≠ [] → (ordered≤(x) ↔ ¬ x.tail.head < x.head ∧ ordered≤(x.tail))
a0 ' + ins≤(a, x0) ≠ [], (a0 ' + ins≤(a, x0)).tail ≠ [], ¬(¬ (a0 ' + ins≤(a, x0)).tail.head < (a0 ' + ins≤(a, x0)).head ∧ ordered≤((a0 ' + ins≤(a, x0)).tail) ↔ ordered≤(a0 ' + x0)), a0 < a, ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦
Used simplifier rules: empty: ⊦ ins≤(a, x) ≠ []; ⊦ a ' + x ≠ []; (s) ⊦ (a ' + x).tail = x; (s) a: ⊦ (x + y) + z = x + y + z; from specification list Used terms: a0 ' + ins≤(a, x0)
| ⊦ x ≠ [] ∧ x.tail ≠ [] → (ordered≤(x) ↔ ¬ x.tail.head < x.head ∧ ordered≤(x.tail)) |
| a0 ' + ins≤(a, x0) ≠ [], (a0 ' + ins≤(a, x0)).tail ≠ [], ¬(¬ (a0 ' + ins≤(a, x0)).tail.head < (a0 ' + ins≤(a, x0)).head ∧ ordered≤((a0 ' + ins≤(a, x0)).tail) ↔ ordered≤(a0 ' + x0)), a0 < a, ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦ |
¬(¬ ins≤(a, x0).head < a0 ∧ ordered≤(ins≤(a, x0)) ↔ ordered≤(a0 ' + x0)), a0 < a, ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦
Used simplifier rules: empty: ⊦ ins≤(a, x) ≠ []; a: ⊦ (x + y) + z = x + y + z; from specification list ⊦ (a ' + x).tail = x; (s) ⊦ (a ' + x).head = a; (s) ⊦ a ' + x ≠ []; (s)
| ¬(¬ ins≤(a, x0).head < a0 ∧ ordered≤(ins≤(a, x0)) ↔ ordered≤(a0 ' + x0)), a0 < a, ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦ |
ins≤(a, x0) = a1 + y, ¬(¬ a1 < a0 ∧ ordered≤(ins≤(a, x0)) ↔ ordered≤(a0 ' + x0)), ins≤(a, x0) ≠ [], a0 < a, ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦
Used simplifier rules: empty: ⊦ ins≤(a, x) ≠ []; x ≠ [] ⊦ a = x.head ∧ y = x.tail ↔ x = a + y; (elim) Used terms: ins≤(a, x0), a1, y
| ins≤(a, x0) = a1 + y, ¬(¬ a1 < a0 ∧ ordered≤(ins≤(a, x0)) ↔ ordered≤(a0 ' + x0)), ins≤(a, x0) ≠ [], a0 < a, ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦ |
ins≤(a, x0) = a1 ' + y, ¬(¬ a1 < a0 ∧ ordered≤(ins≤(a, x0)) ↔ ordered≤(a0 ' + x0)), a0 < a, a1 ∈ ins≤(a, x0), ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦
Used simplifier rules: empty: ⊦ ins≤(a, x) ≠ []; a: ⊦ (x + y) + z = x + y + z; from specification list in-14: ⊦ a ' + x = y → a ∈ y; (forward) from specification list ⊦ a + x = a ' + x; (s)
| ins≤(a, x0) = a1 ' + y, ¬(¬ a1 < a0 ∧ ordered≤(ins≤(a, x0)) ↔ ordered≤(a0 ' + x0)), a0 < a, a1 ∈ ins≤(a, x0), ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦ |
⊦ x ≠ [] ∧ x.tail ≠ [] → (ordered≤(x) ↔ ¬ x.tail.head < x.head ∧ ordered≤(x.tail))
ins≤(a, x0) = a1 ' + y, a0 ' + x0 ≠ [], (a0 ' + x0).tail ≠ [], ¬(¬ a1 < a0 ∧ ordered≤(ins≤(a, x0)) ↔ ¬ (a0 ' + x0).tail.head < (a0 ' + x0).head ∧ ordered≤((a0 ' + x0).tail)), a0 < a, a1 ∈ ins≤(a, x0), ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦
Used simplifier rules: le-e: ⊦ ordered≤([]); ins-e: ⊦ ins≤(a, []) = a '; le-o: ⊦ ordered≤(a '); ⊦ a ' + x ≠ []; (s) ⊦ (a ' + x).tail = x; (s) ⊦ a ' = b ' + x ↔ a = b ∧ x = []; (ws) ⊦ x + [] = x; (s) a: ⊦ (x + y) + z = x + y + z; from specification list ⊦ a ∈ b ' ↔ a = b; (s) transitivity: ⊦ a < b ∧ b < c → a < c; (forward) from specification oelem lel: ⊦ a < b ∧ a = c → c < b; (forward) from specification oelem ⊦ ¬ a < a; (s) Used terms: a0 ' + x0
| ⊦ x ≠ [] ∧ x.tail ≠ [] → (ordered≤(x) ↔ ¬ x.tail.head < x.head ∧ ordered≤(x.tail)) |
| ins≤(a, x0) = a1 ' + y, a0 ' + x0 ≠ [], (a0 ' + x0).tail ≠ [], ¬(¬ a1 < a0 ∧ ordered≤(ins≤(a, x0)) ↔ ¬ (a0 ' + x0).tail.head < (a0 ' + x0).head ∧ ordered≤((a0 ' + x0).tail)), a0 < a, a1 ∈ ins≤(a, x0), ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦ |
ins≤(a, x0) = a1 ' + y, ¬(¬ a1 < a0 ∧ ordered≤(ins≤(a, x0)) ↔ ¬ x0.head < a0 ∧ ordered≤(x0)), x0 ≠ [], a0 < a, a1 ∈ ins≤(a, x0), ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦
Used simplifier rules: a: ⊦ (x + y) + z = x + y + z; from specification list ⊦ (a ' + x).tail = x; (s) ⊦ (a ' + x).head = a; (s) ⊦ a ' + x ≠ []; (s)
| ins≤(a, x0) = a1 ' + y, ¬(¬ a1 < a0 ∧ ordered≤(ins≤(a, x0)) ↔ ¬ x0.head < a0 ∧ ordered≤(x0)), x0 ≠ [], a0 < a, a1 ∈ ins≤(a, x0), ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦ |
ins≤(a, x0) = a1 ' + y, x0 = a2 + y0, ¬(¬ a1 < a0 ∧ ordered≤(ins≤(a, x0)) ↔ ¬ a2 < a0 ∧ ordered≤(x0)), x0 ≠ [], a0 < a, a1 ∈ ins≤(a, x0), ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦
Used simplifier rules: x ≠ [] ⊦ a = x.head ∧ y = x.tail ↔ x = a + y; (elim) Used terms: x0, a2, y0
| ins≤(a, x0) = a1 ' + y, x0 = a2 + y0, ¬(¬ a1 < a0 ∧ ordered≤(ins≤(a, x0)) ↔ ¬ a2 < a0 ∧ ordered≤(x0)), x0 ≠ [], a0 < a, a1 ∈ ins≤(a, x0), ∀ a. ordered≤(ins≤(a, x0)) ↔ ordered≤(x0) ⊦ |
ins≤(a, a2 ' + y0) = a1 ' + y, ¬(¬ a1 < a0 ∧ ordered≤(a1 ' + y) ↔ ¬ a2 < a0 ∧ ordered≤(a2 ' + y0)), a0 < a, ∀ a3. ordered≤(ins≤(a3, a2 ' + y0)) ↔ ordered≤(a2 ' + y0) ⊦
Used simplifier rules: a: ⊦ (x + y) + z = x + y + z; from specification list ⊦ a ∈ b ' + x ↔ a = b ∨ a ∈ x; (s) in-14: ⊦ a ' + x = y → a ∈ y; (forward) from specification list ⊦ a + x = a ' + x; (s) ⊦ a ' + x ≠ []; (s)
| ins≤(a, a2 ' + y0) = a1 ' + y, ¬(¬ a1 < a0 ∧ ordered≤(a1 ' + y) ↔ ¬ a2 < a0 ∧ ordered≤(a2 ' + y0)), a0 < a, ∀ a3. ordered≤(ins≤(a3, a2 ' + y0)) ↔ ordered≤(a2 ' + y0) ⊦ |
ins≤(a, a2 ' + y0) = a1 ' + y, ¬(¬ a1 < a0 ∧ ordered≤(a1 ' + y) ↔ ¬ a2 < a0 ∧ ordered≤(a2 ' + y0)), a0 < a, a2 < a, ∀ a3. ordered≤(ins≤(a3, a2 ' + y0)) ↔ ordered≤(a2 ' + y0) ⊦
Used simplifier rules: ins-y: ⊦ ¬ b < a → ins≤(a, b ' + x) = a + b + x; le-r: ⊦ ordered≤(a ' + b ' + x) ↔ ¬ b < a ∧ ordered≤(b ' + x); cons-02: ⊦ ordered≤(a ' + x) → ordered≤(x); app-01: ⊦ ordered≤(x + y) → ordered≤(y); ⊦ a + x = a ' + x; (s) ⊦ a ' + x = b ' + y ↔ a = b ∧ x = y; (ws) in-14: ⊦ a ' + x = y → a ∈ y; (forward) from specification list nen: ⊦ ¬ b < a ∧ a = c → ¬ b < c; (forward) from specification oelem ⊦ ¬ a < a; (s) ⊦ a ∈ b ' + x ↔ a = b ∨ a ∈ x; (s) a: ⊦ (x + y) + z = x + y + z; from specification list transitivity: ⊦ a < b ∧ b < c → a < c; (forward) from specification oelem nll: ⊦ ¬ b < a ∧ b < c → a < c; (forward) from specification oelem Used formulas: a2 < a
| ins≤(a, a2 ' + y0) = a1 ' + y, ¬(¬ a1 < a0 ∧ ordered≤(a1 ' + y) ↔ ¬ a2 < a0 ∧ ordered≤(a2 ' + y0)), a0 < a, a2 < a, ∀ a3. ordered≤(ins≤(a3, a2 ' + y0)) ↔ ordered≤(a2 ' + y0) ⊦ |
¬(ordered≤(a1 ' + ins≤(a, y0)) ↔ ordered≤(a1 ' + y0)), a1 < a, a0 < a, ¬ a1 < a0, ∀ a3. ordered≤(ins≤(a3, a1 ' + y0)) ↔ ordered≤(a1 ' + y0) ⊦
Used simplifier rules: ins-n: ⊦ b < a → ins≤(a, b ' + x) = b + ins≤(a, x); nll: ⊦ ¬ b < a ∧ b < c → a < c; (forward) from specification oelem lel: ⊦ a < b ∧ a = c → c < b; (forward) from specification oelem a: ⊦ (x + y) + z = x + y + z; from specification list ⊦ a ' + x = b ' + y ↔ a = b ∧ x = y; (ws) ⊦ a + x = a ' + x; (s)
| ¬(ordered≤(a1 ' + ins≤(a, y0)) ↔ ordered≤(a1 ' + y0)), a1 < a, a0 < a, ¬ a1 < a0, ∀ a3. ordered≤(ins≤(a3, a1 ' + y0)) ↔ ordered≤(a1 ' + y0) ⊦ |
Used simplifier rules: ins-n: ⊦ b < a → ins≤(a, b ' + x) = b + ins≤(a, x); ⊦ a + x = a ' + x; (s) a: ⊦ (x + y) + z = x + y + z; from specification list Used terms: a
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.