Metamath Proof Explorer


Theorem inaghl

Description: The "point lie in angle" relation is independent of the points chosen on the half lines starting from B . Theorem 11.25 of Schwabhauser p. 101. (Contributed by Thierry Arnoux, 27-Sep-2020)

Ref Expression
Hypotheses isinag.p P=BaseG
isinag.i I=ItvG
isinag.k K=hl𝒢G
isinag.x φXP
isinag.a φAP
isinag.b φBP
isinag.c φCP
inagflat.g φG𝒢Tarski
inagswap.1 φX𝒢G⟨“ABC”⟩
inaghl.d φDP
inaghl.f φFP
inaghl.y φYP
inaghl.1 φDKBA
inaghl.2 φFKBC
inaghl.3 φYKBX
Assertion inaghl φY𝒢G⟨“DBF”⟩

Proof

Step Hyp Ref Expression
1 isinag.p P=BaseG
2 isinag.i I=ItvG
3 isinag.k K=hl𝒢G
4 isinag.x φXP
5 isinag.a φAP
6 isinag.b φBP
7 isinag.c φCP
8 inagflat.g φG𝒢Tarski
9 inagswap.1 φX𝒢G⟨“ABC”⟩
10 inaghl.d φDP
11 inaghl.f φFP
12 inaghl.y φYP
13 inaghl.1 φDKBA
14 inaghl.2 φFKBC
15 inaghl.3 φYKBX
16 1 2 3 10 5 6 8 13 hlne1 φDB
17 1 2 3 11 7 6 8 14 hlne1 φFB
18 1 2 3 12 4 6 8 15 hlne1 φYB
19 16 17 18 3jca φDBFBYB
20 6 adantr φBAICBP
21 eleq1 y=ByDIFBDIF
22 eqeq1 y=By=BB=B
23 breq1 y=ByKBYBKBY
24 22 23 orbi12d y=By=ByKBYB=BBKBY
25 21 24 anbi12d y=ByDIFy=ByKBYBDIFB=BBKBY
26 25 adantl φBAICy=ByDIFy=ByKBYBDIFB=BBKBY
27 5 adantr φBAICAP
28 10 adantr φBAICDP
29 11 adantr φBAICFP
30 8 adantr φBAICG𝒢Tarski
31 1 2 3 10 5 6 8 13 hlcomd φAKBD
32 31 adantr φBAICAKBD
33 eqid distG=distG
34 7 adantr φBAICCP
35 1 2 3 11 7 6 8 14 hlcomd φCKBF
36 35 adantr φBAICCKBF
37 simpr φBAICBAIC
38 1 33 2 30 27 20 34 37 tgbtwncom φBAICBCIA
39 1 2 3 34 29 27 30 20 36 38 btwnhl φBAICBFIA
40 1 33 2 30 29 20 27 39 tgbtwncom φBAICBAIF
41 1 2 3 27 28 29 30 20 32 40 btwnhl φBAICBDIF
42 eqidd φBAICB=B
43 42 orcd φBAICB=BBKBY
44 41 43 jca φBAICBDIFB=BBKBY
45 20 26 44 rspcedvd φBAICyPyDIFy=ByKBY
46 simpllr φ¬BAICxPxAICx=BxP
47 simpr φ¬BAICxPxAICx=By=xy=x
48 47 eleq1d φ¬BAICxPxAICx=By=xyDIFxDIF
49 47 eqeq1d φ¬BAICxPxAICx=By=xy=Bx=B
50 47 breq1d φ¬BAICxPxAICx=By=xyKBYxKBY
51 49 50 orbi12d φ¬BAICxPxAICx=By=xy=ByKBYx=BxKBY
52 48 51 anbi12d φ¬BAICxPxAICx=By=xyDIFy=ByKBYxDIFx=BxKBY
53 simpr φ¬BAICxPxAICx=Bx=B
54 5 ad4antr φ¬BAICxPxAICx=BAP
55 10 ad4antr φ¬BAICxPxAICx=BDP
56 11 ad4antr φ¬BAICxPxAICx=BFP
57 8 ad4antr φ¬BAICxPxAICx=BG𝒢Tarski
58 6 ad4antr φ¬BAICxPxAICx=BBP
59 31 ad4antr φ¬BAICxPxAICx=BAKBD
60 7 ad4antr φ¬BAICxPxAICx=BCP
61 35 ad4antr φ¬BAICxPxAICx=BCKBF
62 simplr φ¬BAICxPxAICx=BxAIC
63 1 33 2 57 54 46 60 62 tgbtwncom φ¬BAICxPxAICx=BxCIA
64 53 63 eqeltrrd φ¬BAICxPxAICx=BBCIA
65 1 2 3 60 56 54 57 58 61 64 btwnhl φ¬BAICxPxAICx=BBFIA
66 1 33 2 57 56 58 54 65 tgbtwncom φ¬BAICxPxAICx=BBAIF
67 1 2 3 54 55 56 57 58 59 66 btwnhl φ¬BAICxPxAICx=BBDIF
68 53 67 eqeltrd φ¬BAICxPxAICx=BxDIF
69 53 orcd φ¬BAICxPxAICx=Bx=BxKBY
70 68 69 jca φ¬BAICxPxAICx=BxDIFx=BxKBY
71 46 52 70 rspcedvd φ¬BAICxPxAICx=ByPyDIFy=ByKBY
72 8 ad4antr φ¬BAICxPxAICxKBXG𝒢Tarski
73 72 ad2antrr φ¬BAICxPxAICxKBXzPxKBzzCIDG𝒢Tarski
74 simplr φ¬BAICxPxAICxKBXzPxKBzzCIDzP
75 6 ad4antr φ¬BAICxPxAICxKBXBP
76 75 ad2antrr φ¬BAICxPxAICxKBXzPxKBzzCIDBP
77 7 ad4antr φ¬BAICxPxAICxKBXCP
78 77 ad2antrr φ¬BAICxPxAICxKBXzPxKBzzCIDCP
79 10 ad4antr φ¬BAICxPxAICxKBXDP
80 79 ad2antrr φ¬BAICxPxAICxKBXzPxKBzzCIDDP
81 11 ad6antr φ¬BAICxPxAICxKBXzPxKBzzCIDFP
82 simpllr φ¬BAICxPxAICxKBXxP
83 82 ad2antrr φ¬BAICxPxAICxKBXzPxKBzzCIDxP
84 simprl φ¬BAICxPxAICxKBXzPxKBzzCIDxKBz
85 1 2 3 83 74 76 73 84 hlne2 φ¬BAICxPxAICxKBXzPxKBzzCIDzB
86 35 ad6antr φ¬BAICxPxAICxKBXzPxKBzzCIDCKBF
87 simprr φ¬BAICxPxAICxKBXzPxKBzzCIDzCID
88 1 33 2 73 78 74 80 87 tgbtwncom φ¬BAICxPxAICxKBXzPxKBzzCIDzDIC
89 1 2 3 73 74 76 78 80 81 85 86 88 hlpasch φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIF
90 simprr φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFyDIF
91 simplr φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFyP
92 74 ad2antrr φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFzP
93 12 ad8antr φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFYP
94 73 ad2antrr φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFG𝒢Tarski
95 76 ad2antrr φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFBP
96 simprl φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFzKBy
97 1 2 3 92 91 95 94 96 hlcomd φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFyKBz
98 82 ad4antr φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFxP
99 4 ad8antr φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFXP
100 15 ad8antr φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFYKBX
101 simp-5r φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFxKBX
102 1 2 3 98 99 95 94 101 hlcomd φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFXKBx
103 1 2 3 93 99 98 94 95 100 102 hltr φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFYKBx
104 simpllr φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFxKBzzCID
105 104 simpld φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFxKBz
106 1 2 3 93 98 92 94 95 103 105 hltr φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFYKBz
107 1 2 3 93 92 95 94 106 hlcomd φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFzKBY
108 1 2 3 91 92 93 94 95 97 107 hltr φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFyKBY
109 108 olcd φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFy=ByKBY
110 90 109 jca φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFyDIFy=ByKBY
111 110 ex φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFyDIFy=ByKBY
112 111 reximdva φ¬BAICxPxAICxKBXzPxKBzzCIDyPzKByyDIFyPyDIFy=ByKBY
113 89 112 mpd φ¬BAICxPxAICxKBXzPxKBzzCIDyPyDIFy=ByKBY
114 5 ad4antr φ¬BAICxPxAICxKBXAP
115 4 ad4antr φ¬BAICxPxAICxKBXXP
116 simpr φ¬BAICxPxAICxKBXxKBX
117 1 2 3 82 115 75 72 116 hlne1 φ¬BAICxPxAICxKBXxB
118 31 ad4antr φ¬BAICxPxAICxKBXAKBD
119 simplr φ¬BAICxPxAICxKBXxAIC
120 1 33 2 72 114 82 77 119 tgbtwncom φ¬BAICxPxAICxKBXxCIA
121 1 2 3 72 82 75 114 77 79 117 118 120 hlpasch φ¬BAICxPxAICxKBXzPxKBzzCID
122 113 121 r19.29a φ¬BAICxPxAICxKBXyPyDIFy=ByKBY
123 71 122 jaodan φ¬BAICxPxAICx=BxKBXyPyDIFy=ByKBY
124 123 anasss φ¬BAICxPxAICx=BxKBXyPyDIFy=ByKBY
125 1 2 3 4 5 6 7 8 isinag φX𝒢G⟨“ABC”⟩ABCBXBxPxAICx=BxKBX
126 9 125 mpbid φABCBXBxPxAICx=BxKBX
127 126 simprd φxPxAICx=BxKBX
128 127 adantr φ¬BAICxPxAICx=BxKBX
129 124 128 r19.29a φ¬BAICyPyDIFy=ByKBY
130 45 129 pm2.61dan φyPyDIFy=ByKBY
131 1 2 3 12 10 6 11 8 isinag φY𝒢G⟨“DBF”⟩DBFBYByPyDIFy=ByKBY
132 19 130 131 mpbir2and φY𝒢G⟨“DBF”⟩