Step
*
of Lemma
qmul_inv
∀[r:ℚ]. (r * 1/r) = 1 ∈ ℚ supposing ¬(r = 0 ∈ ℚ)
BY
{ (Auto THEN (RWW "assert-qeq<" 0 THENA (Auto THEN RW assert_pushdownC 0 THEN Auto))) }
1
1. r : ℚ
2. ¬(r = 0 ∈ ℚ)
⊢ ↑qeq(r * 1/r;1)
Latex:
Latex:
\mforall{}[r:\mBbbQ{}].  (r  *  1/r)  =  1  supposing  \mneg{}(r  =  0)
By
Latex:
(Auto  THEN  (RWW  "assert-qeq<"  0  THENA  (Auto  THEN  RW  assert\_pushdownC  0  THEN  Auto)))
Home
Index