Step
*
of Lemma
cong-angle-out-exists3
∀e:BasicGeometry. ∀a,b,c,x,y,z:Point.
(abc ≅a xyz
⇒ a ≠ b
⇒ c ≠ b
⇒ x ≠ y
⇒ z ≠ y
⇒ (∃a',c',x',z':Point. ((out(b a'a) ∧ out(b c'c) ∧ out(y x'x) ∧ out(y z'z) ∧ a'bc' ≅a x'yz') ∧ Cong3(a'bc',x'yz'))))
BY
{ ((Auto THEN (Duplicate (-5) THEN D -1) THEN ExRepD)
THEN (InstLemma `geo-between-out` [⌜e⌝;⌜b⌝;⌜a⌝;⌜a'⌝]⋅ THENA Auto)
THEN (InstLemma `geo-between-out` [⌜e⌝;⌜b⌝;⌜c⌝;⌜c'⌝]⋅ THENA Auto)
THEN (InstLemma `geo-between-out` [⌜e⌝;⌜y⌝;⌜x⌝;⌜x'⌝]⋅ THENA Auto)
THEN (InstLemma `geo-between-out` [⌜e⌝;⌜y⌝;⌜z⌝;⌜z'⌝]⋅ THENA Auto)) }
1
1. e : BasicGeometry
2. a : Point
3. b : Point
4. c : Point
5. x : Point
6. y : Point
7. z : Point
8. abc ≅a xyz
9. a ≠ b
10. c ≠ b
11. x ≠ y
12. z ≠ y
13. a ≠ b
14. b ≠ c
15. x ≠ y
16. y ≠ z
17. a' : Point
18. c' : Point
19. x' : Point
20. z' : Point
21. b_a_a'
22. b_c_c'
23. y_x_x'
24. y_z_z'
25. ba' ≅ yx'
26. bc' ≅ yz'
27. a'c' ≅ x'z'
28. out(b aa')
29. out(b cc')
30. out(y xx')
31. out(y zz')
⊢ ∃a',c',x',z':Point. ((out(b a'a) ∧ out(b c'c) ∧ out(y x'x) ∧ out(y z'z) ∧ a'bc' ≅a x'yz') ∧ Cong3(a'bc',x'yz'))
Latex:
Latex:
\mforall{}e:BasicGeometry. \mforall{}a,b,c,x,y,z:Point.
(abc \mcong{}\msuba{} xyz
{}\mRightarrow{} a \mneq{} b
{}\mRightarrow{} c \mneq{} b
{}\mRightarrow{} x \mneq{} y
{}\mRightarrow{} z \mneq{} y
{}\mRightarrow{} (\mexists{}a',c',x',z':Point
((out(b a'a) \mwedge{} out(b c'c) \mwedge{} out(y x'x) \mwedge{} out(y z'z) \mwedge{} a'bc' \mcong{}\msuba{} x'yz') \mwedge{} Cong3(a'bc',x'yz'))))
By
Latex:
((Auto THEN (Duplicate (-5) THEN D -1) THEN ExRepD)
THEN (InstLemma `geo-between-out` [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}a'\mkleeneclose{}]\mcdot{} THENA Auto)
THEN (InstLemma `geo-between-out` [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}c'\mkleeneclose{}]\mcdot{} THENA Auto)
THEN (InstLemma `geo-between-out` [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}y\mkleeneclose{};\mkleeneopen{}x\mkleeneclose{};\mkleeneopen{}x'\mkleeneclose{}]\mcdot{} THENA Auto)
THEN (InstLemma `geo-between-out` [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}y\mkleeneclose{};\mkleeneopen{}z\mkleeneclose{};\mkleeneopen{}z'\mkleeneclose{}]\mcdot{} THENA Auto))
Home
Index