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

Theorem symggen 18993
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 3440 . . . 4 (𝐷𝑉𝐷 ∈ V)
2 symgtrf.g . . . . . . 7 𝐺 = (SymGrp‘𝐷)
32symggrp 18923 . . . . . 6 (𝐷 ∈ V → 𝐺 ∈ Grp)
43grpmndd 18504 . . . . 5 (𝐷 ∈ V → 𝐺 ∈ Mnd)
5 symgtrf.b . . . . . 6 𝐵 = (Base‘𝐺)
65submacs 18380 . . . . 5 (𝐺 ∈ Mnd → (SubMnd‘𝐺) ∈ (ACS‘𝐵))
7 acsmre 17278 . . . . 5 ((SubMnd‘𝐺) ∈ (ACS‘𝐵) → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
84, 6, 73syl 18 . . . 4 (𝐷 ∈ V → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
91, 8syl 17 . . 3 (𝐷𝑉 → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
10 symgtrf.t . . . . . 6 𝑇 = ran (pmTrsp‘𝐷)
1110, 2, 5symgtrf 18992 . . . . 5 𝑇𝐵
1211a1i 11 . . . 4 (𝐷𝑉𝑇𝐵)
13 2onn 8433 . . . . . 6 2o ∈ ω
14 nnfi 8912 . . . . . 6 (2o ∈ ω → 2o ∈ Fin)
1513, 14ax-mp 5 . . . . 5 2o ∈ Fin
16 eqid 2738 . . . . . . . . 9 (pmTrsp‘𝐷) = (pmTrsp‘𝐷)
1716, 10pmtrfb 18988 . . . . . . . 8 (𝑥𝑇 ↔ (𝐷 ∈ V ∧ 𝑥:𝐷1-1-onto𝐷 ∧ dom (𝑥 ∖ I ) ≈ 2o))
1817simp3bi 1145 . . . . . . 7 (𝑥𝑇 → dom (𝑥 ∖ I ) ≈ 2o)
19 enfi 8933 . . . . . . 7 (dom (𝑥 ∖ I ) ≈ 2o → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2o ∈ Fin))
2018, 19syl 17 . . . . . 6 (𝑥𝑇 → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2o ∈ Fin))
2120adantl 481 . . . . 5 ((𝐷𝑉𝑥𝑇) → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2o ∈ Fin))
2215, 21mpbiri 257 . . . 4 ((𝐷𝑉𝑥𝑇) → dom (𝑥 ∖ I ) ∈ Fin)
2312, 22ssrabdv 4003 . . 3 (𝐷𝑉𝑇 ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
242, 5symgfisg 18991 . . . 4 (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubGrp‘𝐺))
25 subgsubm 18692 . . . 4 ({𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubGrp‘𝐺) → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺))
2624, 25syl 17 . . 3 (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺))
27 symggen.k . . . 4 𝐾 = (mrCls‘(SubMnd‘𝐺))
2827mrcsscl 17246 . . 3 (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇 ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∧ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺)) → (𝐾𝑇) ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
299, 23, 26, 28syl3anc 1369 . 2 (𝐷𝑉 → (𝐾𝑇) ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
30 vex 3426 . . . . . . 7 𝑥 ∈ V
3130a1i 11 . . . . . 6 (dom (𝑥 ∖ I ) ∈ Fin → 𝑥 ∈ V)
32 finnum 9637 . . . . . 6 (dom (𝑥 ∖ I ) ∈ Fin → dom (𝑥 ∖ I ) ∈ dom card)
33 domfi 8935 . . . . . . . 8 ((dom (𝑥 ∖ I ) ∈ Fin ∧ dom (𝑦 ∖ I ) ≼ dom (𝑥 ∖ I )) → dom (𝑦 ∖ I ) ∈ Fin)
342, 5symgbasf1o 18897 . . . . . . . . . . . . . . 15 (𝑦𝐵𝑦:𝐷1-1-onto𝐷)
3534adantl 481 . . . . . . . . . . . . . 14 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝑦:𝐷1-1-onto𝐷)
36 f1ofn 6701 . . . . . . . . . . . . . 14 (𝑦:𝐷1-1-onto𝐷𝑦 Fn 𝐷)
37 fnnfpeq0 7032 . . . . . . . . . . . . . 14 (𝑦 Fn 𝐷 → (dom (𝑦 ∖ I ) = ∅ ↔ 𝑦 = ( I ↾ 𝐷)))
3835, 36, 373syl 18 . . . . . . . . . . . . 13 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (dom (𝑦 ∖ I ) = ∅ ↔ 𝑦 = ( I ↾ 𝐷)))
392, 5elbasfv 16846 . . . . . . . . . . . . . . . . 17 (𝑦𝐵𝐷 ∈ V)
4039adantl 481 . . . . . . . . . . . . . . . 16 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝐷 ∈ V)
412symgid 18924 . . . . . . . . . . . . . . . 16 (𝐷 ∈ V → ( I ↾ 𝐷) = (0g𝐺))
4240, 41syl 17 . . . . . . . . . . . . . . 15 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → ( I ↾ 𝐷) = (0g𝐺))
4340, 8syl 17 . . . . . . . . . . . . . . . . 17 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
4427mrccl 17237 . . . . . . . . . . . . . . . . 17 (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇𝐵) → (𝐾𝑇) ∈ (SubMnd‘𝐺))
4543, 11, 44sylancl 585 . . . . . . . . . . . . . . . 16 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (𝐾𝑇) ∈ (SubMnd‘𝐺))
46 eqid 2738 . . . . . . . . . . . . . . . . 17 (0g𝐺) = (0g𝐺)
4746subm0cl 18365 . . . . . . . . . . . . . . . 16 ((𝐾𝑇) ∈ (SubMnd‘𝐺) → (0g𝐺) ∈ (𝐾𝑇))
4845, 47syl 17 . . . . . . . . . . . . . . 15 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (0g𝐺) ∈ (𝐾𝑇))
4942, 48eqeltrd 2839 . . . . . . . . . . . . . 14 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → ( I ↾ 𝐷) ∈ (𝐾𝑇))
50 eleq1a 2834 . . . . . . . . . . . . . 14 (( I ↾ 𝐷) ∈ (𝐾𝑇) → (𝑦 = ( I ↾ 𝐷) → 𝑦 ∈ (𝐾𝑇)))
5149, 50syl 17 . . . . . . . . . . . . 13 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (𝑦 = ( I ↾ 𝐷) → 𝑦 ∈ (𝐾𝑇)))
5238, 51sylbid 239 . . . . . . . . . . . 12 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (dom (𝑦 ∖ I ) = ∅ → 𝑦 ∈ (𝐾𝑇)))
5352adantr 480 . . . . . . . . . . 11 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (dom (𝑦 ∖ I ) = ∅ → 𝑦 ∈ (𝐾𝑇)))
54 n0 4277 . . . . . . . . . . . 12 (dom (𝑦 ∖ I ) ≠ ∅ ↔ ∃𝑢 𝑢 ∈ dom (𝑦 ∖ I ))
5540adantr 480 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝐷 ∈ V)
56 simpr 484 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢 ∈ dom (𝑦 ∖ I ))
57 f1omvdmvd 18966 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦:𝐷1-1-onto𝐷𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ (dom (𝑦 ∖ I ) ∖ {𝑢}))
5835, 57sylan 579 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ (dom (𝑦 ∖ I ) ∖ {𝑢}))
5958eldifad 3895 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ dom (𝑦 ∖ I ))
6056, 59prssd 4752 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦𝑢)} ⊆ dom (𝑦 ∖ I ))
61 difss 4062 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∖ I ) ⊆ 𝑦
62 dmss 5800 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦 ∖ I ) ⊆ 𝑦 → dom (𝑦 ∖ I ) ⊆ dom 𝑦)
6361, 62ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . 24 dom (𝑦 ∖ I ) ⊆ dom 𝑦
64 f1odm 6704 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦:𝐷1-1-onto𝐷 → dom 𝑦 = 𝐷)
6535, 64syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → dom 𝑦 = 𝐷)
6663, 65sseqtrid 3969 . . . . . . . . . . . . . . . . . . . . . . 23 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → dom (𝑦 ∖ I ) ⊆ 𝐷)
6766adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ⊆ 𝐷)
6860, 67sstrd 3927 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦𝑢)} ⊆ 𝐷)
69 vex 3426 . . . . . . . . . . . . . . . . . . . . . 22 𝑢 ∈ V
70 fvex 6769 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦𝑢) ∈ V
7135adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦:𝐷1-1-onto𝐷)
7271, 36syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦 Fn 𝐷)
7366sselda 3917 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢𝐷)
74 fnelnfp 7031 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦 Fn 𝐷𝑢𝐷) → (𝑢 ∈ dom (𝑦 ∖ I ) ↔ (𝑦𝑢) ≠ 𝑢))
7572, 73, 74syl2anc 583 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑢 ∈ dom (𝑦 ∖ I ) ↔ (𝑦𝑢) ≠ 𝑢))
7656, 75mpbid 231 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ≠ 𝑢)
7776necomd 2998 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢 ≠ (𝑦𝑢))
78 pr2nelem 9691 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑢 ∈ V ∧ (𝑦𝑢) ∈ V ∧ 𝑢 ≠ (𝑦𝑢)) → {𝑢, (𝑦𝑢)} ≈ 2o)
7969, 70, 77, 78mp3an12i 1463 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦𝑢)} ≈ 2o)
8016, 10pmtrrn 18980 . . . . . . . . . . . . . . . . . . . . 21 ((𝐷 ∈ V ∧ {𝑢, (𝑦𝑢)} ⊆ 𝐷 ∧ {𝑢, (𝑦𝑢)} ≈ 2o) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝑇)
8155, 68, 79, 80syl3anc 1369 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝑇)
8211, 81sselid 3915 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵)
83 simplr 765 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦𝐵)
84 eqid 2738 . . . . . . . . . . . . . . . . . . . 20 (+g𝐺) = (+g𝐺)
852, 5, 84symgov 18906 . . . . . . . . . . . . . . . . . . 19 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵𝑦𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦))
8682, 83, 85syl2anc 583 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦))
8786oveq2d 7271 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)))
8840, 3syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝐺 ∈ Grp)
8988adantr 480 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝐺 ∈ Grp)
905, 84grpcl 18500 . . . . . . . . . . . . . . . . . . . 20 ((𝐺 ∈ Grp ∧ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵𝑦𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵)
9189, 82, 83, 90syl3anc 1369 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵)
9286, 91eqeltrrd 2840 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∈ 𝐵)
932, 5, 84symgov 18906 . . . . . . . . . . . . . . . . . 18 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵 ∧ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∈ 𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)))
9482, 92, 93syl2anc 583 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)))
95 coass 6158 . . . . . . . . . . . . . . . . . 18 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) ∘ 𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦))
9616, 10pmtrfinv 18984 . . . . . . . . . . . . . . . . . . . . 21 (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝑇 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) = ( I ↾ 𝐷))
9781, 96syl 17 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) = ( I ↾ 𝐷))
9897coeq1d 5759 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) ∘ 𝑦) = (( I ↾ 𝐷) ∘ 𝑦))
99 f1of 6700 . . . . . . . . . . . . . . . . . . . 20 (𝑦:𝐷1-1-onto𝐷𝑦:𝐷𝐷)
100 fcoi2 6633 . . . . . . . . . . . . . . . . . . . 20 (𝑦:𝐷𝐷 → (( I ↾ 𝐷) ∘ 𝑦) = 𝑦)
10171, 99, 1003syl 18 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (( I ↾ 𝐷) ∘ 𝑦) = 𝑦)
10298, 101eqtrd 2778 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) ∘ 𝑦) = 𝑦)
10395, 102eqtr3id 2793 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)) = 𝑦)
10487, 94, 1033eqtrd 2782 . . . . . . . . . . . . . . . 16 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) = 𝑦)
105104adantlr 711 . . . . . . . . . . . . . . 15 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) = 𝑦)
10645ad2antrr 722 . . . . . . . . . . . . . . . 16 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝐾𝑇) ∈ (SubMnd‘𝐺))
10727mrcssid 17243 . . . . . . . . . . . . . . . . . . . 20 (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇𝐵) → 𝑇 ⊆ (𝐾𝑇))
10843, 11, 107sylancl 585 . . . . . . . . . . . . . . . . . . 19 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝑇 ⊆ (𝐾𝑇))
109108adantr 480 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑇 ⊆ (𝐾𝑇))
110109, 81sseldd 3918 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ (𝐾𝑇))
111110adantlr 711 . . . . . . . . . . . . . . . 16 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ (𝐾𝑇))
11286difeq1d 4052 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) = ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ))
113112dmeqd 5803 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) = dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ))
114 simpll 763 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ∈ Fin)
115 mvdco 18968 . . . . . . . . . . . . . . . . . . . . . 22 dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊆ (dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) ∪ dom (𝑦 ∖ I ))
11616pmtrmvd 18979 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐷 ∈ V ∧ {𝑢, (𝑦𝑢)} ⊆ 𝐷 ∧ {𝑢, (𝑦𝑢)} ≈ 2o) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) = {𝑢, (𝑦𝑢)})
11755, 68, 79, 116syl3anc 1369 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) = {𝑢, (𝑦𝑢)})
118117, 60eqsstrd 3955 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) ⊆ dom (𝑦 ∖ I ))
119 ssidd 3940 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ⊆ dom (𝑦 ∖ I ))
120118, 119unssd 4116 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) ∪ dom (𝑦 ∖ I )) ⊆ dom (𝑦 ∖ I ))
121115, 120sstrid 3928 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊆ dom (𝑦 ∖ I ))
122 fvco2 6847 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑦 Fn 𝐷𝑢𝐷) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)))
12372, 73, 122syl2anc 583 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)))
124 prcom 4665 . . . . . . . . . . . . . . . . . . . . . . . . . 26 {𝑢, (𝑦𝑢)} = {(𝑦𝑢), 𝑢}
125124fveq2i 6759 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) = ((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})
126125fveq1i 6757 . . . . . . . . . . . . . . . . . . . . . . . 24 (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)) = (((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})‘(𝑦𝑢))
12767, 59sseldd 3918 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ 𝐷)
12816pmtrprfv 18976 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐷 ∈ V ∧ ((𝑦𝑢) ∈ 𝐷𝑢𝐷 ∧ (𝑦𝑢) ≠ 𝑢)) → (((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})‘(𝑦𝑢)) = 𝑢)
12955, 127, 73, 76, 128syl13anc 1370 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})‘(𝑦𝑢)) = 𝑢)
130126, 129eqtrid 2790 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)) = 𝑢)
131123, 130eqtrd 2778 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = 𝑢)
1322, 5symgbasf1o 18897 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦):𝐷1-1-onto𝐷)
133 f1ofn 6701 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦):𝐷1-1-onto𝐷 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷)
13492, 132, 1333syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷)
135 fnelnfp 7031 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷𝑢𝐷) → (𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ↔ ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) ≠ 𝑢))
136135necon2bbid 2986 . . . . . . . . . . . . . . . . . . . . . . 23 (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷𝑢𝐷) → (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = 𝑢 ↔ ¬ 𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I )))
137134, 73, 136syl2anc 583 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = 𝑢 ↔ ¬ 𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I )))
138131, 137mpbid 231 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ¬ 𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ))
139121, 56, 138ssnelpssd 4043 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊊ dom (𝑦 ∖ I ))
140 php3 8899 . . . . . . . . . . . . . . . . . . . 20 ((dom (𝑦 ∖ I ) ∈ Fin ∧ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊊ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
141114, 139, 140syl2anc 583 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
142113, 141eqbrtrd 5092 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
143142adantlr 711 . . . . . . . . . . . . . . . . 17 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
14491adantlr 711 . . . . . . . . . . . . . . . . 17 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵)
145 ovex 7288 . . . . . . . . . . . . . . . . . . 19 (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ V
146 difeq1 4046 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (𝑧 ∖ I ) = ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ))
147146dmeqd 5803 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → dom (𝑧 ∖ I ) = dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ))
148147breq1d 5080 . . . . . . . . . . . . . . . . . . . 20 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) ↔ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I )))
149 eleq1 2826 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (𝑧𝐵 ↔ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵))
150 eleq1 2826 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (𝑧 ∈ (𝐾𝑇) ↔ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇)))
151149, 150imbi12d 344 . . . . . . . . . . . . . . . . . . . 20 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → ((𝑧𝐵𝑧 ∈ (𝐾𝑇)) ↔ ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇))))
152148, 151imbi12d 344 . . . . . . . . . . . . . . . . . . 19 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → ((dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) ↔ (dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇)))))
153145, 152spcv 3534 . . . . . . . . . . . . . . . . . 18 (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) → (dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇))))
154153ad2antlr 723 . . . . . . . . . . . . . . . . 17 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇))))
155143, 144, 154mp2d 49 . . . . . . . . . . . . . . . 16 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇))
15684submcl 18366 . . . . . . . . . . . . . . . 16 (((𝐾𝑇) ∈ (SubMnd‘𝐺) ∧ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ (𝐾𝑇) ∧ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇)) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) ∈ (𝐾𝑇))
157106, 111, 155, 156syl3anc 1369 . . . . . . . . . . . . . . 15 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) ∈ (𝐾𝑇))
158105, 157eqeltrrd 2840 . . . . . . . . . . . . . 14 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦 ∈ (𝐾𝑇))
159158ex 412 . . . . . . . . . . . . 13 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (𝑢 ∈ dom (𝑦 ∖ I ) → 𝑦 ∈ (𝐾𝑇)))
160159exlimdv 1937 . . . . . . . . . . . 12 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (∃𝑢 𝑢 ∈ dom (𝑦 ∖ I ) → 𝑦 ∈ (𝐾𝑇)))
16154, 160syl5bi 241 . . . . . . . . . . 11 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (dom (𝑦 ∖ I ) ≠ ∅ → 𝑦 ∈ (𝐾𝑇)))
16253, 161pm2.61dne 3030 . . . . . . . . . 10 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → 𝑦 ∈ (𝐾𝑇))
163162exp31 419 . . . . . . . . 9 (dom (𝑦 ∖ I ) ∈ Fin → (𝑦𝐵 → (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) → 𝑦 ∈ (𝐾𝑇))))
164163com23 86 . . . . . . . 8 (dom (𝑦 ∖ I ) ∈ Fin → (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) → (𝑦𝐵𝑦 ∈ (𝐾𝑇))))
16533, 164syl 17 . . . . . . 7 ((dom (𝑥 ∖ I ) ∈ Fin ∧ dom (𝑦 ∖ I ) ≼ dom (𝑥 ∖ I )) → (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) → (𝑦𝐵𝑦 ∈ (𝐾𝑇))))
1661653impia 1115 . . . . . 6 ((dom (𝑥 ∖ I ) ∈ Fin ∧ dom (𝑦 ∖ I ) ≼ dom (𝑥 ∖ I ) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (𝑦𝐵𝑦 ∈ (𝐾𝑇)))
167 eleq1w 2821 . . . . . . 7 (𝑦 = 𝑧 → (𝑦𝐵𝑧𝐵))
168 eleq1w 2821 . . . . . . 7 (𝑦 = 𝑧 → (𝑦 ∈ (𝐾𝑇) ↔ 𝑧 ∈ (𝐾𝑇)))
169167, 168imbi12d 344 . . . . . 6 (𝑦 = 𝑧 → ((𝑦𝐵𝑦 ∈ (𝐾𝑇)) ↔ (𝑧𝐵𝑧 ∈ (𝐾𝑇))))
170 eleq1w 2821 . . . . . . 7 (𝑦 = 𝑥 → (𝑦𝐵𝑥𝐵))
171 eleq1w 2821 . . . . . . 7 (𝑦 = 𝑥 → (𝑦 ∈ (𝐾𝑇) ↔ 𝑥 ∈ (𝐾𝑇)))
172170, 171imbi12d 344 . . . . . 6 (𝑦 = 𝑥 → ((𝑦𝐵𝑦 ∈ (𝐾𝑇)) ↔ (𝑥𝐵𝑥 ∈ (𝐾𝑇))))
173 difeq1 4046 . . . . . . 7 (𝑦 = 𝑧 → (𝑦 ∖ I ) = (𝑧 ∖ I ))
174173dmeqd 5803 . . . . . 6 (𝑦 = 𝑧 → dom (𝑦 ∖ I ) = dom (𝑧 ∖ I ))
175 difeq1 4046 . . . . . . 7 (𝑦 = 𝑥 → (𝑦 ∖ I ) = (𝑥 ∖ I ))
176175dmeqd 5803 . . . . . 6 (𝑦 = 𝑥 → dom (𝑦 ∖ I ) = dom (𝑥 ∖ I ))
17731, 32, 166, 169, 172, 174, 176indcardi 9728 . . . . 5 (dom (𝑥 ∖ I ) ∈ Fin → (𝑥𝐵𝑥 ∈ (𝐾𝑇)))
178177impcom 407 . . . 4 ((𝑥𝐵 ∧ dom (𝑥 ∖ I ) ∈ Fin) → 𝑥 ∈ (𝐾𝑇))
1791783adant1 1128 . . 3 ((𝐷𝑉𝑥𝐵 ∧ dom (𝑥 ∖ I ) ∈ Fin) → 𝑥 ∈ (𝐾𝑇))
180179rabssdv 4004 . 2 (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ⊆ (𝐾𝑇))
18129, 180eqssd 3934 1 (𝐷𝑉 → (𝐾𝑇) = {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 395  wal 1537   = wceq 1539  wex 1783  wcel 2108  wne 2942  {crab 3067  Vcvv 3422  cdif 3880  cun 3881  wss 3883  wpss 3884  c0 4253  {csn 4558  {cpr 4560   class class class wbr 5070   I cid 5479  dom cdm 5580  ran crn 5581  cres 5582  ccom 5584   Fn wfn 6413  wf 6414  1-1-ontowf1o 6417  cfv 6418  (class class class)co 7255  ωcom 7687  2oc2o 8261  cen 8688  cdom 8689  csdm 8690  Fincfn 8691  Basecbs 16840  +gcplusg 16888  0gc0g 17067  Moorecmre 17208  mrClscmrc 17209  ACScacs 17211  Mndcmnd 18300  SubMndcsubmnd 18344  Grpcgrp 18492  SubGrpcsubg 18664  SymGrpcsymg 18889  pmTrspcpmtr 18964
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-rep 5205  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566  ax-cnex 10858  ax-resscn 10859  ax-1cn 10860  ax-icn 10861  ax-addcl 10862  ax-addrcl 10863  ax-mulcl 10864  ax-mulrcl 10865  ax-mulcom 10866  ax-addass 10867  ax-mulass 10868  ax-distr 10869  ax-i2m1 10870  ax-1ne0 10871  ax-1rid 10872  ax-rnegex 10873  ax-rrecex 10874  ax-cnre 10875  ax-pre-lttri 10876  ax-pre-lttrn 10877  ax-pre-ltadd 10878  ax-pre-mulgt0 10879
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-nel 3049  df-ral 3068  df-rex 3069  df-reu 3070  df-rmo 3071  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-int 4877  df-iun 4923  df-iin 4924  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-se 5536  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-pred 6191  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-isom 6427  df-riota 7212  df-ov 7258  df-oprab 7259  df-mpo 7260  df-om 7688  df-1st 7804  df-2nd 7805  df-frecs 8068  df-wrecs 8099  df-recs 8173  df-rdg 8212  df-1o 8267  df-2o 8268  df-er 8456  df-map 8575  df-en 8692  df-dom 8693  df-sdom 8694  df-fin 8695  df-card 9628  df-pnf 10942  df-mnf 10943  df-xr 10944  df-ltxr 10945  df-le 10946  df-sub 11137  df-neg 11138  df-nn 11904  df-2 11966  df-3 11967  df-4 11968  df-5 11969  df-6 11970  df-7 11971  df-8 11972  df-9 11973  df-n0 12164  df-z 12250  df-uz 12512  df-fz 13169  df-struct 16776  df-sets 16793  df-slot 16811  df-ndx 16823  df-base 16841  df-ress 16868  df-plusg 16901  df-tset 16907  df-0g 17069  df-mre 17212  df-mrc 17213  df-acs 17215  df-mgm 18241  df-sgrp 18290  df-mnd 18301  df-submnd 18346  df-efmnd 18423  df-grp 18495  df-minusg 18496  df-subg 18667  df-symg 18890  df-pmtr 18965
This theorem is referenced by:  symggen2  18994  psgneldm2  19027
  Copyright terms: Public domain W3C validator