Step
*
1
1
1
1
of Lemma
ip-line-circle-lemma
1. rv : InnerProductSpace
2. p : Point
3. q : Point
4. v : ℝ
5. v1 : {r:ℝ| (r0 ≤ r) ∧ ((r * r) = q - p^2)} 
6. v2 : ℝ
7. v ≤ r0
⊢ (v1^2 * v) ≤ v2^2
BY
{ ((nRMul ⌜v1^2⌝ (-1)⋅ THENA Auto) THEN RWO "-1" 0 THEN Auto) }
Latex:
Latex:
1.  rv  :  InnerProductSpace
2.  p  :  Point
3.  q  :  Point
4.  v  :  \mBbbR{}
5.  v1  :  \{r:\mBbbR{}|  (r0  \mleq{}  r)  \mwedge{}  ((r  *  r)  =  q  -  p\^{}2)\} 
6.  v2  :  \mBbbR{}
7.  v  \mleq{}  r0
\mvdash{}  (v1\^{}2  *  v)  \mleq{}  v2\^{}2
By
Latex:
((nRMul  \mkleeneopen{}v1\^{}2\mkleeneclose{}  (-1)\mcdot{}  THENA  Auto)  THEN  RWO  "-1"  0  THEN  Auto)
Home
Index