---

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

.....antecedent..... 
1. rv : InnerProductSpace
2. a : Point(rv)
3. b : Point(rv)
4. c : {c:Point(rv)| a # c} 
5. d : Point(rv)
6. [p] : {p:Point(rv)| ab=ap ∧ (||c - p|| ≤ ||c - d||)} 
7. [q] : {q:Point(rv)| cd=cq ∧ (||a - q|| ≤ ||a - b||)} 
8. r0 < ||c - a||
⊢ (||a - b||^2 - ||c - d||^2) + ||c - a||^2^2 ≤ (r(4) * ||c - a||^2 * ||a - b||^2)
BY
{ ((Unhide THENA Auto) THEN PromoteHyp (-1) 5 THEN Assert ⌜(||c - p|| ≤ ||c - d||) ∧ (||a - q|| ≤ ||a - b||)⌝⋅) }

1
.....assertion..... 
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 ∧ (||c - p|| ≤ ||c - d||)} 
8. q : {q:Point(rv)| cd=cq ∧ (||a - q|| ≤ ||a - b||)} 
⊢ (||c - p|| ≤ ||c - d||) ∧ (||a - q|| ≤ ||a - b||)

2
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 ∧ (||c - p|| ≤ ||c - d||)} 
8. q : {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)

---

Latex:

---

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


By

---

Latex:
((Unhide  THENA  Auto)
  THEN  PromoteHyp  (-1)  5
  THEN  Assert  \mkleeneopen{}(||c  -  p||  \mleq{}  ||c  -  d||)  \mwedge{}  (||a  -  q||  \mleq{}  ||a  -  b||)\mkleeneclose{}\mcdot{})

---

Home Index