Step
*
2
2
1
2
1
2
1
of Lemma
rv-line-circle-lemma
1. n : ℕ
2. r : ℝ
3. p : ℝ^n
4. ||p|| ≤ r
5. v : ℝ^n
6. r0 ≤ (p⋅v^2 - ||v||^2 * (||p||^2 - r^2))
7. r0 < ||v||
8. r0 ≤ (((r(2) * p⋅v) * r(2) * p⋅v) - r(4) * ||v||^2 * (||p||^2 - r^2))
9. r0 < ||v||^2
10. ∀t:ℝ. (||p + t*v|| = r 
⇐⇒ ((||v||^2 * t^2) + ((r(2) * p⋅v) * t) + (||p||^2 - r^2)) = r0)
⊢ (((||v||^2 * quadratic1(||v||^2;r(2) * p⋅v;||p||^2 - r^2)^2)
+ ((r(2) * p⋅v) * quadratic1(||v||^2;r(2) * p⋅v;||p||^2 - r^2))
+ (||p||^2 - r^2))
= r0)
∧ (((||v||^2 * quadratic2(||v||^2;r(2) * p⋅v;||p||^2 - r^2)^2)
  + ((r(2) * p⋅v) * quadratic2(||v||^2;r(2) * p⋅v;||p||^2 - r^2))
  + (||p||^2 - r^2))
  = r0)
BY
{ ((InstLemma `quadratic-formula1` [⌜||v||^2⌝;⌜r(2) * p⋅v⌝;⌜||p||^2 - r^2⌝]⋅ THENA Auto)
   THEN D 0
   THEN BHyp -1 
   THEN Auto) }
Latex:
Latex:
1.  n  :  \mBbbN{}
2.  r  :  \mBbbR{}
3.  p  :  \mBbbR{}\^{}n
4.  ||p||  \mleq{}  r
5.  v  :  \mBbbR{}\^{}n
6.  r0  \mleq{}  (p\mcdot{}v\^{}2  -  ||v||\^{}2  *  (||p||\^{}2  -  r\^{}2))
7.  r0  <  ||v||
8.  r0  \mleq{}  (((r(2)  *  p\mcdot{}v)  *  r(2)  *  p\mcdot{}v)  -  r(4)  *  ||v||\^{}2  *  (||p||\^{}2  -  r\^{}2))
9.  r0  <  ||v||\^{}2
10.  \mforall{}t:\mBbbR{}.  (||p  +  t*v||  =  r  \mLeftarrow{}{}\mRightarrow{}  ((||v||\^{}2  *  t\^{}2)  +  ((r(2)  *  p\mcdot{}v)  *  t)  +  (||p||\^{}2  -  r\^{}2))  =  r0)
\mvdash{}  (((||v||\^{}2  *  quadratic1(||v||\^{}2;r(2)  *  p\mcdot{}v;||p||\^{}2  -  r\^{}2)\^{}2)
+  ((r(2)  *  p\mcdot{}v)  *  quadratic1(||v||\^{}2;r(2)  *  p\mcdot{}v;||p||\^{}2  -  r\^{}2))
+  (||p||\^{}2  -  r\^{}2))
=  r0)
\mwedge{}  (((||v||\^{}2  *  quadratic2(||v||\^{}2;r(2)  *  p\mcdot{}v;||p||\^{}2  -  r\^{}2)\^{}2)
    +  ((r(2)  *  p\mcdot{}v)  *  quadratic2(||v||\^{}2;r(2)  *  p\mcdot{}v;||p||\^{}2  -  r\^{}2))
    +  (||p||\^{}2  -  r\^{}2))
    =  r0)
By
Latex:
((InstLemma  `quadratic-formula1`  [\mkleeneopen{}||v||\^{}2\mkleeneclose{};\mkleeneopen{}r(2)  *  p\mcdot{}v\mkleeneclose{};\mkleeneopen{}||p||\^{}2  -  r\^{}2\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  D  0
  THEN  BHyp  -1 
  THEN  Auto)
Home
Index