Theorem mapfienlem2 9403

Description: Lemma 2 for mapfien 9405. (Contributed by AV, 3-Jul-2019.) (Revised by AV, 28-Jul-2024.)

Hypotheses

Ref	Expression
mapfien.s	⊢ 𝑆 = {𝑥 ∈ (𝐵 ↑m 𝐴) ∣ 𝑥 finSupp 𝑍}
mapfien.t	⊢ 𝑇 = {𝑥 ∈ (𝐷 ↑m 𝐶) ∣ 𝑥 finSupp 𝑊}
mapfien.w	⊢ 𝑊 = (𝐺‘𝑍)
mapfien.f	⊢ (𝜑 → 𝐹:𝐶–1-1-onto→𝐴)
mapfien.g	⊢ (𝜑 → 𝐺:𝐵–1-1-onto→𝐷)
mapfien.a	⊢ (𝜑 → 𝐴 ∈ 𝑈)
mapfien.b	⊢ (𝜑 → 𝐵 ∈ 𝑉)
mapfien.c	⊢ (𝜑 → 𝐶 ∈ 𝑋)
mapfien.d	⊢ (𝜑 → 𝐷 ∈ 𝑌)
mapfien.z	⊢ (𝜑 → 𝑍 ∈ 𝐵)

Assertion

Ref	Expression
mapfienlem2	⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → ((◡𝐺 ∘ 𝑔) ∘ ◡𝐹) finSupp 𝑍)

Distinct variable groups:   𝑥,𝐴   𝑥,𝐵   𝑥,𝐶   𝑥,𝑔,𝐹   𝑔,𝐺,𝑥   𝜑,𝑔   𝑥,𝐷   𝑆,𝑔   𝑇,𝑔   𝑥,𝑊   𝑥,𝑍

Allowed substitution hints:   𝜑(𝑥)   𝐴(𝑔)   𝐵(𝑔)   𝐶(𝑔)   𝐷(𝑔)   𝑆(𝑥)   𝑇(𝑥)   𝑈(𝑥,𝑔)   𝑉(𝑥,𝑔)   𝑊(𝑔)   𝑋(𝑥,𝑔)   𝑌(𝑥,𝑔)   𝑍(𝑔)

Proof of Theorem mapfienlem2

Step	Hyp	Ref	Expression
1		mapfien.z	. . . 4 ⊢ (𝜑 → 𝑍 ∈ 𝐵)
2	1	adantr 479	. . 3 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → 𝑍 ∈ 𝐵)
3		mapfien.w	. . . . 5 ⊢ 𝑊 = (𝐺‘𝑍)
4		mapfien.g	. . . . . . 7 ⊢ (𝜑 → 𝐺:𝐵–1-1-onto→𝐷)
5		f1of 6832	. . . . . . 7 ⊢ (𝐺:𝐵–1-1-onto→𝐷 → 𝐺:𝐵⟶𝐷)
6	4, 5	syl 17	. . . . . 6 ⊢ (𝜑 → 𝐺:𝐵⟶𝐷)
7	6, 1	ffvelcdmd 7086	. . . . 5 ⊢ (𝜑 → (𝐺‘𝑍) ∈ 𝐷)
8	3, 7	eqeltrid 2835	. . . 4 ⊢ (𝜑 → 𝑊 ∈ 𝐷)
9	8	adantr 479	. . 3 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → 𝑊 ∈ 𝐷)
10		elrabi 3676	. . . . . 6 ⊢ (𝑔 ∈ {𝑥 ∈ (𝐷 ↑m 𝐶) ∣ 𝑥 finSupp 𝑊} → 𝑔 ∈ (𝐷 ↑m 𝐶))
11		elmapi 8845	. . . . . 6 ⊢ (𝑔 ∈ (𝐷 ↑m 𝐶) → 𝑔:𝐶⟶𝐷)
12	10, 11	syl 17	. . . . 5 ⊢ (𝑔 ∈ {𝑥 ∈ (𝐷 ↑m 𝐶) ∣ 𝑥 finSupp 𝑊} → 𝑔:𝐶⟶𝐷)
13		mapfien.t	. . . . 5 ⊢ 𝑇 = {𝑥 ∈ (𝐷 ↑m 𝐶) ∣ 𝑥 finSupp 𝑊}
14	12, 13	eleq2s 2849	. . . 4 ⊢ (𝑔 ∈ 𝑇 → 𝑔:𝐶⟶𝐷)
15	14	adantl 480	. . 3 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → 𝑔:𝐶⟶𝐷)
16		f1ocnv 6844	. . . . 5 ⊢ (𝐺:𝐵–1-1-onto→𝐷 → ◡𝐺:𝐷–1-1-onto→𝐵)
17		f1of 6832	. . . . 5 ⊢ (◡𝐺:𝐷–1-1-onto→𝐵 → ◡𝐺:𝐷⟶𝐵)
18	4, 16, 17	3syl 18	. . . 4 ⊢ (𝜑 → ◡𝐺:𝐷⟶𝐵)
19	18	adantr 479	. . 3 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → ◡𝐺:𝐷⟶𝐵)
20		ssidd 4004	. . 3 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → 𝐷 ⊆ 𝐷)
21		mapfien.c	. . . 4 ⊢ (𝜑 → 𝐶 ∈ 𝑋)
22	21	adantr 479	. . 3 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → 𝐶 ∈ 𝑋)
23		mapfien.d	. . . 4 ⊢ (𝜑 → 𝐷 ∈ 𝑌)
24	23	adantr 479	. . 3 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → 𝐷 ∈ 𝑌)
25		breq1 5150	. . . . . . 7 ⊢ (𝑥 = 𝑔 → (𝑥 finSupp 𝑊 ↔ 𝑔 finSupp 𝑊))
26	25	elrab 3682	. . . . . 6 ⊢ (𝑔 ∈ {𝑥 ∈ (𝐷 ↑m 𝐶) ∣ 𝑥 finSupp 𝑊} ↔ (𝑔 ∈ (𝐷 ↑m 𝐶) ∧ 𝑔 finSupp 𝑊))
27	26	simprbi 495	. . . . 5 ⊢ (𝑔 ∈ {𝑥 ∈ (𝐷 ↑m 𝐶) ∣ 𝑥 finSupp 𝑊} → 𝑔 finSupp 𝑊)
28	27, 13	eleq2s 2849	. . . 4 ⊢ (𝑔 ∈ 𝑇 → 𝑔 finSupp 𝑊)
29	28	adantl 480	. . 3 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → 𝑔 finSupp 𝑊)
30	4, 1	jca 510	. . . . . 6 ⊢ (𝜑 → (𝐺:𝐵–1-1-onto→𝐷 ∧ 𝑍 ∈ 𝐵))
31	3	eqcomi 2739	. . . . . 6 ⊢ (𝐺‘𝑍) = 𝑊
32	30, 31	jctir 519	. . . . 5 ⊢ (𝜑 → ((𝐺:𝐵–1-1-onto→𝐷 ∧ 𝑍 ∈ 𝐵) ∧ (𝐺‘𝑍) = 𝑊))
33	32	adantr 479	. . . 4 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → ((𝐺:𝐵–1-1-onto→𝐷 ∧ 𝑍 ∈ 𝐵) ∧ (𝐺‘𝑍) = 𝑊))
34		f1ocnvfv 7278	. . . . 5 ⊢ ((𝐺:𝐵–1-1-onto→𝐷 ∧ 𝑍 ∈ 𝐵) → ((𝐺‘𝑍) = 𝑊 → (◡𝐺‘𝑊) = 𝑍))
35	34	imp 405	. . . 4 ⊢ (((𝐺:𝐵–1-1-onto→𝐷 ∧ 𝑍 ∈ 𝐵) ∧ (𝐺‘𝑍) = 𝑊) → (◡𝐺‘𝑊) = 𝑍)
36	33, 35	syl 17	. . 3 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → (◡𝐺‘𝑊) = 𝑍)
37	2, 9, 15, 19, 20, 22, 24, 29, 36	fsuppcor 9401	. 2 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → (◡𝐺 ∘ 𝑔) finSupp 𝑍)
38		mapfien.f	. . . 4 ⊢ (𝜑 → 𝐹:𝐶–1-1-onto→𝐴)
39		f1ocnv 6844	. . . 4 ⊢ (𝐹:𝐶–1-1-onto→𝐴 → ◡𝐹:𝐴–1-1-onto→𝐶)
40		f1of1 6831	. . . 4 ⊢ (◡𝐹:𝐴–1-1-onto→𝐶 → ◡𝐹:𝐴–1-1→𝐶)
41	38, 39, 40	3syl 18	. . 3 ⊢ (𝜑 → ◡𝐹:𝐴–1-1→𝐶)
42	41	adantr 479	. 2 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → ◡𝐹:𝐴–1-1→𝐶)
43		mapfien.b	. . . . 5 ⊢ (𝜑 → 𝐵 ∈ 𝑉)
44	6, 43	jca 510	. . . 4 ⊢ (𝜑 → (𝐺:𝐵⟶𝐷 ∧ 𝐵 ∈ 𝑉))
45		fex 7229	. . . 4 ⊢ ((𝐺:𝐵⟶𝐷 ∧ 𝐵 ∈ 𝑉) → 𝐺 ∈ V)
46		cnvexg 7917	. . . 4 ⊢ (𝐺 ∈ V → ◡𝐺 ∈ V)
47	44, 45, 46	3syl 18	. . 3 ⊢ (𝜑 → ◡𝐺 ∈ V)
48		coexg 7922	. . 3 ⊢ ((◡𝐺 ∈ V ∧ 𝑔 ∈ 𝑇) → (◡𝐺 ∘ 𝑔) ∈ V)
49	47, 48	sylan 578	. 2 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → (◡𝐺 ∘ 𝑔) ∈ V)
50	37, 42, 2, 49	fsuppco 9399	1 ⊢ ((𝜑 ∧ 𝑔 ∈ 𝑇) → ((◡𝐺 ∘ 𝑔) ∘ ◡𝐹) finSupp 𝑍)

Syntax hints:   → wi 4   ∧ wa 394   = wceq 1539   ∈ wcel 2104  {crab 3430  Vcvv 3472   class class class wbr 5147  ^◡ccnv 5674   ∘ ccom 5679  ⟶wf 6538  –1-1→wf1 6539  –1-1-onto→wf1o 6541  ‘cfv 6542  (class class class)co 7411   ↑_m cmap 8822   finSupp cfsupp 9363

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1911  ax-6 1969  ax-7 2009  ax-8 2106  ax-9 2114  ax-10 2135  ax-11 2152  ax-12 2169  ax-ext 2701  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7727

This theorem depends on definitions:  df-bi 206  df-an 395  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2532  df-eu 2561  df-clab 2708  df-cleq 2722  df-clel 2808  df-nfc 2883  df-ne 2939  df-ral 3060  df-rex 3069  df-reu 3375  df-rab 3431  df-v 3474  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-iun 4998  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-ord 6366  df-on 6367  df-lim 6368  df-suc 6369  df-iota 6494  df-fun 6544  df-fn 6545  df-f 6546  df-f1 6547  df-fo 6548  df-f1o 6549  df-fv 6550  df-ov 7414  df-oprab 7415  df-mpo 7416  df-om 7858  df-1st 7977  df-2nd 7978  df-supp 8149  df-1o 8468  df-map 8824  df-en 8942  df-fin 8945  df-fsupp 9364

This theorem is referenced by:  mapfienlem3  9404