Theorem upxp 23817

Description: Universal property of the Cartesian product considered as a categorical product in the category of sets. (Contributed by Jeff Madsen, 2-Sep-2009.) (Revised by Mario Carneiro, 27-Dec-2014.)

Hypotheses

Ref	Expression
upxp.1	⊢ 𝑃 = (1st ↾ (𝐵 × 𝐶))
upxp.2	⊢ 𝑄 = (2nd ↾ (𝐵 × 𝐶))

Assertion

Ref	Expression
upxp	⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ∃!ℎ(ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)))

Distinct variable groups:   𝐴,ℎ   𝐵,ℎ   𝐶,ℎ   ℎ,𝐹   ℎ,𝐺   𝐷,ℎ

Allowed substitution hints:   𝑃(ℎ)   𝑄(ℎ)

Proof of Theorem upxp

Dummy variables 𝑥 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		mptexg 7226	. . . 4 ⊢ (𝐴 ∈ 𝐷 → (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) ∈ V)
2		eueq 3674	. . . 4 ⊢ ((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) ∈ V ↔ ∃!ℎ ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))
3	1, 2	sylib 221	. . 3 ⊢ (𝐴 ∈ 𝐷 → ∃!ℎ ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))
4	3	3ad2ant1 1151	. 2 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ∃!ℎ ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))
5		ffn 6712	. . . . . . . 8 ⊢ (ℎ:𝐴⟶(𝐵 × 𝐶) → ℎ Fn 𝐴)
6	5	3ad2ant1 1151	. . . . . . 7 ⊢ ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) → ℎ Fn 𝐴)
7	6	adantl 487	. . . . . 6 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) → ℎ Fn 𝐴)
8		ffvelcdm 7083	. . . . . . . . . . . . 13 ⊢ ((𝐹:𝐴⟶𝐵 ∧ 𝑥 ∈ 𝐴) → (𝐹‘𝑥) ∈ 𝐵)
9		ffvelcdm 7083	. . . . . . . . . . . . 13 ⊢ ((𝐺:𝐴⟶𝐶 ∧ 𝑥 ∈ 𝐴) → (𝐺‘𝑥) ∈ 𝐶)
10		opelxpi 5703	. . . . . . . . . . . . 13 ⊢ (((𝐹‘𝑥) ∈ 𝐵 ∧ (𝐺‘𝑥) ∈ 𝐶) → ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩ ∈ (𝐵 × 𝐶))
11	8, 9, 10	syl2an 608	. . . . . . . . . . . 12 ⊢ (((𝐹:𝐴⟶𝐵 ∧ 𝑥 ∈ 𝐴) ∧ (𝐺:𝐴⟶𝐶 ∧ 𝑥 ∈ 𝐴)) → ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩ ∈ (𝐵 × 𝐶))
12	11	anandirs 692	. . . . . . . . . . 11 ⊢ (((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑥 ∈ 𝐴) → ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩ ∈ (𝐵 × 𝐶))
13	12	ralrimiva 3160	. . . . . . . . . 10 ⊢ ((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ∀𝑥 ∈ 𝐴 ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩ ∈ (𝐵 × 𝐶))
14	13	3adant1 1148	. . . . . . . . 9 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ∀𝑥 ∈ 𝐴 ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩ ∈ (𝐵 × 𝐶))
15		eqid 2766	. . . . . . . . . 10 ⊢ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)
16	15	fmpt 7112	. . . . . . . . 9 ⊢ (∀𝑥 ∈ 𝐴 ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩ ∈ (𝐵 × 𝐶) ↔ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩):𝐴⟶(𝐵 × 𝐶))
17	14, 16	sylib 221	. . . . . . . 8 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩):𝐴⟶(𝐵 × 𝐶))
18	17	ffnd 6713	. . . . . . 7 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) Fn 𝐴)
19	18	adantr 486	. . . . . 6 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) → (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) Fn 𝐴)
20		xpss 5682	. . . . . . . . . . 11 ⊢ (𝐵 × 𝐶) ⊆ (V × V)
21		ffvelcdm 7083	. . . . . . . . . . 11 ⊢ ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) ∈ (𝐵 × 𝐶))
22	20, 21	sselid 3938	. . . . . . . . . 10 ⊢ ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) ∈ (V × V))
23	22	3ad2antl1 1204	. . . . . . . . 9 ⊢ (((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) ∈ (V × V))
24	23	adantll 727	. . . . . . . 8 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) ∈ (V × V))
25		fveq1 6887	. . . . . . . . . . . 12 ⊢ (𝐹 = (𝑃 ∘ ℎ) → (𝐹‘𝑧) = ((𝑃 ∘ ℎ)‘𝑧))
26		upxp.1	. . . . . . . . . . . . . 14 ⊢ 𝑃 = (1st ↾ (𝐵 × 𝐶))
27	26	coeq1i 5850	. . . . . . . . . . . . 13 ⊢ (𝑃 ∘ ℎ) = ((1st ↾ (𝐵 × 𝐶)) ∘ ℎ)
28	27	fveq1i 6889	. . . . . . . . . . . 12 ⊢ ((𝑃 ∘ ℎ)‘𝑧) = (((1st ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧)
29	25, 28	eqtrdi 2817	. . . . . . . . . . 11 ⊢ (𝐹 = (𝑃 ∘ ℎ) → (𝐹‘𝑧) = (((1st ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧))
30	29	3ad2ant2 1152	. . . . . . . . . 10 ⊢ ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) → (𝐹‘𝑧) = (((1st ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧))
31	30	ad2antlr 740	. . . . . . . . 9 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (𝐹‘𝑧) = (((1st ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧))
32		simpr1 1213	. . . . . . . . . 10 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) → ℎ:𝐴⟶(𝐵 × 𝐶))
33		fvco3 6988	. . . . . . . . . 10 ⊢ ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝑧 ∈ 𝐴) → (((1st ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧) = ((1st ↾ (𝐵 × 𝐶))‘(ℎ‘𝑧)))
34	32, 33	sylan 592	. . . . . . . . 9 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (((1st ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧) = ((1st ↾ (𝐵 × 𝐶))‘(ℎ‘𝑧)))
35	21	3ad2antl1 1204	. . . . . . . . . . 11 ⊢ (((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) ∈ (𝐵 × 𝐶))
36	35	adantll 727	. . . . . . . . . 10 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) ∈ (𝐵 × 𝐶))
37	36	fvresd 6908	. . . . . . . . 9 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → ((1st ↾ (𝐵 × 𝐶))‘(ℎ‘𝑧)) = (1st ‘(ℎ‘𝑧)))
38	31, 34, 37	3eqtrrd 2806	. . . . . . . 8 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (1st ‘(ℎ‘𝑧)) = (𝐹‘𝑧))
39		fveq1 6887	. . . . . . . . . . . 12 ⊢ (𝐺 = (𝑄 ∘ ℎ) → (𝐺‘𝑧) = ((𝑄 ∘ ℎ)‘𝑧))
40		upxp.2	. . . . . . . . . . . . . 14 ⊢ 𝑄 = (2nd ↾ (𝐵 × 𝐶))
41	40	coeq1i 5850	. . . . . . . . . . . . 13 ⊢ (𝑄 ∘ ℎ) = ((2nd ↾ (𝐵 × 𝐶)) ∘ ℎ)
42	41	fveq1i 6889	. . . . . . . . . . . 12 ⊢ ((𝑄 ∘ ℎ)‘𝑧) = (((2nd ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧)
43	39, 42	eqtrdi 2817	. . . . . . . . . . 11 ⊢ (𝐺 = (𝑄 ∘ ℎ) → (𝐺‘𝑧) = (((2nd ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧))
44	43	3ad2ant3 1153	. . . . . . . . . 10 ⊢ ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) → (𝐺‘𝑧) = (((2nd ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧))
45	44	ad2antlr 740	. . . . . . . . 9 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (𝐺‘𝑧) = (((2nd ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧))
46		fvco3 6988	. . . . . . . . . 10 ⊢ ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝑧 ∈ 𝐴) → (((2nd ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧) = ((2nd ↾ (𝐵 × 𝐶))‘(ℎ‘𝑧)))
47	32, 46	sylan 592	. . . . . . . . 9 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (((2nd ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧) = ((2nd ↾ (𝐵 × 𝐶))‘(ℎ‘𝑧)))
48	36	fvresd 6908	. . . . . . . . 9 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → ((2nd ↾ (𝐵 × 𝐶))‘(ℎ‘𝑧)) = (2nd ‘(ℎ‘𝑧)))
49	45, 47, 48	3eqtrrd 2806	. . . . . . . 8 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (2nd ‘(ℎ‘𝑧)) = (𝐺‘𝑧))
50		eqopi 8031	. . . . . . . 8 ⊢ (((ℎ‘𝑧) ∈ (V × V) ∧ ((1st ‘(ℎ‘𝑧)) = (𝐹‘𝑧) ∧ (2nd ‘(ℎ‘𝑧)) = (𝐺‘𝑧))) → (ℎ‘𝑧) = ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩)
51	24, 38, 49, 50	syl12anc 850	. . . . . . 7 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) = ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩)
52		fveq2 6888	. . . . . . . . . 10 ⊢ (𝑥 = 𝑧 → (𝐹‘𝑥) = (𝐹‘𝑧))
53		fveq2 6888	. . . . . . . . . 10 ⊢ (𝑥 = 𝑧 → (𝐺‘𝑥) = (𝐺‘𝑧))
54	52, 53	opeq12d 4851	. . . . . . . . 9 ⊢ (𝑥 = 𝑧 → ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩ = ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩)
55		opex 5450	. . . . . . . . 9 ⊢ ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩ ∈ V
56	54, 15, 55	fvmpt 6996	. . . . . . . 8 ⊢ (𝑧 ∈ 𝐴 → ((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧) = ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩)
57	56	adantl 487	. . . . . . 7 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → ((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧) = ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩)
58	51, 57	eqtr4d 2804	. . . . . 6 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) = ((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧))
59	7, 19, 58	eqfnfvd 7035	. . . . 5 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) → ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))
60	59	ex 418	. . . 4 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) → ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
61		ffn 6712	. . . . . . . . 9 ⊢ (𝐹:𝐴⟶𝐵 → 𝐹 Fn 𝐴)
62	61	3ad2ant2 1152	. . . . . . . 8 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → 𝐹 Fn 𝐴)
63		fo1st 8015	. . . . . . . . . . 11 ⊢ 1st :V–onto→V
64		fofn 6801	. . . . . . . . . . 11 ⊢ (1st :V–onto→V → 1st Fn V)
65	63, 64	ax-mp 5	. . . . . . . . . 10 ⊢ 1st Fn V
66		ssv 3964	. . . . . . . . . 10 ⊢ (𝐵 × 𝐶) ⊆ V
67		fnssres 6665	. . . . . . . . . 10 ⊢ ((1st Fn V ∧ (𝐵 × 𝐶) ⊆ V) → (1st ↾ (𝐵 × 𝐶)) Fn (𝐵 × 𝐶))
68	65, 66, 67	mp2an 705	. . . . . . . . 9 ⊢ (1st ↾ (𝐵 × 𝐶)) Fn (𝐵 × 𝐶)
69	17	frnd 6721	. . . . . . . . 9 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ran (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) ⊆ (𝐵 × 𝐶))
70		fnco 6660	. . . . . . . . 9 ⊢ (((1st ↾ (𝐵 × 𝐶)) Fn (𝐵 × 𝐶) ∧ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) Fn 𝐴 ∧ ran (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) ⊆ (𝐵 × 𝐶)) → ((1st ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) Fn 𝐴)
71	68, 18, 69, 70	mp3an2i 1495	. . . . . . . 8 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ((1st ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) Fn 𝐴)
72		fvco3 6988	. . . . . . . . . 10 ⊢ (((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩):𝐴⟶(𝐵 × 𝐶) ∧ 𝑧 ∈ 𝐴) → (((1st ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))‘𝑧) = ((1st ↾ (𝐵 × 𝐶))‘((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧)))
73	17, 72	sylan 592	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → (((1st ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))‘𝑧) = ((1st ↾ (𝐵 × 𝐶))‘((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧)))
74	56	adantl 487	. . . . . . . . . 10 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧) = ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩)
75	74	fveq2d 6892	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ((1st ↾ (𝐵 × 𝐶))‘((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧)) = ((1st ↾ (𝐵 × 𝐶))‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩))
76		ffvelcdm 7083	. . . . . . . . . . . . . 14 ⊢ ((𝐹:𝐴⟶𝐵 ∧ 𝑧 ∈ 𝐴) → (𝐹‘𝑧) ∈ 𝐵)
77		ffvelcdm 7083	. . . . . . . . . . . . . 14 ⊢ ((𝐺:𝐴⟶𝐶 ∧ 𝑧 ∈ 𝐴) → (𝐺‘𝑧) ∈ 𝐶)
78		opelxpi 5703	. . . . . . . . . . . . . 14 ⊢ (((𝐹‘𝑧) ∈ 𝐵 ∧ (𝐺‘𝑧) ∈ 𝐶) → ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩ ∈ (𝐵 × 𝐶))
79	76, 77, 78	syl2an 608	. . . . . . . . . . . . 13 ⊢ (((𝐹:𝐴⟶𝐵 ∧ 𝑧 ∈ 𝐴) ∧ (𝐺:𝐴⟶𝐶 ∧ 𝑧 ∈ 𝐴)) → ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩ ∈ (𝐵 × 𝐶))
80	79	anandirs 692	. . . . . . . . . . . 12 ⊢ (((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩ ∈ (𝐵 × 𝐶))
81	80	3adantl1 1185	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩ ∈ (𝐵 × 𝐶))
82	81	fvresd 6908	. . . . . . . . . 10 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ((1st ↾ (𝐵 × 𝐶))‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩) = (1st ‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩))
83		fvex 6901	. . . . . . . . . . 11 ⊢ (𝐹‘𝑧) ∈ V
84		fvex 6901	. . . . . . . . . . 11 ⊢ (𝐺‘𝑧) ∈ V
85	83, 84	op1st 8003	. . . . . . . . . 10 ⊢ (1st ‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩) = (𝐹‘𝑧)
86	82, 85	eqtrdi 2817	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ((1st ↾ (𝐵 × 𝐶))‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩) = (𝐹‘𝑧))
87	73, 75, 86	3eqtrrd 2806	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → (𝐹‘𝑧) = (((1st ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))‘𝑧))
88	62, 71, 87	eqfnfvd 7035	. . . . . . 7 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → 𝐹 = ((1st ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
89	26	coeq1i 5850	. . . . . . 7 ⊢ (𝑃 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) = ((1st ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))
90	88, 89	eqtr4di 2819	. . . . . 6 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → 𝐹 = (𝑃 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
91		ffn 6712	. . . . . . . . 9 ⊢ (𝐺:𝐴⟶𝐶 → 𝐺 Fn 𝐴)
92	91	3ad2ant3 1153	. . . . . . . 8 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → 𝐺 Fn 𝐴)
93		fo2nd 8016	. . . . . . . . . . 11 ⊢ 2nd :V–onto→V
94		fofn 6801	. . . . . . . . . . 11 ⊢ (2nd :V–onto→V → 2nd Fn V)
95	93, 94	ax-mp 5	. . . . . . . . . 10 ⊢ 2nd Fn V
96		fnssres 6665	. . . . . . . . . 10 ⊢ ((2nd Fn V ∧ (𝐵 × 𝐶) ⊆ V) → (2nd ↾ (𝐵 × 𝐶)) Fn (𝐵 × 𝐶))
97	95, 66, 96	mp2an 705	. . . . . . . . 9 ⊢ (2nd ↾ (𝐵 × 𝐶)) Fn (𝐵 × 𝐶)
98		fnco 6660	. . . . . . . . 9 ⊢ (((2nd ↾ (𝐵 × 𝐶)) Fn (𝐵 × 𝐶) ∧ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) Fn 𝐴 ∧ ran (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) ⊆ (𝐵 × 𝐶)) → ((2nd ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) Fn 𝐴)
99	97, 18, 69, 98	mp3an2i 1495	. . . . . . . 8 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ((2nd ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) Fn 𝐴)
100		fvco3 6988	. . . . . . . . . 10 ⊢ (((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩):𝐴⟶(𝐵 × 𝐶) ∧ 𝑧 ∈ 𝐴) → (((2nd ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))‘𝑧) = ((2nd ↾ (𝐵 × 𝐶))‘((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧)))
101	17, 100	sylan 592	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → (((2nd ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))‘𝑧) = ((2nd ↾ (𝐵 × 𝐶))‘((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧)))
102	74	fveq2d 6892	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ((2nd ↾ (𝐵 × 𝐶))‘((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧)) = ((2nd ↾ (𝐵 × 𝐶))‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩))
103	81	fvresd 6908	. . . . . . . . . 10 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ((2nd ↾ (𝐵 × 𝐶))‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩) = (2nd ‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩))
104	83, 84	op2nd 8004	. . . . . . . . . 10 ⊢ (2nd ‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩) = (𝐺‘𝑧)
105	103, 104	eqtrdi 2817	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ((2nd ↾ (𝐵 × 𝐶))‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩) = (𝐺‘𝑧))
106	101, 102, 105	3eqtrrd 2806	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → (𝐺‘𝑧) = (((2nd ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))‘𝑧))
107	92, 99, 106	eqfnfvd 7035	. . . . . . 7 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → 𝐺 = ((2nd ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
108	40	coeq1i 5850	. . . . . . 7 ⊢ (𝑄 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) = ((2nd ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))
109	107, 108	eqtr4di 2819	. . . . . 6 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → 𝐺 = (𝑄 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
110	17, 90, 109	3jca 1146	. . . . 5 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩):𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) ∧ 𝐺 = (𝑄 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))))
111		feq1 6690	. . . . . 6 ⊢ (ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) → (ℎ:𝐴⟶(𝐵 × 𝐶) ↔ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩):𝐴⟶(𝐵 × 𝐶)))
112		coeq2 5849	. . . . . . 7 ⊢ (ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) → (𝑃 ∘ ℎ) = (𝑃 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
113	112	eqeq2d 2777	. . . . . 6 ⊢ (ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) → (𝐹 = (𝑃 ∘ ℎ) ↔ 𝐹 = (𝑃 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))))
114		coeq2 5849	. . . . . . 7 ⊢ (ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) → (𝑄 ∘ ℎ) = (𝑄 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
115	114	eqeq2d 2777	. . . . . 6 ⊢ (ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) → (𝐺 = (𝑄 ∘ ℎ) ↔ 𝐺 = (𝑄 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))))
116	111, 113, 115	3anbi123d 1464	. . . . 5 ⊢ (ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) → ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) ↔ ((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩):𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) ∧ 𝐺 = (𝑄 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))))
117	110, 116	syl5ibrcom 250	. . . 4 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → (ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) → (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))))
118	60, 117	impbid 215	. . 3 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) ↔ ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
119	118	eubidv 2617	. 2 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → (∃!ℎ(ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) ↔ ∃!ℎ ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
120	4, 119	mpbird 260	1 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ∃!ℎ(ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)))

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2146  ∃!weu 2599  ∀wral 3082  Vcvv 3458   ⊆ wss 3908  ⟨cop 4600   ↦ cmpt 5197   × cxp 5664  ran crn 5667   ↾ cres 5668   ∘ ccom 5670   Fn wfn 6538  ⟶wf 6539  –onto→wfo 6541  ‘cfv 6543  1^st c1st 7993  2^nd c2nd 7994

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 2738  ax-rep 5243  ax-sep 5262  ax-nul 5274  ax-pr 5409  ax-un 7745

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-ne 2962  df-ral 3083  df-rex 3093  df-reu 3373  df-rab 3420  df-v 3460  df-sbc 3748  df-csb 3857  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-nul 4290  df-if 4493  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4878  df-iun 4963  df-br 5115  df-opab 5179  df-mpt 5198  df-id 5561  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-iota 6499  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-1st 7995  df-2nd 7996

This theorem is used by:  uptx  23819  txcn  23820