have : q < p ∨ q ≃ p := Or.inl ‹q < p›
ℕ ℤ ℚ : Type
inst✝¹⁰ : Natural ℕ
inst✝⁹ : Integer ℤ
inst✝⁸ : Core ℚ
inst✝⁷ : Addition ℚ
inst✝⁶ : Multiplication ℚ
inst✝⁵ : Negation ℚ
inst✝⁴ : Sign ℚ
inst✝³ : Subtraction ℚ
inst✝² : Reciprocation ℚ
inst✝¹ : Division ℚ
inst✝ : Order ℚ
p q : ℚ
OneOfThree : Prop := AA.OneOfThree (p < q) (p ≃ q) (p > q)
this : OneOfThree
c✝ : p > q
⊢ p ≤ q ∨ q ≤ p
ℕ ℤ ℚ : Type
inst✝¹⁰ : Natural ℕ
inst✝⁹ : Integer ℤ
inst✝⁸ : Core ℚ
inst✝⁷ : Addition ℚ
inst✝⁶ : Multiplication ℚ
inst✝⁵ : Negation ℚ
inst✝⁴ : Sign ℚ
inst✝³ : Subtraction ℚ
inst✝² : Reciprocation ℚ
inst✝¹ : Division ℚ
inst✝ : Order ℚ
p q : ℚ
OneOfThree : Prop := AA.OneOfThree (p < q) (p ≃ q) (p > q)
this✝ : OneOfThree
c✝ : p > q
this : q < p ∨ q ≃ p
⊢ p ≤ q ∨ q ≤ p