∀[r:ℚ]. (r/r) = 1 ∈ ℚ supposing ¬(r = 0 ∈ ℚ)
{ (Auto THEN Unfold `qdiv` 0) }
1. r : ℚ
2. ¬(r = 0 ∈ ℚ)
⊢ (r * 1/r) = 1 ∈ ℚ