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

Theorem symggen 19564
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 3478 . . . 4 (𝐷𝑉𝐷 ∈ V)
2 symgtrf.g . . . . . . 7 𝐺 = (SymGrp‘𝐷)
32symggrp 19494 . . . . . 6 (𝐷 ∈ V → 𝐺 ∈ Grp)
43grpmndd 19037 . . . . 5 (𝐷 ∈ V → 𝐺 ∈ Mnd)
5 symgtrf.b . . . . . 6 𝐵 = (Base‘𝐺)
65submacs 18910 . . . . 5 (𝐺 ∈ Mnd → (SubMnd‘𝐺) ∈ (ACS‘𝐵))
7 acsmre 17726 . . . . 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 19563 . . . . 5 𝑇𝐵
1211a1i 11 . . . 4 (𝐷𝑉𝑇𝐵)
13 2onn 8630 . . . . . 6 2o ∈ ω
14 nnfi 9155 . . . . . 6 (2o ∈ ω → 2o ∈ Fin)
1513, 14ax-mp 5 . . . . 5 2o ∈ Fin
16 eqid 2765 . . . . . . . . 9 (pmTrsp‘𝐷) = (pmTrsp‘𝐷)
1716, 10pmtrfb 19559 . . . . . . . 8 (𝑥𝑇 ↔ (𝐷 ∈ V ∧ 𝑥:𝐷1-1-onto𝐷 ∧ dom (𝑥 ∖ I ) ≈ 2o))
1817simp3bi 1165 . . . . . . 7 (𝑥𝑇 → dom (𝑥 ∖ I ) ≈ 2o)
19 enfi 9174 . . . . . . 7 (dom (𝑥 ∖ I ) ≈ 2o → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2o ∈ Fin))
2018, 19syl 18 . . . . . 6 (𝑥𝑇 → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2o ∈ Fin))
2120adantl 487 . . . . 5 ((𝐷𝑉𝑥𝑇) → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2o ∈ Fin))
2215, 21mpbiri 261 . . . 4 ((𝐷𝑉𝑥𝑇) → dom (𝑥 ∖ I ) ∈ Fin)
2312, 22ssrabdv 4028 . . 3 (𝐷𝑉𝑇 ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
242, 5symgfisg 19562 . . . 4 (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubGrp‘𝐺))
25 subgsubm 19239 . . . 4 ({𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubGrp‘𝐺) → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺))
2624, 25syl 18 . . 3 (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺))
27 symggen.k . . . 4 𝐾 = (mrCls‘(SubMnd‘𝐺))
2827mrcsscl 17694 . . 3 (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇 ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∧ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺)) → (𝐾𝑇) ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
299, 23, 26, 28syl3anc 1398 . 2 (𝐷𝑉 → (𝐾𝑇) ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
30 vex 3461 . . . . . . 7 𝑥 ∈ V
3130a1i 11 . . . . . 6 (dom (𝑥 ∖ I ) ∈ Fin → 𝑥 ∈ V)
32 finnum 9946 . . . . . 6 (dom (𝑥 ∖ I ) ∈ Fin → dom (𝑥 ∖ I ) ∈ dom card)
33 domfi 9176 . . . . . . . 8 ((dom (𝑥 ∖ I ) ∈ Fin ∧ dom (𝑦 ∖ I ) ≼ dom (𝑥 ∖ I )) → dom (𝑦 ∖ I ) ∈ Fin)
342, 5symgbasf1o 19469 . . . . . . . . . . . . . . 15 (𝑦𝐵𝑦:𝐷1-1-onto𝐷)
3534adantl 487 . . . . . . . . . . . . . 14 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝑦:𝐷1-1-onto𝐷)
36 f1ofn 6825 . . . . . . . . . . . . . 14 (𝑦:𝐷1-1-onto𝐷𝑦 Fn 𝐷)
37 fnnfpeq0 7180 . . . . . . . . . . . . . 14 (𝑦 Fn 𝐷 → (dom (𝑦 ∖ I ) = ∅ ↔ 𝑦 = ( I ↾ 𝐷)))
3835, 36, 373syl 19 . . . . . . . . . . . . 13 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (dom (𝑦 ∖ I ) = ∅ ↔ 𝑦 = ( I ↾ 𝐷)))
392, 5elbasfv 17293 . . . . . . . . . . . . . . . . 17 (𝑦𝐵𝐷 ∈ V)
4039adantl 487 . . . . . . . . . . . . . . . 16 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝐷 ∈ V)
412symgid 19495 . . . . . . . . . . . . . . . 16 (𝐷 ∈ V → ( I ↾ 𝐷) = (0g𝐺))
4240, 41syl 18 . . . . . . . . . . . . . . 15 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → ( I ↾ 𝐷) = (0g𝐺))
4340, 8syl 18 . . . . . . . . . . . . . . . . 17 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
4427mrccl 17685 . . . . . . . . . . . . . . . . 17 (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇𝐵) → (𝐾𝑇) ∈ (SubMnd‘𝐺))
4543, 11, 44sylancl 598 . . . . . . . . . . . . . . . 16 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (𝐾𝑇) ∈ (SubMnd‘𝐺))
46 eqid 2765 . . . . . . . . . . . . . . . . 17 (0g𝐺) = (0g𝐺)
4746subm0cl 18893 . . . . . . . . . . . . . . . 16 ((𝐾𝑇) ∈ (SubMnd‘𝐺) → (0g𝐺) ∈ (𝐾𝑇))
4845, 47syl 18 . . . . . . . . . . . . . . 15 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (0g𝐺) ∈ (𝐾𝑇))
4942, 48eqeltrd 2865 . . . . . . . . . . . . . 14 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → ( I ↾ 𝐷) ∈ (𝐾𝑇))
50 eleq1a 2860 . . . . . . . . . . . . . 14 (( I ↾ 𝐷) ∈ (𝐾𝑇) → (𝑦 = ( I ↾ 𝐷) → 𝑦 ∈ (𝐾𝑇)))
5149, 50syl 18 . . . . . . . . . . . . 13 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (𝑦 = ( I ↾ 𝐷) → 𝑦 ∈ (𝐾𝑇)))
5238, 51sylbid 243 . . . . . . . . . . . 12 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (dom (𝑦 ∖ I ) = ∅ → 𝑦 ∈ (𝐾𝑇)))
5352adantr 486 . . . . . . . . . . 11 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (dom (𝑦 ∖ I ) = ∅ → 𝑦 ∈ (𝐾𝑇)))
54 n0 4307 . . . . . . . . . . . 12 (dom (𝑦 ∖ I ) ≠ ∅ ↔ ∃𝑢 𝑢 ∈ dom (𝑦 ∖ I ))
5540adantr 486 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝐷 ∈ V)
56 simpr 490 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢 ∈ dom (𝑦 ∖ I ))
57 f1omvdmvd 19537 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦:𝐷1-1-onto𝐷𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ (dom (𝑦 ∖ I ) ∖ {𝑢}))
5835, 57sylan 592 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ (dom (𝑦 ∖ I ) ∖ {𝑢}))
5958eldifad 3918 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ dom (𝑦 ∖ I ))
6056, 59prssd 4790 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦𝑢)} ⊆ dom (𝑦 ∖ I ))
61 difss 4090 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∖ I ) ⊆ 𝑦
62 dmss 5894 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦 ∖ I ) ⊆ 𝑦 → dom (𝑦 ∖ I ) ⊆ dom 𝑦)
6361, 62ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . 24 dom (𝑦 ∖ I ) ⊆ dom 𝑦
64 f1odm 6828 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦:𝐷1-1-onto𝐷 → dom 𝑦 = 𝐷)
6535, 64syl 18 . . . . . . . . . . . . . . . . . . . . . . . 24 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → dom 𝑦 = 𝐷)
6663, 65sseqtrid 3980 . . . . . . . . . . . . . . . . . . . . . . 23 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → dom (𝑦 ∖ I ) ⊆ 𝐷)
6766adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ⊆ 𝐷)
6860, 67sstrd 3948 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦𝑢)} ⊆ 𝐷)
69 vex 3461 . . . . . . . . . . . . . . . . . . . . . 22 𝑢 ∈ V
70 fvex 6898 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦𝑢) ∈ V
7135adantr 486 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦:𝐷1-1-onto𝐷)
7271, 36syl 18 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦 Fn 𝐷)
7366sselda 3938 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢𝐷)
74 fnelnfp 7179 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦 Fn 𝐷𝑢𝐷) → (𝑢 ∈ dom (𝑦 ∖ I ) ↔ (𝑦𝑢) ≠ 𝑢))
7572, 73, 74syl2anc 596 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑢 ∈ dom (𝑦 ∖ I ) ↔ (𝑦𝑢) ≠ 𝑢))
7656, 75mpbid 235 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ≠ 𝑢)
7776necomd 3015 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢 ≠ (𝑦𝑢))
78 enpr2 10000 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑢 ∈ V ∧ (𝑦𝑢) ∈ V ∧ 𝑢 ≠ (𝑦𝑢)) → {𝑢, (𝑦𝑢)} ≈ 2o)
7969, 70, 77, 78mp3an12i 1494 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦𝑢)} ≈ 2o)
8016, 10pmtrrn 19551 . . . . . . . . . . . . . . . . . . . . 21 ((𝐷 ∈ V ∧ {𝑢, (𝑦𝑢)} ⊆ 𝐷 ∧ {𝑢, (𝑦𝑢)} ≈ 2o) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝑇)
8155, 68, 79, 80syl3anc 1398 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝑇)
8211, 81sselid 3936 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵)
83 simplr 781 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦𝐵)
84 eqid 2765 . . . . . . . . . . . . . . . . . . . 20 (+g𝐺) = (+g𝐺)
852, 5, 84symgov 19478 . . . . . . . . . . . . . . . . . . 19 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵𝑦𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦))
8682, 83, 85syl2anc 596 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦))
8786oveq2d 7432 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)))
8840, 3syl 18 . . . . . . . . . . . . . . . . . . . . 21 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝐺 ∈ Grp)
8988adantr 486 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝐺 ∈ Grp)
905, 84grpcl 19032 . . . . . . . . . . . . . . . . . . . 20 ((𝐺 ∈ Grp ∧ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵𝑦𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵)
9189, 82, 83, 90syl3anc 1398 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵)
9286, 91eqeltrrd 2866 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∈ 𝐵)
932, 5, 84symgov 19478 . . . . . . . . . . . . . . . . . 18 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵 ∧ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∈ 𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)))
9482, 92, 93syl2anc 596 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)))
95 coass 6269 . . . . . . . . . . . . . . . . . 18 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) ∘ 𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦))
9616, 10pmtrfinv 19555 . . . . . . . . . . . . . . . . . . . . 21 (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝑇 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) = ( I ↾ 𝐷))
9781, 96syl 18 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) = ( I ↾ 𝐷))
9897coeq1d 5849 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) ∘ 𝑦) = (( I ↾ 𝐷) ∘ 𝑦))
99 f1of 6824 . . . . . . . . . . . . . . . . . . . 20 (𝑦:𝐷1-1-onto𝐷𝑦:𝐷𝐷)
100 fcoi2 6757 . . . . . . . . . . . . . . . . . . . 20 (𝑦:𝐷𝐷 → (( I ↾ 𝐷) ∘ 𝑦) = 𝑦)
10171, 99, 1003syl 19 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (( I ↾ 𝐷) ∘ 𝑦) = 𝑦)
10298, 101eqtrd 2800 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) ∘ 𝑦) = 𝑦)
10395, 102eqtr3id 2814 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)) = 𝑦)
10487, 94, 1033eqtrd 2804 . . . . . . . . . . . . . . . 16 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) = 𝑦)
105104adantlr 728 . . . . . . . . . . . . . . 15 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) = 𝑦)
10645ad2antrr 739 . . . . . . . . . . . . . . . 16 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝐾𝑇) ∈ (SubMnd‘𝐺))
10727mrcssid 17691 . . . . . . . . . . . . . . . . . . . 20 (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇𝐵) → 𝑇 ⊆ (𝐾𝑇))
10843, 11, 107sylancl 598 . . . . . . . . . . . . . . . . . . 19 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝑇 ⊆ (𝐾𝑇))
109108adantr 486 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑇 ⊆ (𝐾𝑇))
110109, 81sseldd 3939 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ (𝐾𝑇))
111110adantlr 728 . . . . . . . . . . . . . . . 16 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ (𝐾𝑇))
11286difeq1d 4080 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) = ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ))
113112dmeqd 5897 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) = dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ))
114 simpll 779 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ∈ Fin)
115 mvdco 19539 . . . . . . . . . . . . . . . . . . . . . 22 dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊆ (dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) ∪ dom (𝑦 ∖ I ))
11616pmtrmvd 19550 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐷 ∈ V ∧ {𝑢, (𝑦𝑢)} ⊆ 𝐷 ∧ {𝑢, (𝑦𝑢)} ≈ 2o) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) = {𝑢, (𝑦𝑢)})
11755, 68, 79, 116syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) = {𝑢, (𝑦𝑢)})
118117, 60eqsstrd 3972 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) ⊆ dom (𝑦 ∖ I ))
119 ssidd 3961 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ⊆ dom (𝑦 ∖ I ))
120118, 119unssd 4145 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) ∪ dom (𝑦 ∖ I )) ⊆ dom (𝑦 ∖ I ))
121115, 120sstrid 3949 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊆ dom (𝑦 ∖ I ))
122 fvco2 6982 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑦 Fn 𝐷𝑢𝐷) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)))
12372, 73, 122syl2anc 596 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)))
124 prcom 4700 . . . . . . . . . . . . . . . . . . . . . . . . . 26 {𝑢, (𝑦𝑢)} = {(𝑦𝑢), 𝑢}
125124fveq2i 6888 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) = ((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})
126125fveq1i 6886 . . . . . . . . . . . . . . . . . . . . . . . 24 (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)) = (((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})‘(𝑦𝑢))
12767, 59sseldd 3939 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ 𝐷)
12816pmtrprfv 19547 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐷 ∈ V ∧ ((𝑦𝑢) ∈ 𝐷𝑢𝐷 ∧ (𝑦𝑢) ≠ 𝑢)) → (((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})‘(𝑦𝑢)) = 𝑢)
12955, 127, 73, 76, 128syl13anc 1399 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})‘(𝑦𝑢)) = 𝑢)
130126, 129eqtrid 2812 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)) = 𝑢)
131123, 130eqtrd 2800 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = 𝑢)
1322, 5symgbasf1o 19469 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦):𝐷1-1-onto𝐷)
133 f1ofn 6825 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦):𝐷1-1-onto𝐷 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷)
13492, 132, 1333syl 19 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷)
135 fnelnfp 7179 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷𝑢𝐷) → (𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ↔ ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) ≠ 𝑢))
136135necon2bbid 3003 . . . . . . . . . . . . . . . . . . . . . . 23 (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷𝑢𝐷) → (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = 𝑢 ↔ ¬ 𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I )))
137134, 73, 136syl2anc 596 . . . . . . . . . . . . . . . . . . . . . 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 4071 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊊ dom (𝑦 ∖ I ))
140 php3 9196 . . . . . . . . . . . . . . . . . . . 20 ((dom (𝑦 ∖ I ) ∈ Fin ∧ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊊ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
141114, 139, 140syl2anc 596 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
142113, 141eqbrtrd 5135 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
143142adantlr 728 . . . . . . . . . . . . . . . . 17 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
14491adantlr 728 . . . . . . . . . . . . . . . . 17 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵)
145 ovex 7449 . . . . . . . . . . . . . . . . . . 19 (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ V
146 difeq1 4074 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (𝑧 ∖ I ) = ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ))
147146dmeqd 5897 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → dom (𝑧 ∖ I ) = dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ))
148147breq1d 5121 . . . . . . . . . . . . . . . . . . . 20 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) ↔ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I )))
149 eleq1 2853 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (𝑧𝐵 ↔ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵))
150 eleq1 2853 . . . . . . . . . . . . . . . . . . . . 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 3566 . . . . . . . . . . . . . . . . . 18 (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) → (dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇))))
154153ad2antlr 740 . . . . . . . . . . . . . . . . 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 18894 . . . . . . . . . . . . . . . 16 (((𝐾𝑇) ∈ (SubMnd‘𝐺) ∧ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ (𝐾𝑇) ∧ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇)) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) ∈ (𝐾𝑇))
157106, 111, 155, 156syl3anc 1398 . . . . . . . . . . . . . . 15 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) ∈ (𝐾𝑇))
158105, 157eqeltrrd 2866 . . . . . . . . . . . . . 14 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦 ∈ (𝐾𝑇))
159158ex 418 . . . . . . . . . . . . 13 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (𝑢 ∈ dom (𝑦 ∖ I ) → 𝑦 ∈ (𝐾𝑇)))
160159exlimdv 1966 . . . . . . . . . . . 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 3046 . . . . . . . . . 10 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → 𝑦 ∈ (𝐾𝑇))
163162exp31 425 . . . . . . . . 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 1135 . . . . . 6 ((dom (𝑥 ∖ I ) ∈ Fin ∧ dom (𝑦 ∖ I ) ≼ dom (𝑥 ∖ I ) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (𝑦𝐵𝑦 ∈ (𝐾𝑇)))
167 eleq1w 2848 . . . . . . 7 (𝑦 = 𝑧 → (𝑦𝐵𝑧𝐵))
168 eleq1w 2848 . . . . . . 7 (𝑦 = 𝑧 → (𝑦 ∈ (𝐾𝑇) ↔ 𝑧 ∈ (𝐾𝑇)))
169167, 168imbi12d 347 . . . . . 6 (𝑦 = 𝑧 → ((𝑦𝐵𝑦 ∈ (𝐾𝑇)) ↔ (𝑧𝐵𝑧 ∈ (𝐾𝑇))))
170 eleq1w 2848 . . . . . . 7 (𝑦 = 𝑥 → (𝑦𝐵𝑥𝐵))
171 eleq1w 2848 . . . . . . 7 (𝑦 = 𝑥 → (𝑦 ∈ (𝐾𝑇) ↔ 𝑥 ∈ (𝐾𝑇)))
172170, 171imbi12d 347 . . . . . 6 (𝑦 = 𝑥 → ((𝑦𝐵𝑦 ∈ (𝐾𝑇)) ↔ (𝑥𝐵𝑥 ∈ (𝐾𝑇))))
173 difeq1 4074 . . . . . . 7 (𝑦 = 𝑧 → (𝑦 ∖ I ) = (𝑧 ∖ I ))
174173dmeqd 5897 . . . . . 6 (𝑦 = 𝑧 → dom (𝑦 ∖ I ) = dom (𝑧 ∖ I ))
175 difeq1 4074 . . . . . . 7 (𝑦 = 𝑥 → (𝑦 ∖ I ) = (𝑥 ∖ I ))
176175dmeqd 5897 . . . . . 6 (𝑦 = 𝑥 → dom (𝑦 ∖ I ) = dom (𝑥 ∖ I ))
17731, 32, 166, 169, 172, 174, 176indcardi 10037 . . . . 5 (dom (𝑥 ∖ I ) ∈ Fin → (𝑥𝐵𝑥 ∈ (𝐾𝑇)))
178177impcom 413 . . . 4 ((𝑥𝐵 ∧ dom (𝑥 ∖ I ) ∈ Fin) → 𝑥 ∈ (𝐾𝑇))
1791783adant1 1148 . . 3 ((𝐷𝑉𝑥𝐵 ∧ dom (𝑥 ∖ I ) ∈ Fin) → 𝑥 ∈ (𝐾𝑇))
180179rabssdv 4029 . 2 (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ⊆ (𝐾𝑇))
18129, 180eqssd 3955 1 (𝐷𝑉 → (𝐾𝑇) = {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wb 209  wa 401  wal 1568   = wceq 1570  wex 1812  wcel 2146  wne 2960  {crab 3418  Vcvv 3457  cdif 3903  cun 3904  wss 3906  wpss 3907  c0 4286  {csn 4591  {cpr 4593   class class class wbr 5111   I cid 5557  dom cdm 5663  ran crn 5664  cres 5665  ccom 5667   Fn wfn 6535  wf 6536  1-1-ontowf1o 6539  cfv 6540  (class class class)co 7416  ωcom 7864  2oc2o 8449  cen 8942  cdom 8943  csdm 8944  Fincfn 8945  Basecbs 17287  +gcplusg 17328  0gc0g 17510  Moorecmre 17652  mrClscmrc 17653  ACScacs 17655  Mndcmnd 18814  SubMndcsubmnd 18864  Grpcgrp 19024  SubGrpcsubg 19210  SymGrpcsymg 19463  pmTrspcpmtr 19535
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2737  ax-rep 5240  ax-sep 5259  ax-nul 5271  ax-pow 5338  ax-pr 5406  ax-un 7738  ax-cnex 11167  ax-resscn 11168  ax-1cn 11169  ax-icn 11170  ax-addcl 11171  ax-addrcl 11172  ax-mulcl 11173  ax-mulrcl 11174  ax-mulcom 11175  ax-addass 11176  ax-mulass 11177  ax-distr 11178  ax-i2m1 11179  ax-1ne0 11180  ax-1rid 11181  ax-rnegex 11182  ax-rrecex 11183  ax-cnre 11184  ax-pre-lttri 11185  ax-pre-lttrn 11186  ax-pre-ltadd 11187  ax-pre-mulgt0 11188
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3067  df-ral 3082  df-rex 3092  df-rmo 3371  df-reu 3372  df-rab 3419  df-v 3459  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4287  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-tp 4596  df-op 4598  df-uni 4875  df-int 4915  df-iun 4960  df-iin 4961  df-br 5112  df-opab 5176  df-mpt 5195  df-tr 5221  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-se 5617  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6306  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6496  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7373  df-ov 7419  df-oprab 7420  df-mpo 7421  df-om 7865  df-1st 7988  df-2nd 7989  df-frecs 8280  df-wrecs 8311  df-recs 8360  df-rdg 8399  df-1o 8455  df-2o 8456  df-er 8696  df-map 8828  df-en 8946  df-dom 8947  df-sdom 8948  df-fin 8949  df-card 9937  df-pnf 11256  df-mnf 11257  df-xr 11258  df-ltxr 11259  df-le 11260  df-sub 11454  df-neg 11455  df-nn 12245  df-2 12314  df-3 12315  df-4 12316  df-5 12317  df-6 12318  df-7 12319  df-8 12320  df-9 12321  df-n0 12516  df-z 12603  df-uz 12875  df-fz 13548  df-struct 17225  df-sets 17242  df-slot 17260  df-ndx 17272  df-base 17288  df-ress 17309  df-plusg 17341  df-tset 17347  df-0g 17512  df-mre 17656  df-mrc 17657  df-acs 17659  df-mgm 18716  df-sgrp 18799  df-mnd 18815  df-submnd 18866  df-efmnd 18952  df-grp 19027  df-minusg 19028  df-subg 19213  df-symg 19464  df-pmtr 19536
This theorem is used by:  symggen2  19565  psgneldm2  19598
  Copyright terms: Public domain W3C validator