MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  symggen Structured version   Visualization version   GIF version

Theorem symggen 19536
Description: The span of the transpositions is the subgroup that moves finitely many points. (Contributed by Stefan O'Rear, 28-Aug-2015.)
Hypotheses
Ref Expression
symgtrf.t 𝑇 = ran (pmTrsp‘𝐷)
symgtrf.g 𝐺 = (SymGrp‘𝐷)
symgtrf.b 𝐵 = (Base‘𝐺)
symggen.k 𝐾 = (mrCls‘(SubMnd‘𝐺))
Assertion
Ref Expression
symggen (𝐷𝑉 → (𝐾𝑇) = {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
Distinct variable groups:   𝑥,𝐵   𝑥,𝑇   𝑥,𝐾   𝑥,𝐷   𝑥,𝐺   𝑥,𝑉

Proof of Theorem symggen
Dummy variables 𝑢 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 elex 3484 . . . 4 (𝐷𝑉𝐷 ∈ V)
2 symgtrf.g . . . . . . 7 𝐺 = (SymGrp‘𝐷)
32symggrp 19466 . . . . . 6 (𝐷 ∈ V → 𝐺 ∈ Grp)
43grpmndd 19009 . . . . 5 (𝐷 ∈ V → 𝐺 ∈ Mnd)
5 symgtrf.b . . . . . 6 𝐵 = (Base‘𝐺)
65submacs 18882 . . . . 5 (𝐺 ∈ Mnd → (SubMnd‘𝐺) ∈ (ACS‘𝐵))
7 acsmre 17704 . . . . 5 ((SubMnd‘𝐺) ∈ (ACS‘𝐵) → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
84, 6, 73syl 19 . . . 4 (𝐷 ∈ V → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
91, 8syl 18 . . 3 (𝐷𝑉 → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
10 symgtrf.t . . . . . 6 𝑇 = ran (pmTrsp‘𝐷)
1110, 2, 5symgtrf 19535 . . . . 5 𝑇𝐵
1211a1i 11 . . . 4 (𝐷𝑉𝑇𝐵)
13 2onn 8624 . . . . . 6 2o ∈ ω
14 nnfi 9148 . . . . . 6 (2o ∈ ω → 2o ∈ Fin)
1513, 14ax-mp 5 . . . . 5 2o ∈ Fin
16 eqid 2769 . . . . . . . . 9 (pmTrsp‘𝐷) = (pmTrsp‘𝐷)
1716, 10pmtrfb 19531 . . . . . . . 8 (𝑥𝑇 ↔ (𝐷 ∈ V ∧ 𝑥:𝐷1-1-onto𝐷 ∧ dom (𝑥 ∖ I ) ≈ 2o))
1817simp3bi 1163 . . . . . . 7 (𝑥𝑇 → dom (𝑥 ∖ I ) ≈ 2o)
19 enfi 9167 . . . . . . 7 (dom (𝑥 ∖ I ) ≈ 2o → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2o ∈ Fin))
2018, 19syl 18 . . . . . 6 (𝑥𝑇 → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2o ∈ Fin))
2120adantl 486 . . . . 5 ((𝐷𝑉𝑥𝑇) → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2o ∈ Fin))
2215, 21mpbiri 261 . . . 4 ((𝐷𝑉𝑥𝑇) → dom (𝑥 ∖ I ) ∈ Fin)
2312, 22ssrabdv 4035 . . 3 (𝐷𝑉𝑇 ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
242, 5symgfisg 19534 . . . 4 (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubGrp‘𝐺))
25 subgsubm 19211 . . . 4 ({𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubGrp‘𝐺) → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺))
2624, 25syl 18 . . 3 (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺))
27 symggen.k . . . 4 𝐾 = (mrCls‘(SubMnd‘𝐺))
2827mrcsscl 17672 . . 3 (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇 ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∧ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺)) → (𝐾𝑇) ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
299, 23, 26, 28syl3anc 1396 . 2 (𝐷𝑉 → (𝐾𝑇) ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
30 vex 3467 . . . . . . 7 𝑥 ∈ V
3130a1i 11 . . . . . 6 (dom (𝑥 ∖ I ) ∈ Fin → 𝑥 ∈ V)
32 finnum 9930 . . . . . 6 (dom (𝑥 ∖ I ) ∈ Fin → dom (𝑥 ∖ I ) ∈ dom card)
33 domfi 9169 . . . . . . . 8 ((dom (𝑥 ∖ I ) ∈ Fin ∧ dom (𝑦 ∖ I ) ≼ dom (𝑥 ∖ I )) → dom (𝑦 ∖ I ) ∈ Fin)
342, 5symgbasf1o 19441 . . . . . . . . . . . . . . 15 (𝑦𝐵𝑦:𝐷1-1-onto𝐷)
3534adantl 486 . . . . . . . . . . . . . 14 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝑦:𝐷1-1-onto𝐷)
36 f1ofn 6819 . . . . . . . . . . . . . 14 (𝑦:𝐷1-1-onto𝐷𝑦 Fn 𝐷)
37 fnnfpeq0 7174 . . . . . . . . . . . . . 14 (𝑦 Fn 𝐷 → (dom (𝑦 ∖ I ) = ∅ ↔ 𝑦 = ( I ↾ 𝐷)))
3835, 36, 373syl 19 . . . . . . . . . . . . 13 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (dom (𝑦 ∖ I ) = ∅ ↔ 𝑦 = ( I ↾ 𝐷)))
392, 5elbasfv 17271 . . . . . . . . . . . . . . . . 17 (𝑦𝐵𝐷 ∈ V)
4039adantl 486 . . . . . . . . . . . . . . . 16 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝐷 ∈ V)
412symgid 19467 . . . . . . . . . . . . . . . 16 (𝐷 ∈ V → ( I ↾ 𝐷) = (0g𝐺))
4240, 41syl 18 . . . . . . . . . . . . . . 15 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → ( I ↾ 𝐷) = (0g𝐺))
4340, 8syl 18 . . . . . . . . . . . . . . . . 17 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
4427mrccl 17663 . . . . . . . . . . . . . . . . 17 (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇𝐵) → (𝐾𝑇) ∈ (SubMnd‘𝐺))
4543, 11, 44sylancl 597 . . . . . . . . . . . . . . . 16 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (𝐾𝑇) ∈ (SubMnd‘𝐺))
46 eqid 2769 . . . . . . . . . . . . . . . . 17 (0g𝐺) = (0g𝐺)
4746subm0cl 18865 . . . . . . . . . . . . . . . 16 ((𝐾𝑇) ∈ (SubMnd‘𝐺) → (0g𝐺) ∈ (𝐾𝑇))
4845, 47syl 18 . . . . . . . . . . . . . . 15 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (0g𝐺) ∈ (𝐾𝑇))
4942, 48eqeltrd 2869 . . . . . . . . . . . . . 14 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → ( I ↾ 𝐷) ∈ (𝐾𝑇))
50 eleq1a 2864 . . . . . . . . . . . . . 14 (( I ↾ 𝐷) ∈ (𝐾𝑇) → (𝑦 = ( I ↾ 𝐷) → 𝑦 ∈ (𝐾𝑇)))
5149, 50syl 18 . . . . . . . . . . . . 13 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (𝑦 = ( I ↾ 𝐷) → 𝑦 ∈ (𝐾𝑇)))
5238, 51sylbid 243 . . . . . . . . . . . 12 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (dom (𝑦 ∖ I ) = ∅ → 𝑦 ∈ (𝐾𝑇)))
5352adantr 485 . . . . . . . . . . 11 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (dom (𝑦 ∖ I ) = ∅ → 𝑦 ∈ (𝐾𝑇)))
54 n0 4314 . . . . . . . . . . . 12 (dom (𝑦 ∖ I ) ≠ ∅ ↔ ∃𝑢 𝑢 ∈ dom (𝑦 ∖ I ))
5540adantr 485 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝐷 ∈ V)
56 simpr 489 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢 ∈ dom (𝑦 ∖ I ))
57 f1omvdmvd 19509 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦:𝐷1-1-onto𝐷𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ (dom (𝑦 ∖ I ) ∖ {𝑢}))
5835, 57sylan 591 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ (dom (𝑦 ∖ I ) ∖ {𝑢}))
5958eldifad 3925 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ dom (𝑦 ∖ I ))
6056, 59prssd 4789 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦𝑢)} ⊆ dom (𝑦 ∖ I ))
61 difss 4098 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∖ I ) ⊆ 𝑦
62 dmss 5890 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦 ∖ I ) ⊆ 𝑦 → dom (𝑦 ∖ I ) ⊆ dom 𝑦)
6361, 62ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . 24 dom (𝑦 ∖ I ) ⊆ dom 𝑦
64 f1odm 6822 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦:𝐷1-1-onto𝐷 → dom 𝑦 = 𝐷)
6535, 64syl 18 . . . . . . . . . . . . . . . . . . . . . . . 24 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → dom 𝑦 = 𝐷)
6663, 65sseqtrid 3987 . . . . . . . . . . . . . . . . . . . . . . 23 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → dom (𝑦 ∖ I ) ⊆ 𝐷)
6766adantr 485 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ⊆ 𝐷)
6860, 67sstrd 3955 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦𝑢)} ⊆ 𝐷)
69 vex 3467 . . . . . . . . . . . . . . . . . . . . . 22 𝑢 ∈ V
70 fvex 6892 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦𝑢) ∈ V
7135adantr 485 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦:𝐷1-1-onto𝐷)
7271, 36syl 18 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦 Fn 𝐷)
7366sselda 3945 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢𝐷)
74 fnelnfp 7173 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦 Fn 𝐷𝑢𝐷) → (𝑢 ∈ dom (𝑦 ∖ I ) ↔ (𝑦𝑢) ≠ 𝑢))
7572, 73, 74syl2anc 595 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑢 ∈ dom (𝑦 ∖ I ) ↔ (𝑦𝑢) ≠ 𝑢))
7656, 75mpbid 235 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ≠ 𝑢)
7776necomd 3019 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢 ≠ (𝑦𝑢))
78 enpr2 9984 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑢 ∈ V ∧ (𝑦𝑢) ∈ V ∧ 𝑢 ≠ (𝑦𝑢)) → {𝑢, (𝑦𝑢)} ≈ 2o)
7969, 70, 77, 78mp3an12i 1491 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦𝑢)} ≈ 2o)
8016, 10pmtrrn 19523 . . . . . . . . . . . . . . . . . . . . 21 ((𝐷 ∈ V ∧ {𝑢, (𝑦𝑢)} ⊆ 𝐷 ∧ {𝑢, (𝑦𝑢)} ≈ 2o) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝑇)
8155, 68, 79, 80syl3anc 1396 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝑇)
8211, 81sselid 3943 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵)
83 simplr 780 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦𝐵)
84 eqid 2769 . . . . . . . . . . . . . . . . . . . 20 (+g𝐺) = (+g𝐺)
852, 5, 84symgov 19450 . . . . . . . . . . . . . . . . . . 19 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵𝑦𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦))
8682, 83, 85syl2anc 595 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦))
8786oveq2d 7424 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)))
8840, 3syl 18 . . . . . . . . . . . . . . . . . . . . 21 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝐺 ∈ Grp)
8988adantr 485 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝐺 ∈ Grp)
905, 84grpcl 19004 . . . . . . . . . . . . . . . . . . . 20 ((𝐺 ∈ Grp ∧ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵𝑦𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵)
9189, 82, 83, 90syl3anc 1396 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵)
9286, 91eqeltrrd 2870 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∈ 𝐵)
932, 5, 84symgov 19450 . . . . . . . . . . . . . . . . . 18 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵 ∧ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∈ 𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)))
9482, 92, 93syl2anc 595 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)))
95 coass 6264 . . . . . . . . . . . . . . . . . 18 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) ∘ 𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦))
9616, 10pmtrfinv 19527 . . . . . . . . . . . . . . . . . . . . 21 (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝑇 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) = ( I ↾ 𝐷))
9781, 96syl 18 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) = ( I ↾ 𝐷))
9897coeq1d 5845 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) ∘ 𝑦) = (( I ↾ 𝐷) ∘ 𝑦))
99 f1of 6818 . . . . . . . . . . . . . . . . . . . 20 (𝑦:𝐷1-1-onto𝐷𝑦:𝐷𝐷)
100 fcoi2 6751 . . . . . . . . . . . . . . . . . . . 20 (𝑦:𝐷𝐷 → (( I ↾ 𝐷) ∘ 𝑦) = 𝑦)
10171, 99, 1003syl 19 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (( I ↾ 𝐷) ∘ 𝑦) = 𝑦)
10298, 101eqtrd 2804 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) ∘ 𝑦) = 𝑦)
10395, 102eqtr3id 2818 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)) = 𝑦)
10487, 94, 1033eqtrd 2808 . . . . . . . . . . . . . . . 16 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) = 𝑦)
105104adantlr 727 . . . . . . . . . . . . . . 15 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) = 𝑦)
10645ad2antrr 738 . . . . . . . . . . . . . . . 16 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝐾𝑇) ∈ (SubMnd‘𝐺))
10727mrcssid 17669 . . . . . . . . . . . . . . . . . . . 20 (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇𝐵) → 𝑇 ⊆ (𝐾𝑇))
10843, 11, 107sylancl 597 . . . . . . . . . . . . . . . . . . 19 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝑇 ⊆ (𝐾𝑇))
109108adantr 485 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑇 ⊆ (𝐾𝑇))
110109, 81sseldd 3946 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ (𝐾𝑇))
111110adantlr 727 . . . . . . . . . . . . . . . 16 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ (𝐾𝑇))
11286difeq1d 4088 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) = ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ))
113112dmeqd 5893 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) = dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ))
114 simpll 778 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ∈ Fin)
115 mvdco 19511 . . . . . . . . . . . . . . . . . . . . . 22 dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊆ (dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) ∪ dom (𝑦 ∖ I ))
11616pmtrmvd 19522 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐷 ∈ V ∧ {𝑢, (𝑦𝑢)} ⊆ 𝐷 ∧ {𝑢, (𝑦𝑢)} ≈ 2o) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) = {𝑢, (𝑦𝑢)})
11755, 68, 79, 116syl3anc 1396 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) = {𝑢, (𝑦𝑢)})
118117, 60eqsstrd 3979 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) ⊆ dom (𝑦 ∖ I ))
119 ssidd 3968 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ⊆ dom (𝑦 ∖ I ))
120118, 119unssd 4153 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) ∪ dom (𝑦 ∖ I )) ⊆ dom (𝑦 ∖ I ))
121115, 120sstrid 3956 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊆ dom (𝑦 ∖ I ))
122 fvco2 6976 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑦 Fn 𝐷𝑢𝐷) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)))
12372, 73, 122syl2anc 595 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)))
124 prcom 4700 . . . . . . . . . . . . . . . . . . . . . . . . . 26 {𝑢, (𝑦𝑢)} = {(𝑦𝑢), 𝑢}
125124fveq2i 6882 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) = ((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})
126125fveq1i 6880 . . . . . . . . . . . . . . . . . . . . . . . 24 (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)) = (((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})‘(𝑦𝑢))
12767, 59sseldd 3946 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ 𝐷)
12816pmtrprfv 19519 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐷 ∈ V ∧ ((𝑦𝑢) ∈ 𝐷𝑢𝐷 ∧ (𝑦𝑢) ≠ 𝑢)) → (((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})‘(𝑦𝑢)) = 𝑢)
12955, 127, 73, 76, 128syl13anc 1397 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})‘(𝑦𝑢)) = 𝑢)
130126, 129eqtrid 2816 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)) = 𝑢)
131123, 130eqtrd 2804 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = 𝑢)
1322, 5symgbasf1o 19441 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦):𝐷1-1-onto𝐷)
133 f1ofn 6819 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦):𝐷1-1-onto𝐷 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷)
13492, 132, 1333syl 19 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷)
135 fnelnfp 7173 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷𝑢𝐷) → (𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ↔ ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) ≠ 𝑢))
136135necon2bbid 3007 . . . . . . . . . . . . . . . . . . . . . . 23 (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷𝑢𝐷) → (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = 𝑢 ↔ ¬ 𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I )))
137134, 73, 136syl2anc 595 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = 𝑢 ↔ ¬ 𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I )))
138131, 137mpbid 235 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ¬ 𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ))
139121, 56, 138ssnelpssd 4078 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊊ dom (𝑦 ∖ I ))
140 php3 9189 . . . . . . . . . . . . . . . . . . . 20 ((dom (𝑦 ∖ I ) ∈ Fin ∧ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊊ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
141114, 139, 140syl2anc 595 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
142113, 141eqbrtrd 5134 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
143142adantlr 727 . . . . . . . . . . . . . . . . 17 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
14491adantlr 727 . . . . . . . . . . . . . . . . 17 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵)
145 ovex 7441 . . . . . . . . . . . . . . . . . . 19 (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ V
146 difeq1 4082 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (𝑧 ∖ I ) = ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ))
147146dmeqd 5893 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → dom (𝑧 ∖ I ) = dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ))
148147breq1d 5120 . . . . . . . . . . . . . . . . . . . 20 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) ↔ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I )))
149 eleq1 2857 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (𝑧𝐵 ↔ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵))
150 eleq1 2857 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (𝑧 ∈ (𝐾𝑇) ↔ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇)))
151149, 150imbi12d 347 . . . . . . . . . . . . . . . . . . . 20 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → ((𝑧𝐵𝑧 ∈ (𝐾𝑇)) ↔ ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇))))
152148, 151imbi12d 347 . . . . . . . . . . . . . . . . . . 19 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → ((dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) ↔ (dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇)))))
153145, 152spcv 3573 . . . . . . . . . . . . . . . . . 18 (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) → (dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇))))
154153ad2antlr 739 . . . . . . . . . . . . . . . . 17 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇))))
155143, 144, 154mp2d 50 . . . . . . . . . . . . . . . 16 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇))
15684submcl 18866 . . . . . . . . . . . . . . . 16 (((𝐾𝑇) ∈ (SubMnd‘𝐺) ∧ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ (𝐾𝑇) ∧ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇)) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) ∈ (𝐾𝑇))
157106, 111, 155, 156syl3anc 1396 . . . . . . . . . . . . . . 15 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) ∈ (𝐾𝑇))
158105, 157eqeltrrd 2870 . . . . . . . . . . . . . 14 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦 ∈ (𝐾𝑇))
159158ex 417 . . . . . . . . . . . . 13 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (𝑢 ∈ dom (𝑦 ∖ I ) → 𝑦 ∈ (𝐾𝑇)))
160159exlimdv 1960 . . . . . . . . . . . 12 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (∃𝑢 𝑢 ∈ dom (𝑦 ∖ I ) → 𝑦 ∈ (𝐾𝑇)))
16154, 160biimtrid 245 . . . . . . . . . . 11 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (dom (𝑦 ∖ I ) ≠ ∅ → 𝑦 ∈ (𝐾𝑇)))
16253, 161pm2.61dne 3050 . . . . . . . . . 10 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → 𝑦 ∈ (𝐾𝑇))
163162exp31 424 . . . . . . . . 9 (dom (𝑦 ∖ I ) ∈ Fin → (𝑦𝐵 → (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) → 𝑦 ∈ (𝐾𝑇))))
164163com23 87 . . . . . . . 8 (dom (𝑦 ∖ I ) ∈ Fin → (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) → (𝑦𝐵𝑦 ∈ (𝐾𝑇))))
16533, 164syl 18 . . . . . . 7 ((dom (𝑥 ∖ I ) ∈ Fin ∧ dom (𝑦 ∖ I ) ≼ dom (𝑥 ∖ I )) → (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) → (𝑦𝐵𝑦 ∈ (𝐾𝑇))))
1661653impia 1133 . . . . . 6 ((dom (𝑥 ∖ I ) ∈ Fin ∧ dom (𝑦 ∖ I ) ≼ dom (𝑥 ∖ I ) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (𝑦𝐵𝑦 ∈ (𝐾𝑇)))
167 eleq1w 2852 . . . . . . 7 (𝑦 = 𝑧 → (𝑦𝐵𝑧𝐵))
168 eleq1w 2852 . . . . . . 7 (𝑦 = 𝑧 → (𝑦 ∈ (𝐾𝑇) ↔ 𝑧 ∈ (𝐾𝑇)))
169167, 168imbi12d 347 . . . . . 6 (𝑦 = 𝑧 → ((𝑦𝐵𝑦 ∈ (𝐾𝑇)) ↔ (𝑧𝐵𝑧 ∈ (𝐾𝑇))))
170 eleq1w 2852 . . . . . . 7 (𝑦 = 𝑥 → (𝑦𝐵𝑥𝐵))
171 eleq1w 2852 . . . . . . 7 (𝑦 = 𝑥 → (𝑦 ∈ (𝐾𝑇) ↔ 𝑥 ∈ (𝐾𝑇)))
172170, 171imbi12d 347 . . . . . 6 (𝑦 = 𝑥 → ((𝑦𝐵𝑦 ∈ (𝐾𝑇)) ↔ (𝑥𝐵𝑥 ∈ (𝐾𝑇))))
173 difeq1 4082 . . . . . . 7 (𝑦 = 𝑧 → (𝑦 ∖ I ) = (𝑧 ∖ I ))
174173dmeqd 5893 . . . . . 6 (𝑦 = 𝑧 → dom (𝑦 ∖ I ) = dom (𝑧 ∖ I ))
175 difeq1 4082 . . . . . . 7 (𝑦 = 𝑥 → (𝑦 ∖ I ) = (𝑥 ∖ I ))
176175dmeqd 5893 . . . . . 6 (𝑦 = 𝑥 → dom (𝑦 ∖ I ) = dom (𝑥 ∖ I ))
17731, 32, 166, 169, 172, 174, 176indcardi 10021 . . . . 5 (dom (𝑥 ∖ I ) ∈ Fin → (𝑥𝐵𝑥 ∈ (𝐾𝑇)))
178177impcom 412 . . . 4 ((𝑥𝐵 ∧ dom (𝑥 ∖ I ) ∈ Fin) → 𝑥 ∈ (𝐾𝑇))
1791783adant1 1146 . . 3 ((𝐷𝑉𝑥𝐵 ∧ dom (𝑥 ∖ I ) ∈ Fin) → 𝑥 ∈ (𝐾𝑇))
180179rabssdv 4036 . 2 (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ⊆ (𝐾𝑇))
18129, 180eqssd 3962 1 (𝐷𝑉 → (𝐾𝑇) = {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 400  wal 1565   = wceq 1567  wex 1806  wcel 2149  wne 2964  {crab 3423  Vcvv 3463  cdif 3910  cun 3911  wss 3913  wpss 3914  c0 4294  {csn 4591  {cpr 4593   class class class wbr 5110   I cid 5553  dom cdm 5659  ran crn 5660  cres 5661  ccom 5663   Fn wfn 6528  wf 6529  1-1-ontowf1o 6532  cfv 6533  (class class class)co 7408  ωcom 7858  2oc2o 8443  cen 8936  cdom 8937  csdm 8938  Fincfn 8939  Basecbs 17265  +gcplusg 17306  0gc0g 17488  Moorecmre 17630  mrClscmrc 17631  ACScacs 17633  Mndcmnd 18788  SubMndcsubmnd 18836  Grpcgrp 18996  SubGrpcsubg 19182  SymGrpcsymg 19435  pmTrspcpmtr 19507
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5239  ax-sep 5258  ax-nul 5268  ax-pow 5334  ax-pr 5402  ax-un 7730  ax-cnex 11152  ax-resscn 11153  ax-1cn 11154  ax-icn 11155  ax-addcl 11156  ax-addrcl 11157  ax-mulcl 11158  ax-mulrcl 11159  ax-mulcom 11160  ax-addass 11161  ax-mulass 11162  ax-distr 11163  ax-i2m1 11164  ax-1ne0 11165  ax-1rid 11166  ax-rnegex 11167  ax-rrecex 11168  ax-cnre 11169  ax-pre-lttri 11170  ax-pre-lttrn 11171  ax-pre-ltadd 11172  ax-pre-mulgt0 11173
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-nel 3071  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-tp 4596  df-op 4598  df-uni 4874  df-int 4914  df-iun 4959  df-iin 4960  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-se 5613  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6299  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-isom 6542  df-riota 7365  df-ov 7411  df-oprab 7412  df-mpo 7413  df-om 7859  df-1st 7982  df-2nd 7983  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-2o 8450  df-er 8690  df-map 8822  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-card 9921  df-pnf 11241  df-mnf 11242  df-xr 11243  df-ltxr 11244  df-le 11245  df-sub 11439  df-neg 11440  df-nn 12230  df-2 12299  df-3 12300  df-4 12301  df-5 12302  df-6 12303  df-7 12304  df-8 12305  df-9 12306  df-n0 12501  df-z 12588  df-uz 12859  df-fz 13532  df-struct 17203  df-sets 17220  df-slot 17238  df-ndx 17250  df-base 17266  df-ress 17287  df-plusg 17319  df-tset 17325  df-0g 17490  df-mre 17634  df-mrc 17635  df-acs 17637  df-mgm 18694  df-sgrp 18773  df-mnd 18789  df-submnd 18838  df-efmnd 18924  df-grp 18999  df-minusg 19000  df-subg 19185  df-symg 19436  df-pmtr 19508
This theorem is referenced by:  symggen2  19537  psgneldm2  19570
  Copyright terms: Public domain W3C validator