Theorem suppovss 31665

Description: A bound for the support of an operation. (Contributed by Thierry Arnoux, 19-Jul-2023.)

Hypotheses

Ref	Expression
suppovss.f	⊢ 𝐹 = (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝐶)
suppovss.g	⊢ 𝐺 = (𝑥 ∈ 𝐴 ↦ (𝑦 ∈ 𝐵 ↦ 𝐶))
suppovss.a	⊢ (𝜑 → 𝐴 ∈ 𝑉)
suppovss.b	⊢ (𝜑 → 𝐵 ∈ 𝑊)
suppovss.z	⊢ (𝜑 → 𝑍 ∈ 𝐷)
suppovss.1	⊢ ((𝜑 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵)) → 𝐶 ∈ 𝐷)

Assertion

Ref	Expression
suppovss	⊢ (𝜑 → (𝐹 supp 𝑍) ⊆ ((𝐺 supp (𝐵 × {𝑍})) × ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))

Distinct variable groups:   𝐴,𝑘,𝑥,𝑦   𝐵,𝑘,𝑥,𝑦   𝑥,𝐷,𝑦   𝑥,𝐹,𝑦   𝑘,𝐺,𝑥,𝑦   𝑘,𝑍,𝑥,𝑦   𝜑,𝑘,𝑥,𝑦

Allowed substitution hints:   𝐶(𝑥,𝑦,𝑘)   𝐷(𝑘)   𝐹(𝑘)   𝑉(𝑥,𝑦,𝑘)   𝑊(𝑥,𝑦,𝑘)

Proof of Theorem suppovss

Dummy variable 𝑧 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		suppovss.1	. . . 4 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵)) → 𝐶 ∈ 𝐷)
2	1	ralrimivva 3193	. . 3 ⊢ (𝜑 → ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐵 𝐶 ∈ 𝐷)
3		suppovss.f	. . . 4 ⊢ 𝐹 = (𝑥 ∈ 𝐴, 𝑦 ∈ 𝐵 ↦ 𝐶)
4	3	fmpo 8005	. . 3 ⊢ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐵 𝐶 ∈ 𝐷 ↔ 𝐹:(𝐴 × 𝐵)⟶𝐷)
5	2, 4	sylib 217	. 2 ⊢ (𝜑 → 𝐹:(𝐴 × 𝐵)⟶𝐷)
6		simpr 485	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝑧 = ⟨𝑥, 𝑦⟩)
7	6	fveq2d 6851	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → (𝐹‘𝑧) = (𝐹‘⟨𝑥, 𝑦⟩))
8		df-ov 7365	. . . . . . . 8 ⊢ (𝑥𝐹𝑦) = (𝐹‘⟨𝑥, 𝑦⟩)
9		simpllr 774	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))))
10	9	eldifad 3925	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝑥 ∈ 𝐴)
11		simplr 767	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝑦 ∈ 𝐵)
12		simplll 773	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝜑)
13	12, 10, 11, 1	syl12anc 835	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝐶 ∈ 𝐷)
14	3	ovmpt4g 7507	. . . . . . . . 9 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐵 ∧ 𝐶 ∈ 𝐷) → (𝑥𝐹𝑦) = 𝐶)
15	10, 11, 13, 14	syl3anc 1371	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → (𝑥𝐹𝑦) = 𝐶)
16	8, 15	eqtr3id 2785	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → (𝐹‘⟨𝑥, 𝑦⟩) = 𝐶)
17		suppovss.b	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐵 ∈ 𝑊)
18	17	adantr 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ 𝑊)
19	18	mptexd 7179	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝑦 ∈ 𝐵 ↦ 𝐶) ∈ V)
20		suppovss.g	. . . . . . . . . . . 12 ⊢ 𝐺 = (𝑥 ∈ 𝐴 ↦ (𝑦 ∈ 𝐵 ↦ 𝐶))
21	19, 20	fmptd 7067	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐺:𝐴⟶V)
22		ssidd 3970	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐺 supp (𝐵 × {𝑍})) ⊆ (𝐺 supp (𝐵 × {𝑍})))
23		suppovss.a	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ∈ 𝑉)
24		snex 5393	. . . . . . . . . . . . 13 ⊢ {𝑍} ∈ V
25	24	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → {𝑍} ∈ V)
26	17, 25	xpexd 7690	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐵 × {𝑍}) ∈ V)
27	21, 22, 23, 26	suppssr 8132	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) → (𝐺‘𝑥) = (𝐵 × {𝑍}))
28	27	fveq1d 6849	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) → ((𝐺‘𝑥)‘𝑦) = ((𝐵 × {𝑍})‘𝑦))
29	12, 9, 28	syl2anc 584	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → ((𝐺‘𝑥)‘𝑦) = ((𝐵 × {𝑍})‘𝑦))
30		simpr 485	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ 𝐴)
31	20	fvmpt2 6964	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ 𝐴 ∧ (𝑦 ∈ 𝐵 ↦ 𝐶) ∈ V) → (𝐺‘𝑥) = (𝑦 ∈ 𝐵 ↦ 𝐶))
32	30, 19, 31	syl2anc 584	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝐺‘𝑥) = (𝑦 ∈ 𝐵 ↦ 𝐶))
33	1	anassrs 468	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐵) → 𝐶 ∈ 𝐷)
34	32, 33	fvmpt2d 6966	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐵) → ((𝐺‘𝑥)‘𝑦) = 𝐶)
35	12, 10, 11, 34	syl21anc 836	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → ((𝐺‘𝑥)‘𝑦) = 𝐶)
36		suppovss.z	. . . . . . . . . 10 ⊢ (𝜑 → 𝑍 ∈ 𝐷)
37	12, 36	syl 17	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝑍 ∈ 𝐷)
38		fvconst2g 7156	. . . . . . . . 9 ⊢ ((𝑍 ∈ 𝐷 ∧ 𝑦 ∈ 𝐵) → ((𝐵 × {𝑍})‘𝑦) = 𝑍)
39	37, 11, 38	syl2anc 584	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → ((𝐵 × {𝑍})‘𝑦) = 𝑍)
40	29, 35, 39	3eqtr3d 2779	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝐶 = 𝑍)
41	7, 16, 40	3eqtrd 2775	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → (𝐹‘𝑧) = 𝑍)
42	41	adantl3r 748	. . . . 5 ⊢ (((((𝜑 ∧ 𝑧 ∈ ((𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))) × 𝐵)) ∧ 𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) ∧ 𝑦 ∈ 𝐵) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → (𝐹‘𝑧) = 𝑍)
43		elxp2 5662	. . . . . . 7 ⊢ (𝑧 ∈ ((𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))) × 𝐵) ↔ ∃𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))∃𝑦 ∈ 𝐵 𝑧 = ⟨𝑥, 𝑦⟩)
44	43	biimpi 215	. . . . . 6 ⊢ (𝑧 ∈ ((𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))) × 𝐵) → ∃𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))∃𝑦 ∈ 𝐵 𝑧 = ⟨𝑥, 𝑦⟩)
45	44	adantl 482	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ ((𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))) × 𝐵)) → ∃𝑥 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))∃𝑦 ∈ 𝐵 𝑧 = ⟨𝑥, 𝑦⟩)
46	42, 45	r19.29vva 3203	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ ((𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))) × 𝐵)) → (𝐹‘𝑧) = 𝑍)
47	46	adantlr 713	. . 3 ⊢ (((𝜑 ∧ 𝑧 ∈ ((𝐴 × 𝐵) ∖ ((𝐺 supp (𝐵 × {𝑍})) × ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))) ∧ 𝑧 ∈ ((𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))) × 𝐵)) → (𝐹‘𝑧) = 𝑍)
48		simpr 485	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝑧 = ⟨𝑥, 𝑦⟩)
49	48	fveq2d 6851	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → (𝐹‘𝑧) = (𝐹‘⟨𝑥, 𝑦⟩))
50		simpllr 774	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝑥 ∈ 𝐴)
51		simplr 767	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))
52	51	eldifad 3925	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝑦 ∈ 𝐵)
53		simplll 773	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝜑)
54	53, 50, 52, 1	syl12anc 835	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝐶 ∈ 𝐷)
55	50, 52, 54, 14	syl3anc 1371	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → (𝑥𝐹𝑦) = 𝐶)
56	8, 55	eqtr3id 2785	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → (𝐹‘⟨𝑥, 𝑦⟩) = 𝐶)
57	53, 50, 52, 34	syl21anc 836	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → ((𝐺‘𝑥)‘𝑦) = 𝐶)
58		fvexd 6862	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐵) → ((𝐺‘𝑥)‘𝑦) ∈ V)
59	33, 32, 58	fmpt2d 7076	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝐺‘𝑥):𝐵⟶V)
60		ssiun2 5012	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ 𝐴 → ((𝐺‘𝑥) supp 𝑍) ⊆ ∪ 𝑥 ∈ 𝐴 ((𝐺‘𝑥) supp 𝑍))
61	60	adantl 482	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → ((𝐺‘𝑥) supp 𝑍) ⊆ ∪ 𝑥 ∈ 𝐴 ((𝐺‘𝑥) supp 𝑍))
62		fveq2 6847	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑘 → (𝐺‘𝑥) = (𝐺‘𝑘))
63	62	oveq1d 7377	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑘 → ((𝐺‘𝑥) supp 𝑍) = ((𝐺‘𝑘) supp 𝑍))
64	63	cbviunv 5005	. . . . . . . . . . . 12 ⊢ ∪ 𝑥 ∈ 𝐴 ((𝐺‘𝑥) supp 𝑍) = ∪ 𝑘 ∈ 𝐴 ((𝐺‘𝑘) supp 𝑍)
65	61, 64	sseqtrdi 3997	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → ((𝐺‘𝑥) supp 𝑍) ⊆ ∪ 𝑘 ∈ 𝐴 ((𝐺‘𝑘) supp 𝑍))
66		simpl 483	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) → 𝜑)
67		simpr 485	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) → 𝑘 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))))
68	67	eldifad 3925	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) → 𝑘 ∈ 𝐴)
69	21, 22, 23, 26	suppssr 8132	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) → (𝐺‘𝑘) = (𝐵 × {𝑍}))
70		eleq1w 2815	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑘 → (𝑥 ∈ 𝐴 ↔ 𝑘 ∈ 𝐴))
71	70	anbi2d 629	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑘 → ((𝜑 ∧ 𝑥 ∈ 𝐴) ↔ (𝜑 ∧ 𝑘 ∈ 𝐴)))
72	62	fneq1d 6600	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑘 → ((𝐺‘𝑥) Fn 𝐵 ↔ (𝐺‘𝑘) Fn 𝐵))
73	71, 72	imbi12d 344	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = 𝑘 → (((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝐺‘𝑥) Fn 𝐵) ↔ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (𝐺‘𝑘) Fn 𝐵)))
74	59	ffnd 6674	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝐺‘𝑥) Fn 𝐵)
75	73, 74	chvarvv 2002	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (𝐺‘𝑘) Fn 𝐵)
76	17	adantr 481	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐵 ∈ 𝑊)
77	36	adantr 481	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝑍 ∈ 𝐷)
78		fnsuppeq0 8128	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝐺‘𝑘) Fn 𝐵 ∧ 𝐵 ∈ 𝑊 ∧ 𝑍 ∈ 𝐷) → (((𝐺‘𝑘) supp 𝑍) = ∅ ↔ (𝐺‘𝑘) = (𝐵 × {𝑍})))
79	75, 76, 77, 78	syl3anc 1371	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → (((𝐺‘𝑘) supp 𝑍) = ∅ ↔ (𝐺‘𝑘) = (𝐵 × {𝑍})))
80	79	biimpar 478	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑘 ∈ 𝐴) ∧ (𝐺‘𝑘) = (𝐵 × {𝑍})) → ((𝐺‘𝑘) supp 𝑍) = ∅)
81	66, 68, 69, 80	syl21anc 836	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) → ((𝐺‘𝑘) supp 𝑍) = ∅)
82	81	ralrimiva 3139	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ∀𝑘 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))((𝐺‘𝑘) supp 𝑍) = ∅)
83		nfcv 2902	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑘(𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))
84	83	iunxdif3 5060	. . . . . . . . . . . . . 14 ⊢ (∀𝑘 ∈ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))((𝐺‘𝑘) supp 𝑍) = ∅ → ∪ 𝑘 ∈ (𝐴 ∖ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))))((𝐺‘𝑘) supp 𝑍) = ∪ 𝑘 ∈ 𝐴 ((𝐺‘𝑘) supp 𝑍))
85	82, 84	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∪ 𝑘 ∈ (𝐴 ∖ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))))((𝐺‘𝑘) supp 𝑍) = ∪ 𝑘 ∈ 𝐴 ((𝐺‘𝑘) supp 𝑍))
86		dfin4 4232	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∩ (𝐺 supp (𝐵 × {𝑍}))) = (𝐴 ∖ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))))
87		suppssdm 8113	. . . . . . . . . . . . . . . . 17 ⊢ (𝐺 supp (𝐵 × {𝑍})) ⊆ dom 𝐺
88	87, 21	fssdm 6693	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝐺 supp (𝐵 × {𝑍})) ⊆ 𝐴)
89		sseqin2 4180	. . . . . . . . . . . . . . . 16 ⊢ ((𝐺 supp (𝐵 × {𝑍})) ⊆ 𝐴 ↔ (𝐴 ∩ (𝐺 supp (𝐵 × {𝑍}))) = (𝐺 supp (𝐵 × {𝑍})))
90	88, 89	sylib 217	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐴 ∩ (𝐺 supp (𝐵 × {𝑍}))) = (𝐺 supp (𝐵 × {𝑍})))
91	86, 90	eqtr3id 2785	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐴 ∖ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍})))) = (𝐺 supp (𝐵 × {𝑍})))
92	91	iuneq1d 4986	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∪ 𝑘 ∈ (𝐴 ∖ (𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))))((𝐺‘𝑘) supp 𝑍) = ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))
93	85, 92	eqtr3d 2773	. . . . . . . . . . . 12 ⊢ (𝜑 → ∪ 𝑘 ∈ 𝐴 ((𝐺‘𝑘) supp 𝑍) = ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))
94	93	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → ∪ 𝑘 ∈ 𝐴 ((𝐺‘𝑘) supp 𝑍) = ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))
95	65, 94	sseqtrd 3987	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → ((𝐺‘𝑥) supp 𝑍) ⊆ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))
96	36	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑍 ∈ 𝐷)
97	59, 95, 18, 96	suppssr 8132	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) → ((𝐺‘𝑥)‘𝑦) = 𝑍)
98	97	adantr 481	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → ((𝐺‘𝑥)‘𝑦) = 𝑍)
99	57, 98	eqtr3d 2773	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → 𝐶 = 𝑍)
100	49, 56, 99	3eqtrd 2775	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → (𝐹‘𝑧) = 𝑍)
101	100	adantl3r 748	. . . . 5 ⊢ (((((𝜑 ∧ 𝑧 ∈ (𝐴 × (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ∧ 𝑧 = ⟨𝑥, 𝑦⟩) → (𝐹‘𝑧) = 𝑍)
102		elxp2 5662	. . . . . . 7 ⊢ (𝑧 ∈ (𝐴 × (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) ↔ ∃𝑥 ∈ 𝐴 ∃𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))𝑧 = ⟨𝑥, 𝑦⟩)
103	102	biimpi 215	. . . . . 6 ⊢ (𝑧 ∈ (𝐴 × (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) → ∃𝑥 ∈ 𝐴 ∃𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))𝑧 = ⟨𝑥, 𝑦⟩)
104	103	adantl 482	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴 × (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))) → ∃𝑥 ∈ 𝐴 ∃𝑦 ∈ (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))𝑧 = ⟨𝑥, 𝑦⟩)
105	101, 104	r19.29vva 3203	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴 × (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))) → (𝐹‘𝑧) = 𝑍)
106	105	adantlr 713	. . 3 ⊢ (((𝜑 ∧ 𝑧 ∈ ((𝐴 × 𝐵) ∖ ((𝐺 supp (𝐵 × {𝑍})) × ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))) ∧ 𝑧 ∈ (𝐴 × (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))) → (𝐹‘𝑧) = 𝑍)
107		simpr 485	. . . . 5 ⊢ ((𝜑 ∧ 𝑧 ∈ ((𝐴 × 𝐵) ∖ ((𝐺 supp (𝐵 × {𝑍})) × ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))) → 𝑧 ∈ ((𝐴 × 𝐵) ∖ ((𝐺 supp (𝐵 × {𝑍})) × ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))))
108		difxp 6121	. . . . 5 ⊢ ((𝐴 × 𝐵) ∖ ((𝐺 supp (𝐵 × {𝑍})) × ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))) = (((𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))) × 𝐵) ∪ (𝐴 × (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍))))
109	107, 108	eleqtrdi 2842	. . . 4 ⊢ ((𝜑 ∧ 𝑧 ∈ ((𝐴 × 𝐵) ∖ ((𝐺 supp (𝐵 × {𝑍})) × ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))) → 𝑧 ∈ (((𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))) × 𝐵) ∪ (𝐴 × (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))))
110		elun 4113	. . . 4 ⊢ (𝑧 ∈ (((𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))) × 𝐵) ∪ (𝐴 × (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))) ↔ (𝑧 ∈ ((𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))) × 𝐵) ∨ 𝑧 ∈ (𝐴 × (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))))
111	109, 110	sylib 217	. . 3 ⊢ ((𝜑 ∧ 𝑧 ∈ ((𝐴 × 𝐵) ∖ ((𝐺 supp (𝐵 × {𝑍})) × ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))) → (𝑧 ∈ ((𝐴 ∖ (𝐺 supp (𝐵 × {𝑍}))) × 𝐵) ∨ 𝑧 ∈ (𝐴 × (𝐵 ∖ ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))))
112	47, 106, 111	mpjaodan 957	. 2 ⊢ ((𝜑 ∧ 𝑧 ∈ ((𝐴 × 𝐵) ∖ ((𝐺 supp (𝐵 × {𝑍})) × ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))) → (𝐹‘𝑧) = 𝑍)
113	5, 112	suppss 8130	1 ⊢ (𝜑 → (𝐹 supp 𝑍) ⊆ ((𝐺 supp (𝐵 × {𝑍})) × ∪ 𝑘 ∈ (𝐺 supp (𝐵 × {𝑍}))((𝐺‘𝑘) supp 𝑍)))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 396   ∨ wo 845   = wceq 1541   ∈ wcel 2106  ∀wral 3060  ∃wrex 3069  Vcvv 3446   ∖ cdif 3910   ∪ cun 3911   ∩ cin 3912   ⊆ wss 3913  ∅c0 4287  {csn 4591  ⟨cop 4597  ∪ ciun 4959   ↦ cmpt 5193   × cxp 5636   Fn wfn 6496  ⟶wf 6497  ‘cfv 6501  (class class class)co 7362   ∈ cmpo 7364   supp csupp 8097

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2702  ax-rep 5247  ax-sep 5261  ax-nul 5268  ax-pow 5325  ax-pr 5389  ax-un 7677

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-ral 3061  df-rex 3070  df-reu 3352  df-rab 3406  df-v 3448  df-sbc 3743  df-csb 3859  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-nul 4288  df-if 4492  df-pw 4567  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4871  df-iun 4961  df-br 5111  df-opab 5173  df-mpt 5194  df-id 5536  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-iota 6453  df-fun 6503  df-fn 6504  df-f 6505  df-f1 6506  df-fo 6507  df-f1o 6508  df-fv 6509  df-ov 7365  df-oprab 7366  df-mpo 7367  df-1st 7926  df-2nd 7927  df-supp 8098

This theorem is referenced by:  fedgmullem1  32411