Step * 1 2 of Lemma ip-circle-circle-lemma3


1. rv InnerProductSpace
2. Point(rv)
3. Point(rv)
4. {c:Point(rv)| c} 
5. r0 < ||c a||
6. Point(rv)
7. {p:Point(rv)| ab=ap ∧ (||c p|| ≤ ||c d||)} 
8. {q:Point(rv)| cd=cq ∧ (||a q|| ≤ ||a b||)} 
9. (||c p|| ≤ ||c d||) ∧ (||a q|| ≤ ||a b||)
⊢ (||a b||^2 ||c d||^2) ||c a||^2^2 ≤ (r(4) ||c a||^2 ||a b||^2)
BY
(All (Unfold `ip-congruent`) THEN -1) }

1
1. rv InnerProductSpace
2. Point(rv)
3. Point(rv)
4. {c:Point(rv)| c} 
5. r0 < ||c a||
6. Point(rv)
7. {p:Point(rv)| (||a b|| ||a p||) ∧ (||c p|| ≤ ||c d||)} 
8. {q:Point(rv)| (||c d|| ||c q||) ∧ (||a q|| ≤ ||a b||)} 
9. ||c p|| ≤ ||c d||
10. ||a q|| ≤ ||a b||
⊢ (||a b||^2 ||c d||^2) ||c a||^2^2 ≤ (r(4) ||c a||^2 ||a b||^2)


Latex:


Latex:

1.  rv  :  InnerProductSpace
2.  a  :  Point(rv)
3.  b  :  Point(rv)
4.  c  :  \{c:Point(rv)|  a  \#  c\} 
5.  r0  <  ||c  -  a||
6.  d  :  Point(rv)
7.  p  :  \{p:Point(rv)|  ab=ap  \mwedge{}  (||c  -  p||  \mleq{}  ||c  -  d||)\} 
8.  q  :  \{q:Point(rv)|  cd=cq  \mwedge{}  (||a  -  q||  \mleq{}  ||a  -  b||)\} 
9.  (||c  -  p||  \mleq{}  ||c  -  d||)  \mwedge{}  (||a  -  q||  \mleq{}  ||a  -  b||)
\mvdash{}  (||a  -  b||\^{}2  -  ||c  -  d||\^{}2)  +  ||c  -  a||\^{}2\^{}2  \mleq{}  (r(4)  *  ||c  -  a||\^{}2  *  ||a  -  b||\^{}2)


By


Latex:
(All  (Unfold  `ip-congruent`)  THEN  D  -1)




Home Index