Theorem brimg 36699

Description: Binary relation form of the Img function. (Contributed by Scott Fenton, 12-Apr-2014.) (Revised by Mario Carneiro, 19-Apr-2014.) (Proof shortened by Peter Mazsa, 2-Oct-2022.)

Hypotheses

Ref	Expression
brimg.1	⊢ 𝐴 ∈ V
brimg.2	⊢ 𝐵 ∈ V
brimg.3	⊢ 𝐶 ∈ V

Assertion

Ref	Expression
brimg	⊢ (⟨𝐴, 𝐵⟩Img𝐶 ↔ 𝐶 = (𝐴 “ 𝐵))

Proof of Theorem brimg

Dummy variables 𝑎 𝑏 𝑝 𝑞 𝑥 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-img 36628	. . 3 ⊢ Img = (Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)
2	1	breqi 5108	. 2 ⊢ (⟨𝐴, 𝐵⟩Img𝐶 ↔ ⟨𝐴, 𝐵⟩(Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)𝐶)
3		opex 5431	. . . 4 ⊢ ⟨𝐴, 𝐵⟩ ∈ V
4		brimg.3	. . . 4 ⊢ 𝐶 ∈ V
5	3, 4	brco 5847	. . 3 ⊢ (⟨𝐴, 𝐵⟩(Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)𝐶 ↔ ∃𝑎(⟨𝐴, 𝐵⟩Cart𝑎 ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
6		brimg.1	. . . . . 6 ⊢ 𝐴 ∈ V
7		brimg.2	. . . . . 6 ⊢ 𝐵 ∈ V
8		vex 3454	. . . . . 6 ⊢ 𝑎 ∈ V
9	6, 7, 8	brcart 36694	. . . . 5 ⊢ (⟨𝐴, 𝐵⟩Cart𝑎 ↔ 𝑎 = (𝐴 × 𝐵))
10	9	anbi1i 636	. . . 4 ⊢ ((⟨𝐴, 𝐵⟩Cart𝑎 ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶) ↔ (𝑎 = (𝐴 × 𝐵) ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
11	10	exbii 1880	. . 3 ⊢ (∃𝑎(⟨𝐴, 𝐵⟩Cart𝑎 ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶) ↔ ∃𝑎(𝑎 = (𝐴 × 𝐵) ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
12	6, 7	xpex 7767	. . . 4 ⊢ (𝐴 × 𝐵) ∈ V
13		breq1 5105	. . . 4 ⊢ (𝑎 = (𝐴 × 𝐵) → (𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶 ↔ (𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
14	12, 13	ceqsexv 3498	. . 3 ⊢ (∃𝑎(𝑎 = (𝐴 × 𝐵) ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶) ↔ (𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶)
15	5, 11, 14	3bitri 300	. 2 ⊢ (⟨𝐴, 𝐵⟩(Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)𝐶 ↔ (𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶)
16	12, 4	brimage 36688	. . 3 ⊢ ((𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶 ↔ 𝐶 = (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)))
17		19.42v 1985	. . . . . . . 8 ⊢ (∃𝑎(𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)) ↔ (𝑏 ∈ 𝐵 ∧ ∃𝑎(𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
18		anass 474	. . . . . . . . . . 11 ⊢ (((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑝 = ⟨𝑎, 𝑏⟩ ∧ ((𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
19		an21 657	. . . . . . . . . . . 12 ⊢ (((𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
20	19	anbi2i 635	. . . . . . . . . . 11 ⊢ ((𝑝 = ⟨𝑎, 𝑏⟩ ∧ ((𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)) ↔ (𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
21	18, 20	bitri 278	. . . . . . . . . 10 ⊢ (((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
22	21	2exbii 1881	. . . . . . . . 9 ⊢ (∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑝∃𝑎(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
23		excom 2198	. . . . . . . . 9 ⊢ (∃𝑝∃𝑎(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))) ↔ ∃𝑎∃𝑝(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
24		opex 5431	. . . . . . . . . . 11 ⊢ ⟨𝑎, 𝑏⟩ ∈ V
25		breq1 5105	. . . . . . . . . . . . 13 ⊢ (𝑝 = ⟨𝑎, 𝑏⟩ → (𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥 ↔ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
26	25	anbi2d 642	. . . . . . . . . . . 12 ⊢ (𝑝 = ⟨𝑎, 𝑏⟩ → ((𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
27	26	anbi2d 642	. . . . . . . . . . 11 ⊢ (𝑝 = ⟨𝑎, 𝑏⟩ → ((𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)) ↔ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
28	24, 27	ceqsexv 3498	. . . . . . . . . 10 ⊢ (∃𝑝(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))) ↔ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
29	28	exbii 1880	. . . . . . . . 9 ⊢ (∃𝑎∃𝑝(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))) ↔ ∃𝑎(𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
30	22, 23, 29	3bitri 300	. . . . . . . 8 ⊢ (∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑎(𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
31		df-br 5103	. . . . . . . . . 10 ⊢ (𝑏𝐴𝑥 ↔ ⟨𝑏, 𝑥⟩ ∈ 𝐴)
32		risset 3237	. . . . . . . . . . 11 ⊢ (⟨𝑏, 𝑥⟩ ∈ 𝐴 ↔ ∃𝑎 ∈ 𝐴 𝑎 = ⟨𝑏, 𝑥⟩)
33		vex 3454	. . . . . . . . . . . . . . . 16 ⊢ 𝑏 ∈ V
34	33	brresi 5978	. . . . . . . . . . . . . . 15 ⊢ (𝑎(1st ↾ (V × V))𝑏 ↔ (𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏))
35		df-br 5103	. . . . . . . . . . . . . . 15 ⊢ (𝑎(1st ↾ (V × V))𝑏 ↔ ⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)))
36	34, 35	bitr3i 280	. . . . . . . . . . . . . 14 ⊢ ((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ↔ ⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)))
37	36	anbi1i 636	. . . . . . . . . . . . 13 ⊢ (((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥))
38		elvv 5725	. . . . . . . . . . . . . . 15 ⊢ (𝑎 ∈ (V × V) ↔ ∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩)
39	38	anbi1i 636	. . . . . . . . . . . . . 14 ⊢ ((𝑎 ∈ (V × V) ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
40		anass 474	. . . . . . . . . . . . . 14 ⊢ (((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (𝑎 ∈ (V × V) ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
41		ancom 466	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥)) ↔ ((𝑝 = 𝑏 ∧ 𝑞 = 𝑥) ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
42		breq1 5105	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → (𝑎1st 𝑏 ↔ ⟨𝑝, 𝑞⟩1st 𝑏))
43		opeq1 4832	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → ⟨𝑎, 𝑏⟩ = ⟨⟨𝑝, 𝑞⟩, 𝑏⟩)
44	43	breq1d 5112	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → (⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥))
45	42, 44	anbi12d 644	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → ((𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (⟨𝑝, 𝑞⟩1st 𝑏 ∧ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥)))
46		vex 3454	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑝 ∈ V
47		vex 3454	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑞 ∈ V
48	46, 47	br1steq 36535	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (⟨𝑝, 𝑞⟩1st 𝑏 ↔ 𝑏 = 𝑝)
49		equcom 2050	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑏 = 𝑝 ↔ 𝑝 = 𝑏)
50	48, 49	bitri 278	. . . . . . . . . . . . . . . . . . . 20 ⊢ (⟨𝑝, 𝑞⟩1st 𝑏 ↔ 𝑝 = 𝑏)
51		opex 5431	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩ ∈ V
52		vex 3454	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝑥 ∈ V
53	51, 52	brco 5847	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ∃𝑎(⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ∧ 𝑎2nd 𝑥))
54		opex 5431	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ⟨𝑝, 𝑞⟩ ∈ V
55	54, 33	br1steq 36535	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ↔ 𝑎 = ⟨𝑝, 𝑞⟩)
56	55	anbi1i 636	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ∧ 𝑎2nd 𝑥) ↔ (𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
57	56	exbii 1880	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃𝑎(⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ∧ 𝑎2nd 𝑥) ↔ ∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
58	53, 57	bitri 278	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
59		breq1 5105	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → (𝑎2nd 𝑥 ↔ ⟨𝑝, 𝑞⟩2nd 𝑥))
60	54, 59	ceqsexv 3498	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥) ↔ ⟨𝑝, 𝑞⟩2nd 𝑥)
61	46, 47	br2ndeq 36536	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (⟨𝑝, 𝑞⟩2nd 𝑥 ↔ 𝑥 = 𝑞)
62	60, 61	bitri 278	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥) ↔ 𝑥 = 𝑞)
63		equcom 2050	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑞 ↔ 𝑞 = 𝑥)
64	58, 62, 63	3bitri 300	. . . . . . . . . . . . . . . . . . . 20 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ 𝑞 = 𝑥)
65	50, 64	anbi12i 640	. . . . . . . . . . . . . . . . . . 19 ⊢ ((⟨𝑝, 𝑞⟩1st 𝑏 ∧ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥))
66	45, 65	bitrdi 290	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → ((𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥)))
67	66	pm5.32i 585	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥)))
68		df-3an 1105	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩) ↔ ((𝑝 = 𝑏 ∧ 𝑞 = 𝑥) ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
69	41, 67, 68	3bitr4i 306	. . . . . . . . . . . . . . . 16 ⊢ ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
70	69	2exbii 1881	. . . . . . . . . . . . . . 15 ⊢ (∃𝑝∃𝑞(𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ ∃𝑝∃𝑞(𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
71		19.41vv 1982	. . . . . . . . . . . . . . 15 ⊢ (∃𝑝∃𝑞(𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
72		opeq1 4832	. . . . . . . . . . . . . . . . 17 ⊢ (𝑝 = 𝑏 → ⟨𝑝, 𝑞⟩ = ⟨𝑏, 𝑞⟩)
73	72	eqeq2d 2771	. . . . . . . . . . . . . . . 16 ⊢ (𝑝 = 𝑏 → (𝑎 = ⟨𝑝, 𝑞⟩ ↔ 𝑎 = ⟨𝑏, 𝑞⟩))
74		opeq2 4833	. . . . . . . . . . . . . . . . 17 ⊢ (𝑞 = 𝑥 → ⟨𝑏, 𝑞⟩ = ⟨𝑏, 𝑥⟩)
75	74	eqeq2d 2771	. . . . . . . . . . . . . . . 16 ⊢ (𝑞 = 𝑥 → (𝑎 = ⟨𝑏, 𝑞⟩ ↔ 𝑎 = ⟨𝑏, 𝑥⟩))
76	33, 52, 73, 75	ceqsex2v 3501	. . . . . . . . . . . . . . 15 ⊢ (∃𝑝∃𝑞(𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩) ↔ 𝑎 = ⟨𝑏, 𝑥⟩)
77	70, 71, 76	3bitr3ri 305	. . . . . . . . . . . . . 14 ⊢ (𝑎 = ⟨𝑏, 𝑥⟩ ↔ (∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
78	39, 40, 77	3bitr4ri 307	. . . . . . . . . . . . 13 ⊢ (𝑎 = ⟨𝑏, 𝑥⟩ ↔ ((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥))
79	52	brresi 5978	. . . . . . . . . . . . 13 ⊢ (⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥 ↔ (⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥))
80	37, 78, 79	3bitr4i 306	. . . . . . . . . . . 12 ⊢ (𝑎 = ⟨𝑏, 𝑥⟩ ↔ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)
81	80	rexbii 3109	. . . . . . . . . . 11 ⊢ (∃𝑎 ∈ 𝐴 𝑎 = ⟨𝑏, 𝑥⟩ ↔ ∃𝑎 ∈ 𝐴 ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)
82	32, 81	bitri 278	. . . . . . . . . 10 ⊢ (⟨𝑏, 𝑥⟩ ∈ 𝐴 ↔ ∃𝑎 ∈ 𝐴 ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)
83		df-rex 3087	. . . . . . . . . 10 ⊢ (∃𝑎 ∈ 𝐴 ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥 ↔ ∃𝑎(𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
84	31, 82, 83	3bitri 300	. . . . . . . . 9 ⊢ (𝑏𝐴𝑥 ↔ ∃𝑎(𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
85	84	anbi2i 635	. . . . . . . 8 ⊢ ((𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥) ↔ (𝑏 ∈ 𝐵 ∧ ∃𝑎(𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
86	17, 30, 85	3bitr4ri 307	. . . . . . 7 ⊢ ((𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥) ↔ ∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
87	86	exbii 1880	. . . . . 6 ⊢ (∃𝑏(𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥) ↔ ∃𝑏∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
88	52	elima2 6061	. . . . . 6 ⊢ (𝑥 ∈ (𝐴 “ 𝐵) ↔ ∃𝑏(𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥))
89	52	elima2 6061	. . . . . . 7 ⊢ (𝑥 ∈ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ ∃𝑝(𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
90		elxp 5673	. . . . . . . . . 10 ⊢ (𝑝 ∈ (𝐴 × 𝐵) ↔ ∃𝑎∃𝑏(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)))
91	90	anbi1i 636	. . . . . . . . 9 ⊢ ((𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (∃𝑎∃𝑏(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
92		19.41vv 1982	. . . . . . . . 9 ⊢ (∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (∃𝑎∃𝑏(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
93	91, 92	bitr4i 281	. . . . . . . 8 ⊢ ((𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
94	93	exbii 1880	. . . . . . 7 ⊢ (∃𝑝(𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑝∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
95		exrot3 2201	. . . . . . . 8 ⊢ (∃𝑝∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑎∃𝑏∃𝑝((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
96		exrot3 2201	. . . . . . . 8 ⊢ (∃𝑎∃𝑏∃𝑝((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑏∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
97	95, 96	bitri 278	. . . . . . 7 ⊢ (∃𝑝∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑏∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
98	89, 94, 97	3bitri 300	. . . . . 6 ⊢ (𝑥 ∈ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ ∃𝑏∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
99	87, 88, 98	3bitr4ri 307	. . . . 5 ⊢ (𝑥 ∈ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ 𝑥 ∈ (𝐴 “ 𝐵))
100	99	eqriv 2757	. . . 4 ⊢ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) = (𝐴 “ 𝐵)
101	100	eqeq2i 2773	. . 3 ⊢ (𝐶 = (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ 𝐶 = (𝐴 “ 𝐵))
102	16, 101	bitri 278	. 2 ⊢ ((𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶 ↔ 𝐶 = (𝐴 “ 𝐵))
103	2, 15, 102	3bitri 300	1 ⊢ (⟨𝐴, 𝐵⟩Img𝐶 ↔ 𝐶 = (𝐴 “ 𝐵))

This proof depends on syntax axioms:   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1569  ∃wex 1811   ∈ wcel 2144  ∃wrex 3086  Vcvv 3450  ⟨cop 4589   class class class wbr 5102   × cxp 5648   ↾ cres 5652   “ cima 5653   ∘ ccom 5654  1^st c1st 7999  2^nd c2nd 8000  Imagecimage 36602  Cartccart 36603  Imgcimg 36604

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-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7751

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  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-ral 3077  df-rex 3087  df-rab 3413  df-v 3452  df-ss 3896  df-dif 4047  df-in 4091  df-un 4151  df-symdif 4198  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-op 4590  df-uni 4867  df-br 5103  df-opab 5167  df-mpt 5186  df-id 5545  df-eprel 5550  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-fo 6544  df-fv 6546  df-1st 8001  df-2nd 8002  df-txp 36616  df-pprod 36617  df-image 36626  df-cart 36627  df-img 36628

This theorem is used by:  brapply  36700  dfrdg4  36715