have : p/r < q/r := lt_sgn.mpr this
ℕ ℤ ℚ : 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 r : ℚ
inst✝ : AP (sgn r ≃ 1)
x✝ : p < q
this✝¹ : sgn (p - q) ≃ -1
this✝ : sgn (p / r - q / r) ≃ sgn (p - q)
this : sgn (p / r - q / r) ≃ -1
⊢ p / r < q / r
ℕ ℤ ℚ : 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 r : ℚ
inst✝ : AP (sgn r ≃ 1)
x✝ : p < q
this✝² : sgn (p - q) ≃ -1
this✝¹ : sgn (p / r - q / r) ≃ sgn (p - q)
this✝ : sgn (p / r - q / r) ≃ -1
this : p / r < q / r
⊢ p / r < q / r