Theorem upxp 23127

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 7223	. . . 4 ⊢ (𝐴 ∈ 𝐷 → (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) ∈ V)
2		eueq 3705	. . . 4 ⊢ ((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) ∈ V ↔ ∃!ℎ ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))
3	1, 2	sylib 217	. . 3 ⊢ (𝐴 ∈ 𝐷 → ∃!ℎ ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))
4	3	3ad2ant1 1134	. 2 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ∃!ℎ ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))
5		ffn 6718	. . . . . . . 8 ⊢ (ℎ:𝐴⟶(𝐵 × 𝐶) → ℎ Fn 𝐴)
6	5	3ad2ant1 1134	. . . . . . 7 ⊢ ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) → ℎ Fn 𝐴)
7	6	adantl 483	. . . . . 6 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) → ℎ Fn 𝐴)
8		ffvelcdm 7084	. . . . . . . . . . . . 13 ⊢ ((𝐹:𝐴⟶𝐵 ∧ 𝑥 ∈ 𝐴) → (𝐹‘𝑥) ∈ 𝐵)
9		ffvelcdm 7084	. . . . . . . . . . . . 13 ⊢ ((𝐺:𝐴⟶𝐶 ∧ 𝑥 ∈ 𝐴) → (𝐺‘𝑥) ∈ 𝐶)
10		opelxpi 5714	. . . . . . . . . . . . 13 ⊢ (((𝐹‘𝑥) ∈ 𝐵 ∧ (𝐺‘𝑥) ∈ 𝐶) → ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩ ∈ (𝐵 × 𝐶))
11	8, 9, 10	syl2an 597	. . . . . . . . . . . 12 ⊢ (((𝐹:𝐴⟶𝐵 ∧ 𝑥 ∈ 𝐴) ∧ (𝐺:𝐴⟶𝐶 ∧ 𝑥 ∈ 𝐴)) → ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩ ∈ (𝐵 × 𝐶))
12	11	anandirs 678	. . . . . . . . . . 11 ⊢ (((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑥 ∈ 𝐴) → ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩ ∈ (𝐵 × 𝐶))
13	12	ralrimiva 3147	. . . . . . . . . 10 ⊢ ((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ∀𝑥 ∈ 𝐴 ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩ ∈ (𝐵 × 𝐶))
14	13	3adant1 1131	. . . . . . . . 9 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ∀𝑥 ∈ 𝐴 ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩ ∈ (𝐵 × 𝐶))
15		eqid 2733	. . . . . . . . . 10 ⊢ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)
16	15	fmpt 7110	. . . . . . . . 9 ⊢ (∀𝑥 ∈ 𝐴 ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩ ∈ (𝐵 × 𝐶) ↔ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩):𝐴⟶(𝐵 × 𝐶))
17	14, 16	sylib 217	. . . . . . . 8 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩):𝐴⟶(𝐵 × 𝐶))
18	17	ffnd 6719	. . . . . . 7 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) Fn 𝐴)
19	18	adantr 482	. . . . . 6 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) → (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) Fn 𝐴)
20		xpss 5693	. . . . . . . . . . 11 ⊢ (𝐵 × 𝐶) ⊆ (V × V)
21		ffvelcdm 7084	. . . . . . . . . . 11 ⊢ ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) ∈ (𝐵 × 𝐶))
22	20, 21	sselid 3981	. . . . . . . . . 10 ⊢ ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) ∈ (V × V))
23	22	3ad2antl1 1186	. . . . . . . . 9 ⊢ (((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) ∈ (V × V))
24	23	adantll 713	. . . . . . . 8 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) ∈ (V × V))
25		fveq1 6891	. . . . . . . . . . . 12 ⊢ (𝐹 = (𝑃 ∘ ℎ) → (𝐹‘𝑧) = ((𝑃 ∘ ℎ)‘𝑧))
26		upxp.1	. . . . . . . . . . . . . 14 ⊢ 𝑃 = (1st ↾ (𝐵 × 𝐶))
27	26	coeq1i 5860	. . . . . . . . . . . . 13 ⊢ (𝑃 ∘ ℎ) = ((1st ↾ (𝐵 × 𝐶)) ∘ ℎ)
28	27	fveq1i 6893	. . . . . . . . . . . 12 ⊢ ((𝑃 ∘ ℎ)‘𝑧) = (((1st ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧)
29	25, 28	eqtrdi 2789	. . . . . . . . . . 11 ⊢ (𝐹 = (𝑃 ∘ ℎ) → (𝐹‘𝑧) = (((1st ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧))
30	29	3ad2ant2 1135	. . . . . . . . . 10 ⊢ ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) → (𝐹‘𝑧) = (((1st ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧))
31	30	ad2antlr 726	. . . . . . . . 9 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (𝐹‘𝑧) = (((1st ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧))
32		simpr1 1195	. . . . . . . . . 10 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) → ℎ:𝐴⟶(𝐵 × 𝐶))
33		fvco3 6991	. . . . . . . . . 10 ⊢ ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝑧 ∈ 𝐴) → (((1st ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧) = ((1st ↾ (𝐵 × 𝐶))‘(ℎ‘𝑧)))
34	32, 33	sylan 581	. . . . . . . . 9 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (((1st ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧) = ((1st ↾ (𝐵 × 𝐶))‘(ℎ‘𝑧)))
35	21	3ad2antl1 1186	. . . . . . . . . . 11 ⊢ (((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) ∈ (𝐵 × 𝐶))
36	35	adantll 713	. . . . . . . . . 10 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) ∈ (𝐵 × 𝐶))
37	36	fvresd 6912	. . . . . . . . 9 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → ((1st ↾ (𝐵 × 𝐶))‘(ℎ‘𝑧)) = (1st ‘(ℎ‘𝑧)))
38	31, 34, 37	3eqtrrd 2778	. . . . . . . 8 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (1st ‘(ℎ‘𝑧)) = (𝐹‘𝑧))
39		fveq1 6891	. . . . . . . . . . . 12 ⊢ (𝐺 = (𝑄 ∘ ℎ) → (𝐺‘𝑧) = ((𝑄 ∘ ℎ)‘𝑧))
40		upxp.2	. . . . . . . . . . . . . 14 ⊢ 𝑄 = (2nd ↾ (𝐵 × 𝐶))
41	40	coeq1i 5860	. . . . . . . . . . . . 13 ⊢ (𝑄 ∘ ℎ) = ((2nd ↾ (𝐵 × 𝐶)) ∘ ℎ)
42	41	fveq1i 6893	. . . . . . . . . . . 12 ⊢ ((𝑄 ∘ ℎ)‘𝑧) = (((2nd ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧)
43	39, 42	eqtrdi 2789	. . . . . . . . . . 11 ⊢ (𝐺 = (𝑄 ∘ ℎ) → (𝐺‘𝑧) = (((2nd ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧))
44	43	3ad2ant3 1136	. . . . . . . . . 10 ⊢ ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) → (𝐺‘𝑧) = (((2nd ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧))
45	44	ad2antlr 726	. . . . . . . . 9 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (𝐺‘𝑧) = (((2nd ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧))
46		fvco3 6991	. . . . . . . . . 10 ⊢ ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝑧 ∈ 𝐴) → (((2nd ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧) = ((2nd ↾ (𝐵 × 𝐶))‘(ℎ‘𝑧)))
47	32, 46	sylan 581	. . . . . . . . 9 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (((2nd ↾ (𝐵 × 𝐶)) ∘ ℎ)‘𝑧) = ((2nd ↾ (𝐵 × 𝐶))‘(ℎ‘𝑧)))
48	36	fvresd 6912	. . . . . . . . 9 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → ((2nd ↾ (𝐵 × 𝐶))‘(ℎ‘𝑧)) = (2nd ‘(ℎ‘𝑧)))
49	45, 47, 48	3eqtrrd 2778	. . . . . . . 8 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (2nd ‘(ℎ‘𝑧)) = (𝐺‘𝑧))
50		eqopi 8011	. . . . . . . 8 ⊢ (((ℎ‘𝑧) ∈ (V × V) ∧ ((1st ‘(ℎ‘𝑧)) = (𝐹‘𝑧) ∧ (2nd ‘(ℎ‘𝑧)) = (𝐺‘𝑧))) → (ℎ‘𝑧) = ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩)
51	24, 38, 49, 50	syl12anc 836	. . . . . . 7 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) = ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩)
52		fveq2 6892	. . . . . . . . . 10 ⊢ (𝑥 = 𝑧 → (𝐹‘𝑥) = (𝐹‘𝑧))
53		fveq2 6892	. . . . . . . . . 10 ⊢ (𝑥 = 𝑧 → (𝐺‘𝑥) = (𝐺‘𝑧))
54	52, 53	opeq12d 4882	. . . . . . . . 9 ⊢ (𝑥 = 𝑧 → ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩ = ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩)
55		opex 5465	. . . . . . . . 9 ⊢ ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩ ∈ V
56	54, 15, 55	fvmpt 6999	. . . . . . . 8 ⊢ (𝑧 ∈ 𝐴 → ((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧) = ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩)
57	56	adantl 483	. . . . . . 7 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → ((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧) = ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩)
58	51, 57	eqtr4d 2776	. . . . . 6 ⊢ ((((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) ∧ 𝑧 ∈ 𝐴) → (ℎ‘𝑧) = ((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧))
59	7, 19, 58	eqfnfvd 7036	. . . . 5 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))) → ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))
60	59	ex 414	. . . 4 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) → ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
61		ffn 6718	. . . . . . . . 9 ⊢ (𝐹:𝐴⟶𝐵 → 𝐹 Fn 𝐴)
62	61	3ad2ant2 1135	. . . . . . . 8 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → 𝐹 Fn 𝐴)
63		fo1st 7995	. . . . . . . . . . 11 ⊢ 1st :V–onto→V
64		fofn 6808	. . . . . . . . . . 11 ⊢ (1st :V–onto→V → 1st Fn V)
65	63, 64	ax-mp 5	. . . . . . . . . 10 ⊢ 1st Fn V
66		ssv 4007	. . . . . . . . . 10 ⊢ (𝐵 × 𝐶) ⊆ V
67		fnssres 6674	. . . . . . . . . 10 ⊢ ((1st Fn V ∧ (𝐵 × 𝐶) ⊆ V) → (1st ↾ (𝐵 × 𝐶)) Fn (𝐵 × 𝐶))
68	65, 66, 67	mp2an 691	. . . . . . . . 9 ⊢ (1st ↾ (𝐵 × 𝐶)) Fn (𝐵 × 𝐶)
69	17	frnd 6726	. . . . . . . . 9 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ran (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) ⊆ (𝐵 × 𝐶))
70		fnco 6668	. . . . . . . . 9 ⊢ (((1st ↾ (𝐵 × 𝐶)) Fn (𝐵 × 𝐶) ∧ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) Fn 𝐴 ∧ ran (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) ⊆ (𝐵 × 𝐶)) → ((1st ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) Fn 𝐴)
71	68, 18, 69, 70	mp3an2i 1467	. . . . . . . 8 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ((1st ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) Fn 𝐴)
72		fvco3 6991	. . . . . . . . . 10 ⊢ (((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩):𝐴⟶(𝐵 × 𝐶) ∧ 𝑧 ∈ 𝐴) → (((1st ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))‘𝑧) = ((1st ↾ (𝐵 × 𝐶))‘((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧)))
73	17, 72	sylan 581	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → (((1st ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))‘𝑧) = ((1st ↾ (𝐵 × 𝐶))‘((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧)))
74	56	adantl 483	. . . . . . . . . 10 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧) = ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩)
75	74	fveq2d 6896	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ((1st ↾ (𝐵 × 𝐶))‘((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧)) = ((1st ↾ (𝐵 × 𝐶))‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩))
76		ffvelcdm 7084	. . . . . . . . . . . . . 14 ⊢ ((𝐹:𝐴⟶𝐵 ∧ 𝑧 ∈ 𝐴) → (𝐹‘𝑧) ∈ 𝐵)
77		ffvelcdm 7084	. . . . . . . . . . . . . 14 ⊢ ((𝐺:𝐴⟶𝐶 ∧ 𝑧 ∈ 𝐴) → (𝐺‘𝑧) ∈ 𝐶)
78		opelxpi 5714	. . . . . . . . . . . . . 14 ⊢ (((𝐹‘𝑧) ∈ 𝐵 ∧ (𝐺‘𝑧) ∈ 𝐶) → ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩ ∈ (𝐵 × 𝐶))
79	76, 77, 78	syl2an 597	. . . . . . . . . . . . 13 ⊢ (((𝐹:𝐴⟶𝐵 ∧ 𝑧 ∈ 𝐴) ∧ (𝐺:𝐴⟶𝐶 ∧ 𝑧 ∈ 𝐴)) → ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩ ∈ (𝐵 × 𝐶))
80	79	anandirs 678	. . . . . . . . . . . 12 ⊢ (((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩ ∈ (𝐵 × 𝐶))
81	80	3adantl1 1167	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩ ∈ (𝐵 × 𝐶))
82	81	fvresd 6912	. . . . . . . . . 10 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ((1st ↾ (𝐵 × 𝐶))‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩) = (1st ‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩))
83		fvex 6905	. . . . . . . . . . 11 ⊢ (𝐹‘𝑧) ∈ V
84		fvex 6905	. . . . . . . . . . 11 ⊢ (𝐺‘𝑧) ∈ V
85	83, 84	op1st 7983	. . . . . . . . . 10 ⊢ (1st ‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩) = (𝐹‘𝑧)
86	82, 85	eqtrdi 2789	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ((1st ↾ (𝐵 × 𝐶))‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩) = (𝐹‘𝑧))
87	73, 75, 86	3eqtrrd 2778	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → (𝐹‘𝑧) = (((1st ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))‘𝑧))
88	62, 71, 87	eqfnfvd 7036	. . . . . . 7 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → 𝐹 = ((1st ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
89	26	coeq1i 5860	. . . . . . 7 ⊢ (𝑃 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) = ((1st ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))
90	88, 89	eqtr4di 2791	. . . . . 6 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → 𝐹 = (𝑃 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
91		ffn 6718	. . . . . . . . 9 ⊢ (𝐺:𝐴⟶𝐶 → 𝐺 Fn 𝐴)
92	91	3ad2ant3 1136	. . . . . . . 8 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → 𝐺 Fn 𝐴)
93		fo2nd 7996	. . . . . . . . . . 11 ⊢ 2nd :V–onto→V
94		fofn 6808	. . . . . . . . . . 11 ⊢ (2nd :V–onto→V → 2nd Fn V)
95	93, 94	ax-mp 5	. . . . . . . . . 10 ⊢ 2nd Fn V
96		fnssres 6674	. . . . . . . . . 10 ⊢ ((2nd Fn V ∧ (𝐵 × 𝐶) ⊆ V) → (2nd ↾ (𝐵 × 𝐶)) Fn (𝐵 × 𝐶))
97	95, 66, 96	mp2an 691	. . . . . . . . 9 ⊢ (2nd ↾ (𝐵 × 𝐶)) Fn (𝐵 × 𝐶)
98		fnco 6668	. . . . . . . . 9 ⊢ (((2nd ↾ (𝐵 × 𝐶)) Fn (𝐵 × 𝐶) ∧ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) Fn 𝐴 ∧ ran (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) ⊆ (𝐵 × 𝐶)) → ((2nd ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) Fn 𝐴)
99	97, 18, 69, 98	mp3an2i 1467	. . . . . . . 8 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ((2nd ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) Fn 𝐴)
100		fvco3 6991	. . . . . . . . . 10 ⊢ (((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩):𝐴⟶(𝐵 × 𝐶) ∧ 𝑧 ∈ 𝐴) → (((2nd ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))‘𝑧) = ((2nd ↾ (𝐵 × 𝐶))‘((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧)))
101	17, 100	sylan 581	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → (((2nd ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))‘𝑧) = ((2nd ↾ (𝐵 × 𝐶))‘((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧)))
102	74	fveq2d 6896	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ((2nd ↾ (𝐵 × 𝐶))‘((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)‘𝑧)) = ((2nd ↾ (𝐵 × 𝐶))‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩))
103	81	fvresd 6912	. . . . . . . . . 10 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ((2nd ↾ (𝐵 × 𝐶))‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩) = (2nd ‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩))
104	83, 84	op2nd 7984	. . . . . . . . . 10 ⊢ (2nd ‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩) = (𝐺‘𝑧)
105	103, 104	eqtrdi 2789	. . . . . . . . 9 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → ((2nd ↾ (𝐵 × 𝐶))‘⟨(𝐹‘𝑧), (𝐺‘𝑧)⟩) = (𝐺‘𝑧))
106	101, 102, 105	3eqtrrd 2778	. . . . . . . 8 ⊢ (((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) ∧ 𝑧 ∈ 𝐴) → (𝐺‘𝑧) = (((2nd ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))‘𝑧))
107	92, 99, 106	eqfnfvd 7036	. . . . . . 7 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → 𝐺 = ((2nd ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
108	40	coeq1i 5860	. . . . . . 7 ⊢ (𝑄 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) = ((2nd ↾ (𝐵 × 𝐶)) ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))
109	107, 108	eqtr4di 2791	. . . . . 6 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → 𝐺 = (𝑄 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
110	17, 90, 109	3jca 1129	. . . . 5 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩):𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) ∧ 𝐺 = (𝑄 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))))
111		feq1 6699	. . . . . 6 ⊢ (ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) → (ℎ:𝐴⟶(𝐵 × 𝐶) ↔ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩):𝐴⟶(𝐵 × 𝐶)))
112		coeq2 5859	. . . . . . 7 ⊢ (ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) → (𝑃 ∘ ℎ) = (𝑃 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
113	112	eqeq2d 2744	. . . . . 6 ⊢ (ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) → (𝐹 = (𝑃 ∘ ℎ) ↔ 𝐹 = (𝑃 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))))
114		coeq2 5859	. . . . . . 7 ⊢ (ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) → (𝑄 ∘ ℎ) = (𝑄 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
115	114	eqeq2d 2744	. . . . . 6 ⊢ (ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) → (𝐺 = (𝑄 ∘ ℎ) ↔ 𝐺 = (𝑄 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩))))
116	111, 113, 115	3anbi123d 1437	. . . . 5 ⊢ (ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) → ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) ↔ ((𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩):𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)) ∧ 𝐺 = (𝑄 ∘ (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))))
117	110, 116	syl5ibrcom 246	. . . 4 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → (ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩) → (ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ))))
118	60, 117	impbid 211	. . 3 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ((ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) ↔ ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
119	118	eubidv 2581	. 2 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → (∃!ℎ(ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)) ↔ ∃!ℎ ℎ = (𝑥 ∈ 𝐴 ↦ ⟨(𝐹‘𝑥), (𝐺‘𝑥)⟩)))
120	4, 119	mpbird 257	1 ⊢ ((𝐴 ∈ 𝐷 ∧ 𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐴⟶𝐶) → ∃!ℎ(ℎ:𝐴⟶(𝐵 × 𝐶) ∧ 𝐹 = (𝑃 ∘ ℎ) ∧ 𝐺 = (𝑄 ∘ ℎ)))

Syntax hints:   → wi 4   ∧ wa 397   ∧ w3a 1088   = wceq 1542   ∈ wcel 2107  ∃!weu 2563  ∀wral 3062  Vcvv 3475   ⊆ wss 3949  ⟨cop 4635   ↦ cmpt 5232   × cxp 5675  ran crn 5678   ↾ cres 5679   ∘ ccom 5681   Fn wfn 6539  ⟶wf 6540  –onto→wfo 6542  ‘cfv 6544  1^st c1st 7973  2^nd c2nd 7974

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5286  ax-sep 5300  ax-nul 5307  ax-pr 5428  ax-un 7725

This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-ral 3063  df-rex 3072  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3779  df-csb 3895  df-dif 3952  df-un 3954  df-in 3956  df-ss 3966  df-nul 4324  df-if 4530  df-sn 4630  df-pr 4632  df-op 4636  df-uni 4910  df-iun 5000  df-br 5150  df-opab 5212  df-mpt 5233  df-id 5575  df-xp 5683  df-rel 5684  df-cnv 5685  df-co 5686  df-dm 5687  df-rn 5688  df-res 5689  df-ima 5690  df-iota 6496  df-fun 6546  df-fn 6547  df-f 6548  df-f1 6549  df-fo 6550  df-f1o 6551  df-fv 6552  df-1st 7975  df-2nd 7976

This theorem is referenced by:  uptx  23129  txcn  23130