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