Step * 1 1 1 of Lemma eu-between-eq-seg-eq


1. EuclideanPlane@i'
2. Point@i
3. Point@i
4. Point@i
5. a' Point@i
6. b' Point@i
7. c' Point@i
8. a_b_c@i
9. a'_b'_c'@i
10. ab=a'b'@i
11. ac=a'c'@i
12. |ac| |ab| |bc| ∈ {p:Point| O_X_p} 
13. |a'c'| |a'b'| |b'c'| ∈ {p:Point| O_X_p} 
14. uiff(ab=a'b';|ab| |a'b'| ∈ {p:Point| O_X_p} )
15. uiff(ac=a'c';|ac| |a'c'| ∈ {p:Point| O_X_p} )
⊢ bc=b'c'
BY
Assert ⌜|ab| |bc| |a'b'| |b'c'| ∈ {p:Point| O_X_p} ⌝⋅
THEN Auto }

1
1. EuclideanPlane@i'
2. Point@i
3. Point@i
4. Point@i
5. a' Point@i
6. b' Point@i
7. c' Point@i
8. a_b_c@i
9. a'_b'_c'@i
10. ab=a'b'@i
11. ac=a'c'@i
12. |ac| |ab| |bc| ∈ {p:Point| O_X_p} 
13. |a'c'| |a'b'| |b'c'| ∈ {p:Point| O_X_p} 
14. |ab| |bc| |a'b'| |b'c'| ∈ {p:Point| O_X_p} 
15. ac=a'c'
16. |ac| |a'c'| ∈ {p:Point| O_X_p} 
17. |ab| |a'b'| ∈ {p:Point| O_X_p} 
18. ab=a'b'
⊢ bc=b'c'


Latex:


Latex:

1.  e  :  EuclideanPlane@i'
2.  a  :  Point@i
3.  b  :  Point@i
4.  c  :  Point@i
5.  a'  :  Point@i
6.  b'  :  Point@i
7.  c'  :  Point@i
8.  a\_b\_c@i
9.  a'\_b'\_c'@i
10.  ab=a'b'@i
11.  ac=a'c'@i
12.  |ac|  =  |ab|  +  |bc|
13.  |a'c'|  =  |a'b'|  +  |b'c'|
14.  uiff(ab=a'b';|ab|  =  |a'b'|)
15.  uiff(ac=a'c';|ac|  =  |a'c'|)
\mvdash{}  bc=b'c'


By


Latex:
Assert  \mkleeneopen{}|ab|  +  |bc|  =  |a'b'|  +  |b'c'|\mkleeneclose{}\mcdot{}
THEN  Auto




Home Index