Step
*
1
1
1
1
1
1
1
1
2
of Lemma
hp-angle-sum-eq-straight-angle
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. x : Point
6. y : Point
7. z : Point
8. i : Point
9. j : Point
10. k : Point
11. i' : Point
12. j' : Point
13. k' : Point
14. p1 : Point
15. p2 : Point
16. d1 : Point
17. f1 : Point
18. abc ≅a ijp1
19. kjp1 ≅a xyz
20. j_p2_p1
21. out(j id1)
22. out(j kf1)
23. d1-p2-f1
24. p : Point
25. p' : Point
26. d' : Point
27. f' : Point
28. abc ≅a i'j'p
29. k'j'p ≅a xyz
30. j'_p'_p
31. out(j' i'd')
32. out(j' k'f')
33. d'-p'-f'
34. i-j-k
35. i' ≠ j'
36. j' ≠ k'
37. x # yz
38. a' : Point
39. c' : Point
40. out(j' a'i')
41. out(j' c'p)
42. a'j'c' ≅a ijp1
43. Cong3(a'j'c',ijp1)
44. K : Point
45. a'-j'-K
46. j'K ≅ jk
47. Kc' ≅ kp1
48. K ≠ c'
49. Kj'c' ≅a xyz
50. j' ≠ p' ⇒ out(j' pp')
51. k'' : Point
52. a'-j'-k''
53. j'k'' ≅ j'k'
54. out(j' Kk'')
55. K leftof j'p
56. k' leftof j'p
57. p leftof Kj'
58. p leftof k'j'
59. Kj'p ≅a k''j'p
⊢ pk'' ≅ pk'
BY
{ ((InstLemma `geo-sas2` [⌜e⌝;⌜j'⌝;⌜k''⌝;⌜p⌝;⌜j'⌝;⌜k'⌝;⌜p⌝]⋅ THEN Auto)
THEN ((InstLemma `out-preserves-angle-cong_1` [⌜e⌝;⌜K⌝;⌜j'⌝;⌜c'⌝;⌜x⌝;⌜y⌝;⌜z⌝;⌜k''⌝;⌜p⌝;⌜x⌝;⌜z⌝]⋅ THENA EAuto 1)
THENA (InstLemma `geo-out-iff-between1` [⌜e⌝;⌜j'⌝;⌜k''⌝;⌜K⌝;⌜a'⌝]⋅ THEN Auto THEN D -2 THEN EAuto 1)
)
) }
1
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. x : Point
6. y : Point
7. z : Point
8. i : Point
9. j : Point
10. k : Point
11. i' : Point
12. j' : Point
13. k' : Point
14. p1 : Point
15. p2 : Point
16. d1 : Point
17. f1 : Point
18. abc ≅a ijp1
19. kjp1 ≅a xyz
20. j_p2_p1
21. out(j id1)
22. out(j kf1)
23. d1-p2-f1
24. p : Point
25. p' : Point
26. d' : Point
27. f' : Point
28. abc ≅a i'j'p
29. k'j'p ≅a xyz
30. j'_p'_p
31. out(j' i'd')
32. out(j' k'f')
33. d'-p'-f'
34. i-j-k
35. i' ≠ j'
36. j' ≠ k'
37. x # yz
38. a' : Point
39. c' : Point
40. out(j' a'i')
41. out(j' c'p)
42. a'j'c' ≅a ijp1
43. Cong3(a'j'c',ijp1)
44. K : Point
45. a'-j'-K
46. j'K ≅ jk
47. Kc' ≅ kp1
48. K ≠ c'
49. Kj'c' ≅a xyz
50. j' ≠ p' ⇒ out(j' pp')
51. k'' : Point
52. a'-j'-k''
53. j'k'' ≅ j'k'
54. out(j' Kk'')
55. K leftof j'p
56. k' leftof j'p
57. p leftof Kj'
58. p leftof k'j'
59. Kj'p ≅a k''j'p
60. j'k'' ≅ j'k'
61. j'p ≅ j'p
62. k''j'p ≅a xyz
⊢ k''j'p ≅a k'j'p
Latex:
Latex:
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. x : Point
6. y : Point
7. z : Point
8. i : Point
9. j : Point
10. k : Point
11. i' : Point
12. j' : Point
13. k' : Point
14. p1 : Point
15. p2 : Point
16. d1 : Point
17. f1 : Point
18. abc \mcong{}\msuba{} ijp1
19. kjp1 \mcong{}\msuba{} xyz
20. j\_p2\_p1
21. out(j id1)
22. out(j kf1)
23. d1-p2-f1
24. p : Point
25. p' : Point
26. d' : Point
27. f' : Point
28. abc \mcong{}\msuba{} i'j'p
29. k'j'p \mcong{}\msuba{} xyz
30. j'\_p'\_p
31. out(j' i'd')
32. out(j' k'f')
33. d'-p'-f'
34. i-j-k
35. i' \mneq{} j'
36. j' \mneq{} k'
37. x \# yz
38. a' : Point
39. c' : Point
40. out(j' a'i')
41. out(j' c'p)
42. a'j'c' \mcong{}\msuba{} ijp1
43. Cong3(a'j'c',ijp1)
44. K : Point
45. a'-j'-K
46. j'K \mcong{} jk
47. Kc' \mcong{} kp1
48. K \mneq{} c'
49. Kj'c' \mcong{}\msuba{} xyz
50. j' \mneq{} p' {}\mRightarrow{} out(j' pp')
51. k'' : Point
52. a'-j'-k''
53. j'k'' \mcong{} j'k'
54. out(j' Kk'')
55. K leftof j'p
56. k' leftof j'p
57. p leftof Kj'
58. p leftof k'j'
59. Kj'p \mcong{}\msuba{} k''j'p
\mvdash{} pk'' \mcong{} pk'
By
Latex:
((InstLemma `geo-sas2` [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}j'\mkleeneclose{};\mkleeneopen{}k''\mkleeneclose{};\mkleeneopen{}p\mkleeneclose{};\mkleeneopen{}j'\mkleeneclose{};\mkleeneopen{}k'\mkleeneclose{};\mkleeneopen{}p\mkleeneclose{}]\mcdot{} THEN Auto)
THEN ((InstLemma `out-preserves-angle-cong\_1` [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}K\mkleeneclose{};\mkleeneopen{}j'\mkleeneclose{};\mkleeneopen{}c'\mkleeneclose{};\mkleeneopen{}x\mkleeneclose{};\mkleeneopen{}y\mkleeneclose{};\mkleeneopen{}z\mkleeneclose{};\mkleeneopen{}k''\mkleeneclose{};\mkleeneopen{}p\mkleeneclose{};\mkleeneopen{}x\mkleeneclose{};\mkleeneopen{}z\mkleeneclose{}]\mcdot{}
THENA EAuto 1
)
THENA (InstLemma `geo-out-iff-between1` [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}j'\mkleeneclose{};\mkleeneopen{}k''\mkleeneclose{};\mkleeneopen{}K\mkleeneclose{};\mkleeneopen{}a'\mkleeneclose{}]\mcdot{}
THEN Auto
THEN D -2
THEN EAuto 1)
)
)
Home
Index