Metamath Proof Explorer


Theorem leacgra1

Description: Source-side leA transport: replacing the smaller angle by a congruent angle preserves the angle order. The counterpart of leacgra2 , proved directly from the witness form of leA ( isleag , isleagd ). (Contributed by JAG, 12-Aug-2026)

Ref Expression
Hypotheses leacgra1.p ⊢ P = Base G
leacgra1.i ⊢ I = Itv ⁡ G
leacgra1.k ⊢ K = hl 𝒢 ⁡ G
leacgra1.g ⊢ φ → G ∈ 𝒢 Tarski
leacgra1.a ⊢ φ → A ∈ P
leacgra1.b ⊢ φ → B ∈ P
leacgra1.c ⊢ φ → C ∈ P
leacgra1.d ⊢ φ → D ∈ P
leacgra1.e ⊢ φ → E ∈ P
leacgra1.f ⊢ φ → F ∈ P
leacgra1.h ⊢ φ → H ∈ P
leacgra1.u ⊢ φ → U ∈ P
leacgra1.j ⊢ φ → J ∈ P
leacgra1.1 ⊢ φ → ⟨“ ABC ”⟩ ≤ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩
leacgra1.2 ⊢ φ → ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ HUJ ”⟩
Assertion leacgra1 ⊢ φ → ⟨“ HUJ ”⟩ ≤ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩

Proof

Step Hyp Ref Expression
1 leacgra1.p ⊢ P = Base G
2 leacgra1.i ⊢ I = Itv ⁡ G
3 leacgra1.k ⊢ K = hl 𝒢 ⁡ G
4 leacgra1.g ⊢ φ → G ∈ 𝒢 Tarski
5 leacgra1.a ⊢ φ → A ∈ P
6 leacgra1.b ⊢ φ → B ∈ P
7 leacgra1.c ⊢ φ → C ∈ P
8 leacgra1.d ⊢ φ → D ∈ P
9 leacgra1.e ⊢ φ → E ∈ P
10 leacgra1.f ⊢ φ → F ∈ P
11 leacgra1.h ⊢ φ → H ∈ P
12 leacgra1.u ⊢ φ → U ∈ P
13 leacgra1.j ⊢ φ → J ∈ P
14 leacgra1.1 ⊢ φ → ⟨“ ABC ”⟩ ≤ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩
15 leacgra1.2 ⊢ φ → ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ HUJ ”⟩
16 4 adantr ⊢ φ ∧ w ∈ P → G ∈ 𝒢 Tarski
17 16 adantr ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → G ∈ 𝒢 Tarski
18 11 adantr ⊢ φ ∧ w ∈ P → H ∈ P
19 18 adantr ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → H ∈ P
20 12 adantr ⊢ φ ∧ w ∈ P → U ∈ P
21 20 adantr ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → U ∈ P
22 13 adantr ⊢ φ ∧ w ∈ P → J ∈ P
23 22 adantr ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → J ∈ P
24 8 adantr ⊢ φ ∧ w ∈ P → D ∈ P
25 24 adantr ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → D ∈ P
26 9 adantr ⊢ φ ∧ w ∈ P → E ∈ P
27 26 adantr ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → E ∈ P
28 10 adantr ⊢ φ ∧ w ∈ P → F ∈ P
29 28 adantr ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → F ∈ P
30 eqid ⊢ ≤ 𝒢 ∠ ⁡ G = ≤ 𝒢 ∠ ⁡ G
31 simpl ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → φ ∧ w ∈ P
32 31 simprd ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → w ∈ P
33 simpr ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩
34 33 simpld ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩
35 5 adantr ⊢ φ ∧ w ∈ P → A ∈ P
36 35 adantr ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → A ∈ P
37 6 adantr ⊢ φ ∧ w ∈ P → B ∈ P
38 37 adantr ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → B ∈ P
39 7 adantr ⊢ φ ∧ w ∈ P → C ∈ P
40 39 adantr ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → C ∈ P
41 15 adantr ⊢ φ ∧ w ∈ P → ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ HUJ ”⟩
42 41 adantr ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ HUJ ”⟩
43 1 2 17 3 36 38 40 19 21 23 42 cgracom ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → ⟨“ HUJ ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ ABC ”⟩
44 33 simprd ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩
45 1 2 17 3 19 21 23 36 38 40 43 25 27 32 44 cgratr ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → ⟨“ HUJ ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩
46 1 17 19 21 23 25 27 29 30 32 34 45 isleagd ⊢ φ ∧ w ∈ P ∧ w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩ → ⟨“ HUJ ”⟩ ≤ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩
47 1 4 5 6 7 8 9 10 isleag ⊢ φ → ⟨“ ABC ”⟩ ≤ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ↔ ∃ w ∈ P w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩
48 14 47 mpbid ⊢ φ → ∃ w ∈ P w ∈ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩ ∧ ⟨“ ABC ”⟩ ∼ 𝒢 ∠ ⁡ G ⟨“ DEw ”⟩
49 46 48 r19.29a ⊢ φ → ⟨“ HUJ ”⟩ ≤ 𝒢 ∠ ⁡ G ⟨“ DEF ”⟩