Theorem: Lean4Axiomatic.Rational.between_from_close (Lean4Axiomatic/Rational/Metric.lean)

State before:
ℕ ℤ ℚ : Type
inst✝¹² : Natural ℕ
inst✝¹¹ : Integer ℤ
inst✝¹⁰ : Core ℚ
inst✝⁹ : Addition ℚ
inst✝⁸ : Negation ℚ
inst✝⁷ : Subtraction ℚ
inst✝⁶ : Multiplication ℚ
inst✝⁵ : Reciprocation ℚ
inst✝⁴ : Division ℚ
inst✝³ : Sign ℚ
inst✝² : Order ℚ
inst✝¹ : MinMax ℚ
inst✝ : Metric ℚ
ε p q : ℚ
⊢ p ⊢ε⊣ q → p - ε⊣ q ⊢p + ε
Tactic:
intro (_ : p ⊢ε⊣ q)
State after:
ℕ ℤ ℚ : Type
inst✝¹² : Natural ℕ
inst✝¹¹ : Integer ℤ
inst✝¹⁰ : Core ℚ
inst✝⁹ : Addition ℚ
inst✝⁸ : Negation ℚ
inst✝⁷ : Subtraction ℚ
inst✝⁶ : Multiplication ℚ
inst✝⁵ : Reciprocation ℚ
inst✝⁴ : Division ℚ
inst✝³ : Sign ℚ
inst✝² : Order ℚ
inst✝¹ : MinMax ℚ
inst✝ : Metric ℚ
ε p q : ℚ
x✝ : p ⊢ε⊣ q
⊢ p - ε⊣ q ⊢p + ε

State before:
ℕ ℤ ℚ : Type
inst✝¹² : Natural ℕ
inst✝¹¹ : Integer ℤ
inst✝¹⁰ : Core ℚ
inst✝⁹ : Addition ℚ
inst✝⁸ : Negation ℚ
inst✝⁷ : Subtraction ℚ
inst✝⁶ : Multiplication ℚ
inst✝⁵ : Reciprocation ℚ
inst✝⁴ : Division ℚ
inst✝³ : Sign ℚ
inst✝² : Order ℚ
inst✝¹ : MinMax ℚ
inst✝ : Metric ℚ
ε p q : ℚ
x✝ : p ⊢ε⊣ q
⊢ p - ε⊣ q ⊢p + ε
Tactic:
have : p-ε ≤ q ∧ q ≤ p+ε := close_endpoints.mp ‹p ⊢ε⊣ q›
State after:
ℕ ℤ ℚ : Type
inst✝¹² : Natural ℕ
inst✝¹¹ : Integer ℤ
inst✝¹⁰ : Core ℚ
inst✝⁹ : Addition ℚ
inst✝⁸ : Negation ℚ
inst✝⁷ : Subtraction ℚ
inst✝⁶ : Multiplication ℚ
inst✝⁵ : Reciprocation ℚ
inst✝⁴ : Division ℚ
inst✝³ : Sign ℚ
inst✝² : Order ℚ
inst✝¹ : MinMax ℚ
inst✝ : Metric ℚ
ε p q : ℚ
x✝ : p ⊢ε⊣ q
this : p - ε ≤ q ∧ q ≤ p + ε
⊢ p - ε⊣ q ⊢p + ε

State before:
ℕ ℤ ℚ : Type
inst✝¹² : Natural ℕ
inst✝¹¹ : Integer ℤ
inst✝¹⁰ : Core ℚ
inst✝⁹ : Addition ℚ
inst✝⁸ : Negation ℚ
inst✝⁷ : Subtraction ℚ
inst✝⁶ : Multiplication ℚ
inst✝⁵ : Reciprocation ℚ
inst✝⁴ : Division ℚ
inst✝³ : Sign ℚ
inst✝² : Order ℚ
inst✝¹ : MinMax ℚ
inst✝ : Metric ℚ
ε p q : ℚ
x✝ : p ⊢ε⊣ q
this : p - ε ≤ q ∧ q ≤ p + ε
⊢ p - ε⊣ q ⊢p + ε
Tactic:
have : (p-ε ≤ q ∧ q ≤ p+ε) ∨ (p+ε ≤ q ∧ q ≤ p-ε) := Or.inl this
State after:
ℕ ℤ ℚ : Type
inst✝¹² : Natural ℕ
inst✝¹¹ : Integer ℤ
inst✝¹⁰ : Core ℚ
inst✝⁹ : Addition ℚ
inst✝⁸ : Negation ℚ
inst✝⁷ : Subtraction ℚ
inst✝⁶ : Multiplication ℚ
inst✝⁵ : Reciprocation ℚ
inst✝⁴ : Division ℚ
inst✝³ : Sign ℚ
inst✝² : Order ℚ
inst✝¹ : MinMax ℚ
inst✝ : Metric ℚ
ε p q : ℚ
x✝ : p ⊢ε⊣ q
this✝ : p - ε ≤ q ∧ q ≤ p + ε
this : p - ε ≤ q ∧ q ≤ p + ε ∨ p + ε ≤ q ∧ q ≤ p - ε
⊢ p - ε⊣ q ⊢p + ε

State before:
ℕ ℤ ℚ : Type
inst✝¹² : Natural ℕ
inst✝¹¹ : Integer ℤ
inst✝¹⁰ : Core ℚ
inst✝⁹ : Addition ℚ
inst✝⁸ : Negation ℚ
inst✝⁷ : Subtraction ℚ
inst✝⁶ : Multiplication ℚ
inst✝⁵ : Reciprocation ℚ
inst✝⁴ : Division ℚ
inst✝³ : Sign ℚ
inst✝² : Order ℚ
inst✝¹ : MinMax ℚ
inst✝ : Metric ℚ
ε p q : ℚ
x✝ : p ⊢ε⊣ q
this✝ : p - ε ≤ q ∧ q ≤ p + ε
this : p - ε ≤ q ∧ q ≤ p + ε ∨ p + ε ≤ q ∧ q ≤ p - ε
⊢ p - ε⊣ q ⊢p + ε
Tactic:
have : p-ε⊣ q ⊢p+ε := between_order.mpr this
State after:
ℕ ℤ ℚ : Type
inst✝¹² : Natural ℕ
inst✝¹¹ : Integer ℤ
inst✝¹⁰ : Core ℚ
inst✝⁹ : Addition ℚ
inst✝⁸ : Negation ℚ
inst✝⁷ : Subtraction ℚ
inst✝⁶ : Multiplication ℚ
inst✝⁵ : Reciprocation ℚ
inst✝⁴ : Division ℚ
inst✝³ : Sign ℚ
inst✝² : Order ℚ
inst✝¹ : MinMax ℚ
inst✝ : Metric ℚ
ε p q : ℚ
x✝ : p ⊢ε⊣ q
this✝¹ : p - ε ≤ q ∧ q ≤ p + ε
this✝ : p - ε ≤ q ∧ q ≤ p + ε ∨ p + ε ≤ q ∧ q ≤ p - ε
this : p - ε⊣ q ⊢p + ε
⊢ p - ε⊣ q ⊢p + ε

State before:
ℕ ℤ ℚ : Type
inst✝¹² : Natural ℕ
inst✝¹¹ : Integer ℤ
inst✝¹⁰ : Core ℚ
inst✝⁹ : Addition ℚ
inst✝⁸ : Negation ℚ
inst✝⁷ : Subtraction ℚ
inst✝⁶ : Multiplication ℚ
inst✝⁵ : Reciprocation ℚ
inst✝⁴ : Division ℚ
inst✝³ : Sign ℚ
inst✝² : Order ℚ
inst✝¹ : MinMax ℚ
inst✝ : Metric ℚ
ε p q : ℚ
x✝ : p ⊢ε⊣ q
this✝¹ : p - ε ≤ q ∧ q ≤ p + ε
this✝ : p - ε ≤ q ∧ q ≤ p + ε ∨ p + ε ≤ q ∧ q ≤ p - ε
this : p - ε⊣ q ⊢p + ε
⊢ p - ε⊣ q ⊢p + ε
Tactic:
exact this
State after:
no goals