Metamath Proof Explorer


Theorem mirbtwnhl

Description: If the center of the point inversion A is between two points X and Y , then the half lines are mirrored. (Contributed by Thierry Arnoux, 3-Mar-2020)

Ref Expression
Hypotheses mirval.p 𝑃 = ( Base ‘ 𝐺 )
mirval.d = ( dist ‘ 𝐺 )
mirval.i 𝐼 = ( Itv ‘ 𝐺 )
mirval.l 𝐿 = ( LineG ‘ 𝐺 )
mirval.s 𝑆 = ( pInvG ‘ 𝐺 )
mirval.g ( 𝜑𝐺 ∈ TarskiG )
mirhl.m 𝑀 = ( 𝑆𝐴 )
mirhl.k 𝐾 = ( hlG ‘ 𝐺 )
mirhl.a ( 𝜑𝐴𝑃 )
mirhl.x ( 𝜑𝑋𝑃 )
mirhl.y ( 𝜑𝑌𝑃 )
mirhl.z ( 𝜑𝑍𝑃 )
mirbtwnhl.1 ( 𝜑𝑋𝐴 )
mirbtwnhl.2 ( 𝜑𝑌𝐴 )
mirbtwnhl.3 ( 𝜑𝐴 ∈ ( 𝑋 𝐼 𝑌 ) )
Assertion mirbtwnhl ( 𝜑 → ( 𝑍 ( 𝐾𝐴 ) 𝑋 ↔ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) )

Proof

Step Hyp Ref Expression
1 mirval.p 𝑃 = ( Base ‘ 𝐺 )
2 mirval.d = ( dist ‘ 𝐺 )
3 mirval.i 𝐼 = ( Itv ‘ 𝐺 )
4 mirval.l 𝐿 = ( LineG ‘ 𝐺 )
5 mirval.s 𝑆 = ( pInvG ‘ 𝐺 )
6 mirval.g ( 𝜑𝐺 ∈ TarskiG )
7 mirhl.m 𝑀 = ( 𝑆𝐴 )
8 mirhl.k 𝐾 = ( hlG ‘ 𝐺 )
9 mirhl.a ( 𝜑𝐴𝑃 )
10 mirhl.x ( 𝜑𝑋𝑃 )
11 mirhl.y ( 𝜑𝑌𝑃 )
12 mirhl.z ( 𝜑𝑍𝑃 )
13 mirbtwnhl.1 ( 𝜑𝑋𝐴 )
14 mirbtwnhl.2 ( 𝜑𝑌𝐴 )
15 mirbtwnhl.3 ( 𝜑𝐴 ∈ ( 𝑋 𝐼 𝑌 ) )
16 simpr ( ( 𝜑𝑍 = 𝐴 ) → 𝑍 = 𝐴 )
17 1 3 8 9 10 9 6 hleqnid ( 𝜑 → ¬ 𝐴 ( 𝐾𝐴 ) 𝑋 )
18 17 adantr ( ( 𝜑𝑍 = 𝐴 ) → ¬ 𝐴 ( 𝐾𝐴 ) 𝑋 )
19 16 18 eqnbrtrd ( ( 𝜑𝑍 = 𝐴 ) → ¬ 𝑍 ( 𝐾𝐴 ) 𝑋 )
20 16 fveq2d ( ( 𝜑𝑍 = 𝐴 ) → ( 𝑀𝑍 ) = ( 𝑀𝐴 ) )
21 1 2 3 4 5 6 9 7 mircinv ( 𝜑 → ( 𝑀𝐴 ) = 𝐴 )
22 21 adantr ( ( 𝜑𝑍 = 𝐴 ) → ( 𝑀𝐴 ) = 𝐴 )
23 20 22 eqtrd ( ( 𝜑𝑍 = 𝐴 ) → ( 𝑀𝑍 ) = 𝐴 )
24 1 3 8 9 11 9 6 hleqnid ( 𝜑 → ¬ 𝐴 ( 𝐾𝐴 ) 𝑌 )
25 24 adantr ( ( 𝜑𝑍 = 𝐴 ) → ¬ 𝐴 ( 𝐾𝐴 ) 𝑌 )
26 23 25 eqnbrtrd ( ( 𝜑𝑍 = 𝐴 ) → ¬ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 )
27 19 26 2falsed ( ( 𝜑𝑍 = 𝐴 ) → ( 𝑍 ( 𝐾𝐴 ) 𝑋 ↔ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) )
28 simplr ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → 𝑍𝐴 )
29 28 neneqd ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → ¬ 𝑍 = 𝐴 )
30 6 ad3antrrr ( ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) ∧ ( 𝑀𝑍 ) = 𝐴 ) → 𝐺 ∈ TarskiG )
31 9 ad3antrrr ( ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) ∧ ( 𝑀𝑍 ) = 𝐴 ) → 𝐴𝑃 )
32 12 ad3antrrr ( ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) ∧ ( 𝑀𝑍 ) = 𝐴 ) → 𝑍𝑃 )
33 simpr ( ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) ∧ ( 𝑀𝑍 ) = 𝐴 ) → ( 𝑀𝑍 ) = 𝐴 )
34 21 ad3antrrr ( ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) ∧ ( 𝑀𝑍 ) = 𝐴 ) → ( 𝑀𝐴 ) = 𝐴 )
35 33 34 eqtr4d ( ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) ∧ ( 𝑀𝑍 ) = 𝐴 ) → ( 𝑀𝑍 ) = ( 𝑀𝐴 ) )
36 1 2 3 4 5 30 31 7 32 31 35 mireq ( ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) ∧ ( 𝑀𝑍 ) = 𝐴 ) → 𝑍 = 𝐴 )
37 29 36 mtand ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → ¬ ( 𝑀𝑍 ) = 𝐴 )
38 37 neqned ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → ( 𝑀𝑍 ) ≠ 𝐴 )
39 14 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → 𝑌𝐴 )
40 6 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → 𝐺 ∈ TarskiG )
41 10 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → 𝑋𝑃 )
42 9 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → 𝐴𝑃 )
43 1 2 3 4 5 6 9 7 12 mircl ( 𝜑 → ( 𝑀𝑍 ) ∈ 𝑃 )
44 43 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → ( 𝑀𝑍 ) ∈ 𝑃 )
45 11 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → 𝑌𝑃 )
46 13 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → 𝑋𝐴 )
47 12 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → 𝑍𝑃 )
48 1 3 8 12 10 9 6 ishlg ( 𝜑 → ( 𝑍 ( 𝐾𝐴 ) 𝑋 ↔ ( 𝑍𝐴𝑋𝐴 ∧ ( 𝑍 ∈ ( 𝐴 𝐼 𝑋 ) ∨ 𝑋 ∈ ( 𝐴 𝐼 𝑍 ) ) ) ) )
49 48 adantr ( ( 𝜑𝑍𝐴 ) → ( 𝑍 ( 𝐾𝐴 ) 𝑋 ↔ ( 𝑍𝐴𝑋𝐴 ∧ ( 𝑍 ∈ ( 𝐴 𝐼 𝑋 ) ∨ 𝑋 ∈ ( 𝐴 𝐼 𝑍 ) ) ) ) )
50 49 biimpa ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → ( 𝑍𝐴𝑋𝐴 ∧ ( 𝑍 ∈ ( 𝐴 𝐼 𝑋 ) ∨ 𝑋 ∈ ( 𝐴 𝐼 𝑍 ) ) ) )
51 50 simp3d ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → ( 𝑍 ∈ ( 𝐴 𝐼 𝑋 ) ∨ 𝑋 ∈ ( 𝐴 𝐼 𝑍 ) ) )
52 51 orcomd ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → ( 𝑋 ∈ ( 𝐴 𝐼 𝑍 ) ∨ 𝑍 ∈ ( 𝐴 𝐼 𝑋 ) ) )
53 1 2 3 4 5 40 7 42 41 47 52 mirconn ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → 𝐴 ∈ ( 𝑋 𝐼 ( 𝑀𝑍 ) ) )
54 15 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → 𝐴 ∈ ( 𝑋 𝐼 𝑌 ) )
55 1 3 40 41 42 44 45 46 53 54 tgbtwnconn2 ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → ( ( 𝑀𝑍 ) ∈ ( 𝐴 𝐼 𝑌 ) ∨ 𝑌 ∈ ( 𝐴 𝐼 ( 𝑀𝑍 ) ) ) )
56 1 3 8 43 11 9 6 ishlg ( 𝜑 → ( ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ↔ ( ( 𝑀𝑍 ) ≠ 𝐴𝑌𝐴 ∧ ( ( 𝑀𝑍 ) ∈ ( 𝐴 𝐼 𝑌 ) ∨ 𝑌 ∈ ( 𝐴 𝐼 ( 𝑀𝑍 ) ) ) ) ) )
57 56 adantr ( ( 𝜑𝑍𝐴 ) → ( ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ↔ ( ( 𝑀𝑍 ) ≠ 𝐴𝑌𝐴 ∧ ( ( 𝑀𝑍 ) ∈ ( 𝐴 𝐼 𝑌 ) ∨ 𝑌 ∈ ( 𝐴 𝐼 ( 𝑀𝑍 ) ) ) ) ) )
58 57 adantr ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → ( ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ↔ ( ( 𝑀𝑍 ) ≠ 𝐴𝑌𝐴 ∧ ( ( 𝑀𝑍 ) ∈ ( 𝐴 𝐼 𝑌 ) ∨ 𝑌 ∈ ( 𝐴 𝐼 ( 𝑀𝑍 ) ) ) ) ) )
59 38 39 55 58 mpbir3and ( ( ( 𝜑𝑍𝐴 ) ∧ 𝑍 ( 𝐾𝐴 ) 𝑋 ) → ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 )
60 simplr ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → 𝑍𝐴 )
61 13 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → 𝑋𝐴 )
62 6 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → 𝐺 ∈ TarskiG )
63 11 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → 𝑌𝑃 )
64 9 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → 𝐴𝑃 )
65 12 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → 𝑍𝑃 )
66 10 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → 𝑋𝑃 )
67 14 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → 𝑌𝐴 )
68 21 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → ( 𝑀𝐴 ) = 𝐴 )
69 43 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → ( 𝑀𝑍 ) ∈ 𝑃 )
70 1 2 3 4 5 62 64 7 63 mircl ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → ( 𝑀𝑌 ) ∈ 𝑃 )
71 57 biimpa ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → ( ( 𝑀𝑍 ) ≠ 𝐴𝑌𝐴 ∧ ( ( 𝑀𝑍 ) ∈ ( 𝐴 𝐼 𝑌 ) ∨ 𝑌 ∈ ( 𝐴 𝐼 ( 𝑀𝑍 ) ) ) ) )
72 71 simp3d ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → ( ( 𝑀𝑍 ) ∈ ( 𝐴 𝐼 𝑌 ) ∨ 𝑌 ∈ ( 𝐴 𝐼 ( 𝑀𝑍 ) ) ) )
73 1 2 3 4 5 62 7 64 69 63 72 mirconn ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → 𝐴 ∈ ( ( 𝑀𝑍 ) 𝐼 ( 𝑀𝑌 ) ) )
74 1 2 3 62 69 64 70 73 tgbtwncom ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → 𝐴 ∈ ( ( 𝑀𝑌 ) 𝐼 ( 𝑀𝑍 ) ) )
75 68 74 eqeltrd ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → ( 𝑀𝐴 ) ∈ ( ( 𝑀𝑌 ) 𝐼 ( 𝑀𝑍 ) ) )
76 1 2 3 4 5 62 64 7 63 64 65 mirbtwnb ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → ( 𝐴 ∈ ( 𝑌 𝐼 𝑍 ) ↔ ( 𝑀𝐴 ) ∈ ( ( 𝑀𝑌 ) 𝐼 ( 𝑀𝑍 ) ) ) )
77 75 76 mpbird ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → 𝐴 ∈ ( 𝑌 𝐼 𝑍 ) )
78 1 2 3 6 10 9 11 15 tgbtwncom ( 𝜑𝐴 ∈ ( 𝑌 𝐼 𝑋 ) )
79 78 ad2antrr ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → 𝐴 ∈ ( 𝑌 𝐼 𝑋 ) )
80 1 3 62 63 64 65 66 67 77 79 tgbtwnconn2 ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → ( 𝑍 ∈ ( 𝐴 𝐼 𝑋 ) ∨ 𝑋 ∈ ( 𝐴 𝐼 𝑍 ) ) )
81 49 adantr ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → ( 𝑍 ( 𝐾𝐴 ) 𝑋 ↔ ( 𝑍𝐴𝑋𝐴 ∧ ( 𝑍 ∈ ( 𝐴 𝐼 𝑋 ) ∨ 𝑋 ∈ ( 𝐴 𝐼 𝑍 ) ) ) ) )
82 60 61 80 81 mpbir3and ( ( ( 𝜑𝑍𝐴 ) ∧ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) → 𝑍 ( 𝐾𝐴 ) 𝑋 )
83 59 82 impbida ( ( 𝜑𝑍𝐴 ) → ( 𝑍 ( 𝐾𝐴 ) 𝑋 ↔ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) )
84 27 83 pm2.61dane ( 𝜑 → ( 𝑍 ( 𝐾𝐴 ) 𝑋 ↔ ( 𝑀𝑍 ) ( 𝐾𝐴 ) 𝑌 ) )