Metamath Proof Explorer


Theorem cgrabtwn

Description: Angle congruence preserves flat angles. Part of Theorem 11.21 of Schwabhauser p. 97. (Contributed by Thierry Arnoux, 9-Aug-2020)

Ref Expression
Hypotheses cgracol.p ⊢ P = Base G
cgracol.i ⊢ I = Itv ⁡ G
cgracol.m ⊢ - ˙ = dist ⁡ G
cgracol.g ⊢ φ → G ∈ 𝒢 Tarski
cgracol.a ⊢ φ → A ∈ P
cgracol.b ⊢ φ → B ∈ P
cgracol.c ⊢ φ → C ∈ P
cgracol.d ⊢ φ → D ∈ P
cgracol.e ⊢ φ → E ∈ P
cgracol.f ⊢ φ → F ∈ P
cgracol.1 ⊢ φ → ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩
cgrabtwn.2 ⊢ φ → B ∈ A I C
Assertion cgrabtwn ⊢ φ → E ∈ D I F

Proof

Step Hyp Ref Expression
1 cgracol.p ⊢ P = Base G
2 cgracol.i ⊢ I = Itv ⁡ G
3 cgracol.m ⊢ - ˙ = dist ⁡ G
4 cgracol.g ⊢ φ → G ∈ 𝒢 Tarski
5 cgracol.a ⊢ φ → A ∈ P
6 cgracol.b ⊢ φ → B ∈ P
7 cgracol.c ⊢ φ → C ∈ P
8 cgracol.d ⊢ φ → D ∈ P
9 cgracol.e ⊢ φ → E ∈ P
10 cgracol.f ⊢ φ → F ∈ P
11 cgracol.1 ⊢ φ → ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩
12 cgrabtwn.2 ⊢ φ → B ∈ A I C
13 eqid ⊢ hl 𝒢 ⁡ G = hl 𝒢 ⁡ G
14 simpllr ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → x ∈ P
15 8 ad3antrrr ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → D ∈ P
16 10 ad3antrrr ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → F ∈ P
17 4 ad3antrrr ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → G ∈ 𝒢 Tarski
18 9 ad3antrrr ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → E ∈ P
19 simpr2 ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → x hl 𝒢 ⁡ G ⁡ E D
20 simplr ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → y ∈ P
21 simpr3 ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → y hl 𝒢 ⁡ G ⁡ E F
22 eqid ⊢ ∼ 𝒢 ⁡ G = ∼ 𝒢 ⁡ G
23 5 ad3antrrr ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → A ∈ P
24 6 ad3antrrr ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → B ∈ P
25 7 ad3antrrr ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → C ∈ P
26 simpr1 ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩
27 12 ad3antrrr ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → B ∈ A I C
28 1 3 2 22 17 23 24 25 14 18 20 26 27 tgbtwnxfr ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → E ∈ x I y
29 1 3 2 17 14 18 20 28 tgbtwncom ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → E ∈ y I x
30 1 2 13 20 16 14 17 18 21 29 btwnhl ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → E ∈ F I x
31 1 3 2 17 16 18 14 30 tgbtwncom ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → E ∈ x I F
32 1 2 13 14 15 16 17 18 19 31 btwnhl ⊢ φ ∧ x ∈ P ∧ y ∈ P ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F → E ∈ D I F
33 1 2 13 4 5 6 7 8 9 10 iscgra ⊢ φ → ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ↔ ∃ x ∈ P ∃ y ∈ P ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F
34 11 33 mpbid ⊢ φ → ∃ x ∈ P ∃ y ∈ P ⟨“ ABC ”⟩ ∼ 𝒢 ⁡ G ⟨“ xEy ”⟩ ∧ x hl 𝒢 ⁡ G ⁡ E D ∧ y hl 𝒢 ⁡ G ⁡ E F
35 32 34 r19.29vva ⊢ φ → E ∈ D I F