Theorem brimg 35938

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 35867	. . 3 ⊢ Img = (Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)
2	1	breqi 5149	. 2 ⊢ (⟨𝐴, 𝐵⟩Img𝐶 ↔ ⟨𝐴, 𝐵⟩(Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)𝐶)
3		opex 5469	. . . 4 ⊢ ⟨𝐴, 𝐵⟩ ∈ V
4		brimg.3	. . . 4 ⊢ 𝐶 ∈ V
5	3, 4	brco 5881	. . 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 3484	. . . . . 6 ⊢ 𝑎 ∈ V
9	6, 7, 8	brcart 35933	. . . . 5 ⊢ (⟨𝐴, 𝐵⟩Cart𝑎 ↔ 𝑎 = (𝐴 × 𝐵))
10	9	anbi1i 624	. . . 4 ⊢ ((⟨𝐴, 𝐵⟩Cart𝑎 ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶) ↔ (𝑎 = (𝐴 × 𝐵) ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
11	10	exbii 1848	. . 3 ⊢ (∃𝑎(⟨𝐴, 𝐵⟩Cart𝑎 ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶) ↔ ∃𝑎(𝑎 = (𝐴 × 𝐵) ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
12	6, 7	xpex 7773	. . . 4 ⊢ (𝐴 × 𝐵) ∈ V
13		breq1 5146	. . . 4 ⊢ (𝑎 = (𝐴 × 𝐵) → (𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶 ↔ (𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
14	12, 13	ceqsexv 3532	. . 3 ⊢ (∃𝑎(𝑎 = (𝐴 × 𝐵) ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶) ↔ (𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶)
15	5, 11, 14	3bitri 297	. 2 ⊢ (⟨𝐴, 𝐵⟩(Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)𝐶 ↔ (𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶)
16	12, 4	brimage 35927	. . 3 ⊢ ((𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶 ↔ 𝐶 = (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)))
17		19.42v 1953	. . . . . . . 8 ⊢ (∃𝑎(𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)) ↔ (𝑏 ∈ 𝐵 ∧ ∃𝑎(𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
18		anass 468	. . . . . . . . . . 11 ⊢ (((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑝 = ⟨𝑎, 𝑏⟩ ∧ ((𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
19		an21 644	. . . . . . . . . . . 12 ⊢ (((𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
20	19	anbi2i 623	. . . . . . . . . . 11 ⊢ ((𝑝 = ⟨𝑎, 𝑏⟩ ∧ ((𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)) ↔ (𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
21	18, 20	bitri 275	. . . . . . . . . 10 ⊢ (((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
22	21	2exbii 1849	. . . . . . . . 9 ⊢ (∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑝∃𝑎(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
23		excom 2162	. . . . . . . . 9 ⊢ (∃𝑝∃𝑎(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))) ↔ ∃𝑎∃𝑝(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
24		opex 5469	. . . . . . . . . . 11 ⊢ ⟨𝑎, 𝑏⟩ ∈ V
25		breq1 5146	. . . . . . . . . . . . 13 ⊢ (𝑝 = ⟨𝑎, 𝑏⟩ → (𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥 ↔ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
26	25	anbi2d 630	. . . . . . . . . . . 12 ⊢ (𝑝 = ⟨𝑎, 𝑏⟩ → ((𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
27	26	anbi2d 630	. . . . . . . . . . 11 ⊢ (𝑝 = ⟨𝑎, 𝑏⟩ → ((𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)) ↔ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
28	24, 27	ceqsexv 3532	. . . . . . . . . 10 ⊢ (∃𝑝(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))) ↔ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
29	28	exbii 1848	. . . . . . . . 9 ⊢ (∃𝑎∃𝑝(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))) ↔ ∃𝑎(𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
30	22, 23, 29	3bitri 297	. . . . . . . 8 ⊢ (∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑎(𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
31		df-br 5144	. . . . . . . . . 10 ⊢ (𝑏𝐴𝑥 ↔ ⟨𝑏, 𝑥⟩ ∈ 𝐴)
32		risset 3233	. . . . . . . . . . 11 ⊢ (⟨𝑏, 𝑥⟩ ∈ 𝐴 ↔ ∃𝑎 ∈ 𝐴 𝑎 = ⟨𝑏, 𝑥⟩)
33		vex 3484	. . . . . . . . . . . . . . . 16 ⊢ 𝑏 ∈ V
34	33	brresi 6006	. . . . . . . . . . . . . . 15 ⊢ (𝑎(1st ↾ (V × V))𝑏 ↔ (𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏))
35		df-br 5144	. . . . . . . . . . . . . . 15 ⊢ (𝑎(1st ↾ (V × V))𝑏 ↔ ⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)))
36	34, 35	bitr3i 277	. . . . . . . . . . . . . 14 ⊢ ((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ↔ ⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)))
37	36	anbi1i 624	. . . . . . . . . . . . 13 ⊢ (((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥))
38		elvv 5760	. . . . . . . . . . . . . . 15 ⊢ (𝑎 ∈ (V × V) ↔ ∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩)
39	38	anbi1i 624	. . . . . . . . . . . . . 14 ⊢ ((𝑎 ∈ (V × V) ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
40		anass 468	. . . . . . . . . . . . . 14 ⊢ (((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (𝑎 ∈ (V × V) ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
41		ancom 460	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥)) ↔ ((𝑝 = 𝑏 ∧ 𝑞 = 𝑥) ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
42		breq1 5146	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → (𝑎1st 𝑏 ↔ ⟨𝑝, 𝑞⟩1st 𝑏))
43		opeq1 4873	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → ⟨𝑎, 𝑏⟩ = ⟨⟨𝑝, 𝑞⟩, 𝑏⟩)
44	43	breq1d 5153	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → (⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥))
45	42, 44	anbi12d 632	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → ((𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (⟨𝑝, 𝑞⟩1st 𝑏 ∧ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥)))
46		vex 3484	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑝 ∈ V
47		vex 3484	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑞 ∈ V
48	46, 47	br1steq 35771	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (⟨𝑝, 𝑞⟩1st 𝑏 ↔ 𝑏 = 𝑝)
49		equcom 2017	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑏 = 𝑝 ↔ 𝑝 = 𝑏)
50	48, 49	bitri 275	. . . . . . . . . . . . . . . . . . . 20 ⊢ (⟨𝑝, 𝑞⟩1st 𝑏 ↔ 𝑝 = 𝑏)
51		opex 5469	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩ ∈ V
52		vex 3484	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝑥 ∈ V
53	51, 52	brco 5881	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ∃𝑎(⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ∧ 𝑎2nd 𝑥))
54		opex 5469	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ⟨𝑝, 𝑞⟩ ∈ V
55	54, 33	br1steq 35771	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ↔ 𝑎 = ⟨𝑝, 𝑞⟩)
56	55	anbi1i 624	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ∧ 𝑎2nd 𝑥) ↔ (𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
57	56	exbii 1848	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃𝑎(⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ∧ 𝑎2nd 𝑥) ↔ ∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
58	53, 57	bitri 275	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
59		breq1 5146	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → (𝑎2nd 𝑥 ↔ ⟨𝑝, 𝑞⟩2nd 𝑥))
60	54, 59	ceqsexv 3532	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥) ↔ ⟨𝑝, 𝑞⟩2nd 𝑥)
61	46, 47	br2ndeq 35772	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (⟨𝑝, 𝑞⟩2nd 𝑥 ↔ 𝑥 = 𝑞)
62	60, 61	bitri 275	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥) ↔ 𝑥 = 𝑞)
63		equcom 2017	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑞 ↔ 𝑞 = 𝑥)
64	58, 62, 63	3bitri 297	. . . . . . . . . . . . . . . . . . . 20 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ 𝑞 = 𝑥)
65	50, 64	anbi12i 628	. . . . . . . . . . . . . . . . . . 19 ⊢ ((⟨𝑝, 𝑞⟩1st 𝑏 ∧ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥))
66	45, 65	bitrdi 287	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → ((𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥)))
67	66	pm5.32i 574	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥)))
68		df-3an 1089	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩) ↔ ((𝑝 = 𝑏 ∧ 𝑞 = 𝑥) ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
69	41, 67, 68	3bitr4i 303	. . . . . . . . . . . . . . . 16 ⊢ ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
70	69	2exbii 1849	. . . . . . . . . . . . . . 15 ⊢ (∃𝑝∃𝑞(𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ ∃𝑝∃𝑞(𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
71		19.41vv 1950	. . . . . . . . . . . . . . 15 ⊢ (∃𝑝∃𝑞(𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
72		opeq1 4873	. . . . . . . . . . . . . . . . 17 ⊢ (𝑝 = 𝑏 → ⟨𝑝, 𝑞⟩ = ⟨𝑏, 𝑞⟩)
73	72	eqeq2d 2748	. . . . . . . . . . . . . . . 16 ⊢ (𝑝 = 𝑏 → (𝑎 = ⟨𝑝, 𝑞⟩ ↔ 𝑎 = ⟨𝑏, 𝑞⟩))
74		opeq2 4874	. . . . . . . . . . . . . . . . 17 ⊢ (𝑞 = 𝑥 → ⟨𝑏, 𝑞⟩ = ⟨𝑏, 𝑥⟩)
75	74	eqeq2d 2748	. . . . . . . . . . . . . . . 16 ⊢ (𝑞 = 𝑥 → (𝑎 = ⟨𝑏, 𝑞⟩ ↔ 𝑎 = ⟨𝑏, 𝑥⟩))
76	33, 52, 73, 75	ceqsex2v 3536	. . . . . . . . . . . . . . 15 ⊢ (∃𝑝∃𝑞(𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩) ↔ 𝑎 = ⟨𝑏, 𝑥⟩)
77	70, 71, 76	3bitr3ri 302	. . . . . . . . . . . . . 14 ⊢ (𝑎 = ⟨𝑏, 𝑥⟩ ↔ (∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
78	39, 40, 77	3bitr4ri 304	. . . . . . . . . . . . 13 ⊢ (𝑎 = ⟨𝑏, 𝑥⟩ ↔ ((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥))
79	52	brresi 6006	. . . . . . . . . . . . 13 ⊢ (⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥 ↔ (⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥))
80	37, 78, 79	3bitr4i 303	. . . . . . . . . . . 12 ⊢ (𝑎 = ⟨𝑏, 𝑥⟩ ↔ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)
81	80	rexbii 3094	. . . . . . . . . . 11 ⊢ (∃𝑎 ∈ 𝐴 𝑎 = ⟨𝑏, 𝑥⟩ ↔ ∃𝑎 ∈ 𝐴 ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)
82	32, 81	bitri 275	. . . . . . . . . 10 ⊢ (⟨𝑏, 𝑥⟩ ∈ 𝐴 ↔ ∃𝑎 ∈ 𝐴 ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)
83		df-rex 3071	. . . . . . . . . 10 ⊢ (∃𝑎 ∈ 𝐴 ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥 ↔ ∃𝑎(𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
84	31, 82, 83	3bitri 297	. . . . . . . . 9 ⊢ (𝑏𝐴𝑥 ↔ ∃𝑎(𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
85	84	anbi2i 623	. . . . . . . 8 ⊢ ((𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥) ↔ (𝑏 ∈ 𝐵 ∧ ∃𝑎(𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
86	17, 30, 85	3bitr4ri 304	. . . . . . 7 ⊢ ((𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥) ↔ ∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
87	86	exbii 1848	. . . . . 6 ⊢ (∃𝑏(𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥) ↔ ∃𝑏∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
88	52	elima2 6084	. . . . . 6 ⊢ (𝑥 ∈ (𝐴 “ 𝐵) ↔ ∃𝑏(𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥))
89	52	elima2 6084	. . . . . . 7 ⊢ (𝑥 ∈ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ ∃𝑝(𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
90		elxp 5708	. . . . . . . . . 10 ⊢ (𝑝 ∈ (𝐴 × 𝐵) ↔ ∃𝑎∃𝑏(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)))
91	90	anbi1i 624	. . . . . . . . 9 ⊢ ((𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (∃𝑎∃𝑏(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
92		19.41vv 1950	. . . . . . . . 9 ⊢ (∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (∃𝑎∃𝑏(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
93	91, 92	bitr4i 278	. . . . . . . 8 ⊢ ((𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
94	93	exbii 1848	. . . . . . 7 ⊢ (∃𝑝(𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑝∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
95		exrot3 2165	. . . . . . . 8 ⊢ (∃𝑝∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑎∃𝑏∃𝑝((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
96		exrot3 2165	. . . . . . . 8 ⊢ (∃𝑎∃𝑏∃𝑝((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑏∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
97	95, 96	bitri 275	. . . . . . 7 ⊢ (∃𝑝∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑏∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
98	89, 94, 97	3bitri 297	. . . . . 6 ⊢ (𝑥 ∈ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ ∃𝑏∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
99	87, 88, 98	3bitr4ri 304	. . . . 5 ⊢ (𝑥 ∈ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ 𝑥 ∈ (𝐴 “ 𝐵))
100	99	eqriv 2734	. . . 4 ⊢ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) = (𝐴 “ 𝐵)
101	100	eqeq2i 2750	. . 3 ⊢ (𝐶 = (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ 𝐶 = (𝐴 “ 𝐵))
102	16, 101	bitri 275	. 2 ⊢ ((𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶 ↔ 𝐶 = (𝐴 “ 𝐵))
103	2, 15, 102	3bitri 297	1 ⊢ (⟨𝐴, 𝐵⟩Img𝐶 ↔ 𝐶 = (𝐴 “ 𝐵))

Syntax hints:   ↔ wb 206   ∧ wa 395   ∧ w3a 1087   = wceq 1540  ∃wex 1779   ∈ wcel 2108  ∃wrex 3070  Vcvv 3480  ⟨cop 4632   class class class wbr 5143   × cxp 5683   ↾ cres 5687   “ cima 5688   ∘ ccom 5689  1^st c1st 8012  2^nd c2nd 8013  Imagecimage 35841  Cartccart 35842  Imgcimg 35843

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 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2708  ax-sep 5296  ax-nul 5306  ax-pow 5365  ax-pr 5432  ax-un 7755

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2892  df-ne 2941  df-ral 3062  df-rex 3071  df-rab 3437  df-v 3482  df-dif 3954  df-un 3956  df-in 3958  df-ss 3968  df-symdif 4253  df-nul 4334  df-if 4526  df-pw 4602  df-sn 4627  df-pr 4629  df-op 4633  df-uni 4908  df-br 5144  df-opab 5206  df-mpt 5226  df-id 5578  df-eprel 5584  df-xp 5691  df-rel 5692  df-cnv 5693  df-co 5694  df-dm 5695  df-rn 5696  df-res 5697  df-ima 5698  df-iota 6514  df-fun 6563  df-fn 6564  df-f 6565  df-fo 6567  df-fv 6569  df-1st 8014  df-2nd 8015  df-txp 35855  df-pprod 35856  df-image 35865  df-cart 35866  df-img 35867

This theorem is referenced by:  brapply  35939  dfrdg4  35952