pmtrcnel2 - Mathbox for Thierry Arnoux

	Mathbox for Thierry Arnoux		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > pmtrcnel2		Structured version Visualization version GIF version

Theorem pmtrcnel2 33701

Description: Variation on pmtrcnel 33700. (Contributed by Thierry Arnoux, 16-Nov-2023.)

**Hypotheses**
Ref	Expression
pmtrcnel.s	⊢ 𝑆 = (SymGrp‘𝐷)
pmtrcnel.t	⊢ 𝑇 = (pmTrsp‘𝐷)
pmtrcnel.b	⊢ 𝐵 = (Base‘𝑆)
pmtrcnel.j	⊢ 𝐽 = (𝐹‘𝐼)
pmtrcnel.d	⊢ (𝜑 → 𝐷 ∈ 𝑉)
pmtrcnel.f	⊢ (𝜑 → 𝐹 ∈ 𝐵)
pmtrcnel.i	⊢ (𝜑 → 𝐼 ∈ dom (𝐹 ∖ I ))

**Assertion**
Ref	Expression
pmtrcnel2	⊢ (𝜑 → (dom (𝐹 ∖ I ) ∖ {𝐼, 𝐽}) ⊆ dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I ))

**Proof of Theorem pmtrcnel2**
Step	Hyp	Ref	Expression
1		mvdco 19668	. . . . 5 ⊢ dom ((^◡(𝑇‘{𝐼, 𝐽}) ∘ ((𝑇‘{𝐼, 𝐽}) ∘ 𝐹)) ∖ I ) ⊆ (dom (^◡(𝑇‘{𝐼, 𝐽}) ∖ I ) ∪ dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I ))
2	1	a1i 11	. . . 4 ⊢ (𝜑 → dom ((^◡(𝑇‘{𝐼, 𝐽}) ∘ ((𝑇‘{𝐼, 𝐽}) ∘ 𝐹)) ∖ I ) ⊆ (dom (^◡(𝑇‘{𝐼, 𝐽}) ∖ I ) ∪ dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I )))
3		coass 6270	. . . . . . . 8 ⊢ ((^◡(𝑇‘{𝐼, 𝐽}) ∘ (𝑇‘{𝐼, 𝐽})) ∘ 𝐹) = (^◡(𝑇‘{𝐼, 𝐽}) ∘ ((𝑇‘{𝐼, 𝐽}) ∘ 𝐹))
4		pmtrcnel.d	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐷 ∈ 𝑉)
5		difss 4071	. . . . . . . . . . . . . . 15 ⊢ (𝐹 ∖ I ) ⊆ 𝐹
6		dmss 5885	. . . . . . . . . . . . . . 15 ⊢ ((𝐹 ∖ I ) ⊆ 𝐹 → dom (𝐹 ∖ I ) ⊆ dom 𝐹)
7	5, 6	ax-mp 5	. . . . . . . . . . . . . 14 ⊢ dom (𝐹 ∖ I ) ⊆ dom 𝐹
8		pmtrcnel.i	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐼 ∈ dom (𝐹 ∖ I ))
9	7, 8	sselid 3907	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐼 ∈ dom 𝐹)
10		pmtrcnel.f	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐹 ∈ 𝐵)
11		pmtrcnel.s	. . . . . . . . . . . . . . . 16 ⊢ 𝑆 = (SymGrp‘𝐷)
12		pmtrcnel.b	. . . . . . . . . . . . . . . 16 ⊢ 𝐵 = (Base‘𝑆)
13	11, 12	symgbasf1o 19598	. . . . . . . . . . . . . . 15 ⊢ (𝐹 ∈ 𝐵 → 𝐹:𝐷–1-1-onto→𝐷)
14		f1of 6829	. . . . . . . . . . . . . . 15 ⊢ (𝐹:𝐷–1-1-onto→𝐷 → 𝐹:𝐷⟶𝐷)
15	10, 13, 14	3syl 19	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐹:𝐷⟶𝐷)
16	15	fdmd 6725	. . . . . . . . . . . . 13 ⊢ (𝜑 → dom 𝐹 = 𝐷)
17	9, 16	eleqtrd 2862	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐼 ∈ 𝐷)
18		pmtrcnel.j	. . . . . . . . . . . . 13 ⊢ 𝐽 = (𝐹‘𝐼)
19	15, 17	ffvelcdmd 7090	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐹‘𝐼) ∈ 𝐷)
20	18, 19	eqeltrid 2864	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐽 ∈ 𝐷)
21	17, 20	prssd 4777	. . . . . . . . . . 11 ⊢ (𝜑 → {𝐼, 𝐽} ⊆ 𝐷)
22	15	ffnd 6715	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐹 Fn 𝐷)
23		fnelnfp 7186	. . . . . . . . . . . . . . . 16 ⊢ ((𝐹 Fn 𝐷 ∧ 𝐼 ∈ 𝐷) → (𝐼 ∈ dom (𝐹 ∖ I ) ↔ (𝐹‘𝐼) ≠ 𝐼))
24	23	biimpa 482	. . . . . . . . . . . . . . 15 ⊢ (((𝐹 Fn 𝐷 ∧ 𝐼 ∈ 𝐷) ∧ 𝐼 ∈ dom (𝐹 ∖ I )) → (𝐹‘𝐼) ≠ 𝐼)
25	22, 17, 8, 24	syl21anc 851	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐹‘𝐼) ≠ 𝐼)
26	25	necomd 3010	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐼 ≠ (𝐹‘𝐼))
27	18	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐽 = (𝐹‘𝐼))
28	26, 27	neeqtrrd 3029	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐼 ≠ 𝐽)
29		enpr2 10090	. . . . . . . . . . . 12 ⊢ ((𝐼 ∈ 𝐷 ∧ 𝐽 ∈ 𝐷 ∧ 𝐼 ≠ 𝐽) → {𝐼, 𝐽} ≈ 2_o)
30	17, 20, 28, 29	syl3anc 1398	. . . . . . . . . . 11 ⊢ (𝜑 → {𝐼, 𝐽} ≈ 2_o)
31		pmtrcnel.t	. . . . . . . . . . . 12 ⊢ 𝑇 = (pmTrsp‘𝐷)
32		eqid 2760	. . . . . . . . . . . 12 ⊢ ran 𝑇 = ran 𝑇
33	31, 32	pmtrrn 19680	. . . . . . . . . . 11 ⊢ ((𝐷 ∈ 𝑉 ∧ {𝐼, 𝐽} ⊆ 𝐷 ∧ {𝐼, 𝐽} ≈ 2_o) → (𝑇‘{𝐼, 𝐽}) ∈ ran 𝑇)
34	4, 21, 30, 33	syl3anc 1398	. . . . . . . . . 10 ⊢ (𝜑 → (𝑇‘{𝐼, 𝐽}) ∈ ran 𝑇)
35	31, 32	pmtrff1o 19686	. . . . . . . . . 10 ⊢ ((𝑇‘{𝐼, 𝐽}) ∈ ran 𝑇 → (𝑇‘{𝐼, 𝐽}):𝐷–1-1-onto→𝐷)
36		f1ococnv1 6859	. . . . . . . . . 10 ⊢ ((𝑇‘{𝐼, 𝐽}):𝐷–1-1-onto→𝐷 → (^◡(𝑇‘{𝐼, 𝐽}) ∘ (𝑇‘{𝐼, 𝐽})) = ( I ↾ 𝐷))
37	34, 35, 36	3syl 19	. . . . . . . . 9 ⊢ (𝜑 → (^◡(𝑇‘{𝐼, 𝐽}) ∘ (𝑇‘{𝐼, 𝐽})) = ( I ↾ 𝐷))
38	37	coeq1d 5840	. . . . . . . 8 ⊢ (𝜑 → ((^◡(𝑇‘{𝐼, 𝐽}) ∘ (𝑇‘{𝐼, 𝐽})) ∘ 𝐹) = (( I ↾ 𝐷) ∘ 𝐹))
39	3, 38	eqtr3id 2809	. . . . . . 7 ⊢ (𝜑 → (^◡(𝑇‘{𝐼, 𝐽}) ∘ ((𝑇‘{𝐼, 𝐽}) ∘ 𝐹)) = (( I ↾ 𝐷) ∘ 𝐹))
40		fcoi2 6762	. . . . . . . 8 ⊢ (𝐹:𝐷⟶𝐷 → (( I ↾ 𝐷) ∘ 𝐹) = 𝐹)
41	15, 40	syl 18	. . . . . . 7 ⊢ (𝜑 → (( I ↾ 𝐷) ∘ 𝐹) = 𝐹)
42	39, 41	eqtrd 2795	. . . . . 6 ⊢ (𝜑 → (^◡(𝑇‘{𝐼, 𝐽}) ∘ ((𝑇‘{𝐼, 𝐽}) ∘ 𝐹)) = 𝐹)
43	42	difeq1d 4061	. . . . 5 ⊢ (𝜑 → ((^◡(𝑇‘{𝐼, 𝐽}) ∘ ((𝑇‘{𝐼, 𝐽}) ∘ 𝐹)) ∖ I ) = (𝐹 ∖ I ))
44	43	dmeqd 5888	. . . 4 ⊢ (𝜑 → dom ((^◡(𝑇‘{𝐼, 𝐽}) ∘ ((𝑇‘{𝐼, 𝐽}) ∘ 𝐹)) ∖ I ) = dom (𝐹 ∖ I ))
45	31, 32	pmtrfcnv 19687	. . . . . . . . . 10 ⊢ ((𝑇‘{𝐼, 𝐽}) ∈ ran 𝑇 → ^◡(𝑇‘{𝐼, 𝐽}) = (𝑇‘{𝐼, 𝐽}))
46	34, 45	syl 18	. . . . . . . . 9 ⊢ (𝜑 → ^◡(𝑇‘{𝐼, 𝐽}) = (𝑇‘{𝐼, 𝐽}))
47	46	difeq1d 4061	. . . . . . . 8 ⊢ (𝜑 → (^◡(𝑇‘{𝐼, 𝐽}) ∖ I ) = ((𝑇‘{𝐼, 𝐽}) ∖ I ))
48	47	dmeqd 5888	. . . . . . 7 ⊢ (𝜑 → dom (^◡(𝑇‘{𝐼, 𝐽}) ∖ I ) = dom ((𝑇‘{𝐼, 𝐽}) ∖ I ))
49	31	pmtrmvd 19679	. . . . . . . 8 ⊢ ((𝐷 ∈ 𝑉 ∧ {𝐼, 𝐽} ⊆ 𝐷 ∧ {𝐼, 𝐽} ≈ 2_o) → dom ((𝑇‘{𝐼, 𝐽}) ∖ I ) = {𝐼, 𝐽})
50	4, 21, 30, 49	syl3anc 1398	. . . . . . 7 ⊢ (𝜑 → dom ((𝑇‘{𝐼, 𝐽}) ∖ I ) = {𝐼, 𝐽})
51	48, 50	eqtrd 2795	. . . . . 6 ⊢ (𝜑 → dom (^◡(𝑇‘{𝐼, 𝐽}) ∖ I ) = {𝐼, 𝐽})
52	51	uneq1d 4165	. . . . 5 ⊢ (𝜑 → (dom (^◡(𝑇‘{𝐼, 𝐽}) ∖ I ) ∪ dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I )) = ({𝐼, 𝐽} ∪ dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I )))
53		uncom 4156	. . . . 5 ⊢ ({𝐼, 𝐽} ∪ dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I )) = (dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I ) ∪ {𝐼, 𝐽})
54	52, 53	eqtrdi 2811	. . . 4 ⊢ (𝜑 → (dom (^◡(𝑇‘{𝐼, 𝐽}) ∖ I ) ∪ dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I )) = (dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I ) ∪ {𝐼, 𝐽}))
55	2, 44, 54	3sstr3d 3963	. . 3 ⊢ (𝜑 → dom (𝐹 ∖ I ) ⊆ (dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I ) ∪ {𝐼, 𝐽}))
56	55	ssdifd 4080	. 2 ⊢ (𝜑 → (dom (𝐹 ∖ I ) ∖ {𝐼, 𝐽}) ⊆ ((dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I ) ∪ {𝐼, 𝐽}) ∖ {𝐼, 𝐽}))
57		difun2 4436	. . 3 ⊢ ((dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I ) ∪ {𝐼, 𝐽}) ∖ {𝐼, 𝐽}) = (dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I ) ∖ {𝐼, 𝐽})
58		difss 4071	. . 3 ⊢ (dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I ) ∖ {𝐼, 𝐽}) ⊆ dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I )
59	57, 58	eqsstri 3955	. 2 ⊢ ((dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I ) ∪ {𝐼, 𝐽}) ∖ {𝐼, 𝐽}) ⊆ dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I )
60	56, 59	sstrdi 3921	1 ⊢ (𝜑 → (dom (𝐹 ∖ I ) ∖ {𝐼, 𝐽}) ⊆ dom (((𝑇‘{𝐼, 𝐽}) ∘ 𝐹) ∖ I ))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ∧ wa 401 = wceq 1569 ∈ wcel 2144 ≠ wne 2955 ⊆ wss 3896 ∖ cdif 4044 ∪ cun 4148 {cpr 4586 class class class wbr 5102 I cid 5545 ^◡ccnv 5650 dom cdm 5651 ran crn 5652 ↾ cres 5653 ∘ ccom 5655 Fn wfn 6538 ⟶wf 6539 –1-1-onto→wf1o 6542 ‘cfv 6543 2_oc2o 8477 ≈ cen 8977 Basecbs 17396 SymGrpcsymg 19592 pmTrspcpmtr 19664

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1827 ax-4 1841 ax-5 1942 ax-6 1999 ax-7 2040 ax-8 2146 ax-9 2154 ax-10 2177 ax-11 2193 ax-12 2212 ax-ext 2732 ax-rep 5231 ax-sep 5248 ax-nul 5259 ax-pow 5327 ax-pr 5391 ax-un 7755 ax-cnex 11263 ax-resscn 11264 ax-1cn 11265 ax-icn 11266 ax-addcl 11267 ax-addrcl 11268 ax-mulcl 11269 ax-mulrcl 11270 ax-mulcom 11271 ax-addass 11272 ax-mulass 11273 ax-distr 11274 ax-i2m1 11275 ax-1ne0 11276 ax-1rid 11277 ax-rnegex 11278 ax-rrecex 11279 ax-cnre 11280 ax-pre-lttri 11281 ax-pre-lttrn 11282 ax-pre-ltadd 11283 ax-pre-mulgt0 11284

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1572 df-fal 1582 df-ex 1812 df-nf 1816 df-sb 2099 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3739 df-csb 3848 df-ss 3897 df-pss 4013 df-dif 4046 df-in 4090 df-un 4150 df-nul 4278 df-if 4482 df-pw 4558 df-sn 4585 df-pr 4587 df-tp 4589 df-op 4835 df-uni 4867 df-iun 4952 df-br 5103 df-opab 5167 df-mpt 5186 df-tr 5212 df-id 5546 df-eprel 5551 df-po 5559 df-so 5560 df-fr 5604 df-we 5606 df-xp 5657 df-rel 5658 df-cnv 5659 df-co 5660 df-dm 5661 df-rn 5662 df-res 5663 df-ima 5664 df-pred 6307 df-ord 6368 df-on 6369 df-lim 6370 df-suc 6371 df-iota 6497 df-fun 6545 df-fn 6546 df-f 6547 df-f1 6548 df-fo 6549 df-f1o 6550 df-fv 6551 df-riota 7381 df-ov 7427 df-oprab 7428 df-mpo 7429 df-om 7882 df-1st 8005 df-2nd 8006 df-frecs 8306 df-wrecs 8337 df-recs 8386 df-rdg 8425 df-1o 8483 df-2o 8484 df-er 8724 df-map 8856 df-en 8981 df-dom 8982 df-sdom 8983 df-fin 8984 df-pnf 11352 df-mnf 11353 df-xr 11354 df-ltxr 11355 df-le 11356 df-sub 11550 df-neg 11551 df-nn 12343 df-2 12412 df-3 12413 df-4 12414 df-5 12415 df-6 12416 df-7 12417 df-8 12418 df-9 12419 df-n0 12614 df-z 12701 df-uz 12973 df-fz 13647 df-struct 17334 df-sets 17351 df-slot 17369 df-ndx 17381 df-base 17397 df-ress 17418 df-plusg 17450 df-tset 17456 df-efmnd 19074 df-symg 19593 df-pmtr 19665

This theorem is used by: pmtrcnelor 33702

W3C validator