Step
*
1
of Lemma
rv-Cauchy-Schwarz-equality
.....assertion..... 
1. rv : InnerProductSpace
2. a : Point(rv)
3. b : Point(rv)
4. a ⋅ b^2 = (a^2 * b^2)
5. b # 0
6. r0 < b^2
⊢ a - (a ⋅ b/b^2)*b ≡ 0
BY
{ ((BLemma `rv-norm-is-zero` THEN Auto) THEN Unfold `rv-norm` 0) }
1
1. rv : InnerProductSpace
2. a : Point(rv)
3. b : Point(rv)
4. a ⋅ b^2 = (a^2 * b^2)
5. b # 0
6. r0 < b^2
⊢ rsqrt(a - (a ⋅ b/b^2)*b^2) = r0
Latex:
Latex:
.....assertion..... 
1.  rv  :  InnerProductSpace
2.  a  :  Point(rv)
3.  b  :  Point(rv)
4.  a  \mcdot{}  b\^{}2  =  (a\^{}2  *  b\^{}2)
5.  b  \#  0
6.  r0  <  b\^{}2
\mvdash{}  a  -  (a  \mcdot{}  b/b\^{}2)*b  \mequiv{}  0
By
Latex:
((BLemma  `rv-norm-is-zero`  THEN  Auto)  THEN  Unfold  `rv-norm`  0)
Home
Index