have := calc
  b < a/c*c := this
  _ ≤ a := Nat.div_mul_le_self a c
  _ ≤ b := hab
a b c : Nat
hab : a ≤ b
hlt : b / c < a / c
this✝ : c > 0
this : b < a / c * c
⊢ a / c ≤ b / c
a b c : Nat
hab : a ≤ b
hlt : b / c < a / c
this✝¹ : c > 0
this✝ : b < a / c * c
this : b < b
⊢ a / c ≤ b / c