Theorem brimg 34898

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 34827	. . 3 ⊢ Img = (Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)
2	1	breqi 5154	. 2 ⊢ (⟨𝐴, 𝐵⟩Img𝐶 ↔ ⟨𝐴, 𝐵⟩(Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)𝐶)
3		opex 5464	. . . 4 ⊢ ⟨𝐴, 𝐵⟩ ∈ V
4		brimg.3	. . . 4 ⊢ 𝐶 ∈ V
5	3, 4	brco 5869	. . 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 3479	. . . . . 6 ⊢ 𝑎 ∈ V
9	6, 7, 8	brcart 34893	. . . . 5 ⊢ (⟨𝐴, 𝐵⟩Cart𝑎 ↔ 𝑎 = (𝐴 × 𝐵))
10	9	anbi1i 625	. . . 4 ⊢ ((⟨𝐴, 𝐵⟩Cart𝑎 ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶) ↔ (𝑎 = (𝐴 × 𝐵) ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
11	10	exbii 1851	. . 3 ⊢ (∃𝑎(⟨𝐴, 𝐵⟩Cart𝑎 ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶) ↔ ∃𝑎(𝑎 = (𝐴 × 𝐵) ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
12	6, 7	xpex 7737	. . . 4 ⊢ (𝐴 × 𝐵) ∈ V
13		breq1 5151	. . . 4 ⊢ (𝑎 = (𝐴 × 𝐵) → (𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶 ↔ (𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
14	12, 13	ceqsexv 3526	. . 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 34887	. . 3 ⊢ ((𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶 ↔ 𝐶 = (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)))
17		19.42v 1958	. . . . . . . 8 ⊢ (∃𝑎(𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)) ↔ (𝑏 ∈ 𝐵 ∧ ∃𝑎(𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
18		anass 470	. . . . . . . . . . 11 ⊢ (((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑝 = ⟨𝑎, 𝑏⟩ ∧ ((𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
19		an21 643	. . . . . . . . . . . 12 ⊢ (((𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
20	19	anbi2i 624	. . . . . . . . . . 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 1852	. . . . . . . . 9 ⊢ (∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑝∃𝑎(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
23		excom 2163	. . . . . . . . 9 ⊢ (∃𝑝∃𝑎(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))) ↔ ∃𝑎∃𝑝(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
24		opex 5464	. . . . . . . . . . 11 ⊢ ⟨𝑎, 𝑏⟩ ∈ V
25		breq1 5151	. . . . . . . . . . . . 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 3526	. . . . . . . . . 10 ⊢ (∃𝑝(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))) ↔ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
29	28	exbii 1851	. . . . . . . . 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 5149	. . . . . . . . . 10 ⊢ (𝑏𝐴𝑥 ↔ ⟨𝑏, 𝑥⟩ ∈ 𝐴)
32		risset 3231	. . . . . . . . . . 11 ⊢ (⟨𝑏, 𝑥⟩ ∈ 𝐴 ↔ ∃𝑎 ∈ 𝐴 𝑎 = ⟨𝑏, 𝑥⟩)
33		vex 3479	. . . . . . . . . . . . . . . 16 ⊢ 𝑏 ∈ V
34	33	brresi 5989	. . . . . . . . . . . . . . 15 ⊢ (𝑎(1st ↾ (V × V))𝑏 ↔ (𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏))
35		df-br 5149	. . . . . . . . . . . . . . 15 ⊢ (𝑎(1st ↾ (V × V))𝑏 ↔ ⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)))
36	34, 35	bitr3i 277	. . . . . . . . . . . . . 14 ⊢ ((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ↔ ⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)))
37	36	anbi1i 625	. . . . . . . . . . . . 13 ⊢ (((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥))
38		elvv 5749	. . . . . . . . . . . . . . 15 ⊢ (𝑎 ∈ (V × V) ↔ ∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩)
39	38	anbi1i 625	. . . . . . . . . . . . . 14 ⊢ ((𝑎 ∈ (V × V) ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
40		anass 470	. . . . . . . . . . . . . 14 ⊢ (((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (𝑎 ∈ (V × V) ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
41		ancom 462	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥)) ↔ ((𝑝 = 𝑏 ∧ 𝑞 = 𝑥) ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
42		breq1 5151	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → (𝑎1st 𝑏 ↔ ⟨𝑝, 𝑞⟩1st 𝑏))
43		opeq1 4873	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → ⟨𝑎, 𝑏⟩ = ⟨⟨𝑝, 𝑞⟩, 𝑏⟩)
44	43	breq1d 5158	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → (⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥))
45	42, 44	anbi12d 632	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → ((𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (⟨𝑝, 𝑞⟩1st 𝑏 ∧ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥)))
46		vex 3479	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑝 ∈ V
47		vex 3479	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑞 ∈ V
48	46, 47	br1steq 34731	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (⟨𝑝, 𝑞⟩1st 𝑏 ↔ 𝑏 = 𝑝)
49		equcom 2022	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑏 = 𝑝 ↔ 𝑝 = 𝑏)
50	48, 49	bitri 275	. . . . . . . . . . . . . . . . . . . 20 ⊢ (⟨𝑝, 𝑞⟩1st 𝑏 ↔ 𝑝 = 𝑏)
51		opex 5464	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩ ∈ V
52		vex 3479	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝑥 ∈ V
53	51, 52	brco 5869	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ∃𝑎(⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ∧ 𝑎2nd 𝑥))
54		opex 5464	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ⟨𝑝, 𝑞⟩ ∈ V
55	54, 33	br1steq 34731	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ↔ 𝑎 = ⟨𝑝, 𝑞⟩)
56	55	anbi1i 625	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ∧ 𝑎2nd 𝑥) ↔ (𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
57	56	exbii 1851	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃𝑎(⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ∧ 𝑎2nd 𝑥) ↔ ∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
58	53, 57	bitri 275	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
59		breq1 5151	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → (𝑎2nd 𝑥 ↔ ⟨𝑝, 𝑞⟩2nd 𝑥))
60	54, 59	ceqsexv 3526	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥) ↔ ⟨𝑝, 𝑞⟩2nd 𝑥)
61	46, 47	br2ndeq 34732	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (⟨𝑝, 𝑞⟩2nd 𝑥 ↔ 𝑥 = 𝑞)
62	60, 61	bitri 275	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥) ↔ 𝑥 = 𝑞)
63		equcom 2022	. . . . . . . . . . . . . . . . . . . . 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 576	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥)))
68		df-3an 1090	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩) ↔ ((𝑝 = 𝑏 ∧ 𝑞 = 𝑥) ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
69	41, 67, 68	3bitr4i 303	. . . . . . . . . . . . . . . 16 ⊢ ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
70	69	2exbii 1852	. . . . . . . . . . . . . . 15 ⊢ (∃𝑝∃𝑞(𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ ∃𝑝∃𝑞(𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
71		19.41vv 1955	. . . . . . . . . . . . . . 15 ⊢ (∃𝑝∃𝑞(𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
72		opeq1 4873	. . . . . . . . . . . . . . . . 17 ⊢ (𝑝 = 𝑏 → ⟨𝑝, 𝑞⟩ = ⟨𝑏, 𝑞⟩)
73	72	eqeq2d 2744	. . . . . . . . . . . . . . . 16 ⊢ (𝑝 = 𝑏 → (𝑎 = ⟨𝑝, 𝑞⟩ ↔ 𝑎 = ⟨𝑏, 𝑞⟩))
74		opeq2 4874	. . . . . . . . . . . . . . . . 17 ⊢ (𝑞 = 𝑥 → ⟨𝑏, 𝑞⟩ = ⟨𝑏, 𝑥⟩)
75	74	eqeq2d 2744	. . . . . . . . . . . . . . . 16 ⊢ (𝑞 = 𝑥 → (𝑎 = ⟨𝑏, 𝑞⟩ ↔ 𝑎 = ⟨𝑏, 𝑥⟩))
76	33, 52, 73, 75	ceqsex2v 3531	. . . . . . . . . . . . . . 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 5989	. . . . . . . . . . . . 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 3095	. . . . . . . . . . 11 ⊢ (∃𝑎 ∈ 𝐴 𝑎 = ⟨𝑏, 𝑥⟩ ↔ ∃𝑎 ∈ 𝐴 ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)
82	32, 81	bitri 275	. . . . . . . . . 10 ⊢ (⟨𝑏, 𝑥⟩ ∈ 𝐴 ↔ ∃𝑎 ∈ 𝐴 ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)
83		df-rex 3072	. . . . . . . . . 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 624	. . . . . . . 8 ⊢ ((𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥) ↔ (𝑏 ∈ 𝐵 ∧ ∃𝑎(𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
86	17, 30, 85	3bitr4ri 304	. . . . . . 7 ⊢ ((𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥) ↔ ∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
87	86	exbii 1851	. . . . . 6 ⊢ (∃𝑏(𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥) ↔ ∃𝑏∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
88	52	elima2 6064	. . . . . 6 ⊢ (𝑥 ∈ (𝐴 “ 𝐵) ↔ ∃𝑏(𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥))
89	52	elima2 6064	. . . . . . 7 ⊢ (𝑥 ∈ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ ∃𝑝(𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
90		elxp 5699	. . . . . . . . . 10 ⊢ (𝑝 ∈ (𝐴 × 𝐵) ↔ ∃𝑎∃𝑏(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)))
91	90	anbi1i 625	. . . . . . . . 9 ⊢ ((𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (∃𝑎∃𝑏(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
92		19.41vv 1955	. . . . . . . . 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 1851	. . . . . . 7 ⊢ (∃𝑝(𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑝∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
95		exrot3 2166	. . . . . . . 8 ⊢ (∃𝑝∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑎∃𝑏∃𝑝((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
96		exrot3 2166	. . . . . . . 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 2730	. . . 4 ⊢ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) = (𝐴 “ 𝐵)
101	100	eqeq2i 2746	. . 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 205   ∧ wa 397   ∧ w3a 1088   = wceq 1542  ∃wex 1782   ∈ wcel 2107  ∃wrex 3071  Vcvv 3475  ⟨cop 4634   class class class wbr 5148   × cxp 5674   ↾ cres 5678   “ cima 5679   ∘ ccom 5680  1^st c1st 7970  2^nd c2nd 7971  Imagecimage 34801  Cartccart 34802  Imgcimg 34803

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-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7722

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-rab 3434  df-v 3477  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-symdif 4242  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-br 5149  df-opab 5211  df-mpt 5232  df-id 5574  df-eprel 5580  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-fo 6547  df-fv 6549  df-1st 7972  df-2nd 7973  df-txp 34815  df-pprod 34816  df-image 34825  df-cart 34826  df-img 34827

This theorem is referenced by:  brapply  34899  dfrdg4  34912