Step
*
of Lemma
qmul_functionality_wrt_qless1
∀[a,b,c,d:ℚ].  (a * c < b * d) supposing (c < d and (a ≤ b) and (0 ≤ d) and 0 < a)
BY
{ (Auto THEN QMul ⌜a⌝ (-1)⋅ THEN QMul ⌜d⌝ (-2)⋅ THEN Auto) }
Latex:
Latex:
\mforall{}[a,b,c,d:\mBbbQ{}].    (a  *  c  <  b  *  d)  supposing  (c  <  d  and  (a  \mleq{}  b)  and  (0  \mleq{}  d)  and  0  <  a)
By
Latex:
(Auto  THEN  QMul  \mkleeneopen{}a\mkleeneclose{}  (-1)\mcdot{}  THEN  QMul  \mkleeneopen{}d\mkleeneclose{}  (-2)\mcdot{}  THEN  Auto)
Home
Index