Step
*
of Lemma
qabs-of-nonneg
∀[q:ℚ]. |q| = q ∈ ℚ supposing 0 ≤ q
BY
{ xxx((UnivCD THENA Auto)
      THEN (Unfold `qabs` 0 THEN (CallByValueReduce 0 THENA Auto))
      THEN SplitOnConclITE
      THEN Auto
      THEN Subst ⌜q = 0 ∈ ℚ⌝ 0⋅
      THEN Auto)xxx }
1
.....equality..... 
1. q : ℚ
2. 0 ≤ q
3. ¬0 < q
⊢ q = 0 ∈ ℚ
Latex:
Latex:
\mforall{}[q:\mBbbQ{}].  |q|  =  q  supposing  0  \mleq{}  q
By
Latex:
xxx((UnivCD  THENA  Auto)
        THEN  (Unfold  `qabs`  0  THEN  (CallByValueReduce  0  THENA  Auto))
        THEN  SplitOnConclITE
        THEN  Auto
        THEN  Subst  \mkleeneopen{}q  =  0\mkleeneclose{}  0\mcdot{}
        THEN  Auto)xxx
Home
Index