Step
*
1
1
1
1
1
1
of Lemma
Euclid-prop16
.....assertion..... 
1. g : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. a # bc
7. b-c-d
8. x : {x:Point| b=x=c} 
9. y : {y:Point| a=x=y} 
10. abc ≅a ycb
11. b # x
12. x # c
13. a # x
14. x # y
15. g' : Point
16. a-c-g'
17. cg' ≅ OX
18. x # ac
19. g'-c-a
20. y-x-a
21. a # xc
22. a # yg'
23. out(a cg')
24. p : Point
25. g'-p-x
26. y-p-c
⊢ cba < bcg'
BY
{ (InstLemma `geo-cong-angle-preserves-lt-angle` [⌜g⌝;⌜b⌝;⌜c⌝;⌜y⌝;⌜c⌝;⌜b⌝;⌜a⌝;⌜b⌝;⌜c⌝;⌜g'⌝]⋅ THEN Auto) }
1
.....antecedent..... 
1. g : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. a # bc
7. b-c-d
8. x : {x:Point| b=x=c} 
9. y : {y:Point| a=x=y} 
10. abc ≅a ycb
11. b # x
12. x # c
13. a # x
14. x # y
15. g' : Point
16. a-c-g'
17. cg' ≅ OX
18. x # ac
19. g'-c-a
20. y-x-a
21. a # xc
22. a # yg'
23. out(a cg')
24. p : Point
25. g'-p-x
26. y-p-c
⊢ bcy ≅a cba
2
.....antecedent..... 
1. g : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. a # bc
7. b-c-d
8. x : {x:Point| b=x=c} 
9. y : {y:Point| a=x=y} 
10. abc ≅a ycb
11. b # x
12. x # c
13. a # x
14. x # y
15. g' : Point
16. a-c-g'
17. cg' ≅ OX
18. x # ac
19. g'-c-a
20. y-x-a
21. a # xc
22. a # yg'
23. out(a cg')
24. p : Point
25. g'-p-x
26. y-p-c
⊢ bcy < bcg'
Latex:
Latex:
.....assertion..... 
1.  g  :  EuclideanPlane
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  d  :  Point
6.  a  \#  bc
7.  b-c-d
8.  x  :  \{x:Point|  b=x=c\} 
9.  y  :  \{y:Point|  a=x=y\} 
10.  abc  \mcong{}\msuba{}  ycb
11.  b  \#  x
12.  x  \#  c
13.  a  \#  x
14.  x  \#  y
15.  g'  :  Point
16.  a-c-g'
17.  cg'  \mcong{}  OX
18.  x  \#  ac
19.  g'-c-a
20.  y-x-a
21.  a  \#  xc
22.  a  \#  yg'
23.  out(a  cg')
24.  p  :  Point
25.  g'-p-x
26.  y-p-c
\mvdash{}  cba  <  bcg'
By
Latex:
(InstLemma  `geo-cong-angle-preserves-lt-angle`  [\mkleeneopen{}g\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}y\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}g'\mkleeneclose{}]\mcdot{}
  THEN  Auto
  )
Home
Index