Theorem brimg 34522

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 34451	. . 3 ⊢ Img = (Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)
2	1	breqi 5111	. 2 ⊢ (⟨𝐴, 𝐵⟩Img𝐶 ↔ ⟨𝐴, 𝐵⟩(Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)𝐶)
3		opex 5421	. . . 4 ⊢ ⟨𝐴, 𝐵⟩ ∈ V
4		brimg.3	. . . 4 ⊢ 𝐶 ∈ V
5	3, 4	brco 5826	. . 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 3449	. . . . . 6 ⊢ 𝑎 ∈ V
9	6, 7, 8	brcart 34517	. . . . 5 ⊢ (⟨𝐴, 𝐵⟩Cart𝑎 ↔ 𝑎 = (𝐴 × 𝐵))
10	9	anbi1i 624	. . . 4 ⊢ ((⟨𝐴, 𝐵⟩Cart𝑎 ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶) ↔ (𝑎 = (𝐴 × 𝐵) ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
11	10	exbii 1850	. . 3 ⊢ (∃𝑎(⟨𝐴, 𝐵⟩Cart𝑎 ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶) ↔ ∃𝑎(𝑎 = (𝐴 × 𝐵) ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
12	6, 7	xpex 7687	. . . 4 ⊢ (𝐴 × 𝐵) ∈ V
13		breq1 5108	. . . 4 ⊢ (𝑎 = (𝐴 × 𝐵) → (𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶 ↔ (𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
14	12, 13	ceqsexv 3494	. . 3 ⊢ (∃𝑎(𝑎 = (𝐴 × 𝐵) ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶) ↔ (𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶)
15	5, 11, 14	3bitri 296	. 2 ⊢ (⟨𝐴, 𝐵⟩(Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)𝐶 ↔ (𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶)
16	12, 4	brimage 34511	. . 3 ⊢ ((𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶 ↔ 𝐶 = (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)))
17		19.42v 1957	. . . . . . . 8 ⊢ (∃𝑎(𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)) ↔ (𝑏 ∈ 𝐵 ∧ ∃𝑎(𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
18		anass 469	. . . . . . . . . . 11 ⊢ (((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑝 = ⟨𝑎, 𝑏⟩ ∧ ((𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
19		an21 642	. . . . . . . . . . . 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 274	. . . . . . . . . 10 ⊢ (((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
22	21	2exbii 1851	. . . . . . . . 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 5421	. . . . . . . . . . 11 ⊢ ⟨𝑎, 𝑏⟩ ∈ V
25		breq1 5108	. . . . . . . . . . . . 13 ⊢ (𝑝 = ⟨𝑎, 𝑏⟩ → (𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥 ↔ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
26	25	anbi2d 629	. . . . . . . . . . . 12 ⊢ (𝑝 = ⟨𝑎, 𝑏⟩ → ((𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
27	26	anbi2d 629	. . . . . . . . . . 11 ⊢ (𝑝 = ⟨𝑎, 𝑏⟩ → ((𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)) ↔ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
28	24, 27	ceqsexv 3494	. . . . . . . . . 10 ⊢ (∃𝑝(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))) ↔ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
29	28	exbii 1850	. . . . . . . . 9 ⊢ (∃𝑎∃𝑝(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))) ↔ ∃𝑎(𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
30	22, 23, 29	3bitri 296	. . . . . . . 8 ⊢ (∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑎(𝑏 ∈ 𝐵 ∧ (𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
31		df-br 5106	. . . . . . . . . 10 ⊢ (𝑏𝐴𝑥 ↔ ⟨𝑏, 𝑥⟩ ∈ 𝐴)
32		risset 3221	. . . . . . . . . . 11 ⊢ (⟨𝑏, 𝑥⟩ ∈ 𝐴 ↔ ∃𝑎 ∈ 𝐴 𝑎 = ⟨𝑏, 𝑥⟩)
33		vex 3449	. . . . . . . . . . . . . . . 16 ⊢ 𝑏 ∈ V
34	33	brresi 5946	. . . . . . . . . . . . . . 15 ⊢ (𝑎(1st ↾ (V × V))𝑏 ↔ (𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏))
35		df-br 5106	. . . . . . . . . . . . . . 15 ⊢ (𝑎(1st ↾ (V × V))𝑏 ↔ ⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)))
36	34, 35	bitr3i 276	. . . . . . . . . . . . . 14 ⊢ ((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ↔ ⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)))
37	36	anbi1i 624	. . . . . . . . . . . . 13 ⊢ (((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥))
38		elvv 5706	. . . . . . . . . . . . . . 15 ⊢ (𝑎 ∈ (V × V) ↔ ∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩)
39	38	anbi1i 624	. . . . . . . . . . . . . 14 ⊢ ((𝑎 ∈ (V × V) ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
40		anass 469	. . . . . . . . . . . . . 14 ⊢ (((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (𝑎 ∈ (V × V) ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
41		ancom 461	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥)) ↔ ((𝑝 = 𝑏 ∧ 𝑞 = 𝑥) ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
42		breq1 5108	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → (𝑎1st 𝑏 ↔ ⟨𝑝, 𝑞⟩1st 𝑏))
43		opeq1 4830	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → ⟨𝑎, 𝑏⟩ = ⟨⟨𝑝, 𝑞⟩, 𝑏⟩)
44	43	breq1d 5115	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → (⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥))
45	42, 44	anbi12d 631	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → ((𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (⟨𝑝, 𝑞⟩1st 𝑏 ∧ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥)))
46		vex 3449	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑝 ∈ V
47		vex 3449	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑞 ∈ V
48	46, 47	br1steq 34345	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (⟨𝑝, 𝑞⟩1st 𝑏 ↔ 𝑏 = 𝑝)
49		equcom 2021	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑏 = 𝑝 ↔ 𝑝 = 𝑏)
50	48, 49	bitri 274	. . . . . . . . . . . . . . . . . . . 20 ⊢ (⟨𝑝, 𝑞⟩1st 𝑏 ↔ 𝑝 = 𝑏)
51		opex 5421	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩ ∈ V
52		vex 3449	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝑥 ∈ V
53	51, 52	brco 5826	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ∃𝑎(⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ∧ 𝑎2nd 𝑥))
54		opex 5421	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ⟨𝑝, 𝑞⟩ ∈ V
55	54, 33	br1steq 34345	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ↔ 𝑎 = ⟨𝑝, 𝑞⟩)
56	55	anbi1i 624	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ∧ 𝑎2nd 𝑥) ↔ (𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
57	56	exbii 1850	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃𝑎(⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎 ∧ 𝑎2nd 𝑥) ↔ ∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
58	53, 57	bitri 274	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
59		breq1 5108	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → (𝑎2nd 𝑥 ↔ ⟨𝑝, 𝑞⟩2nd 𝑥))
60	54, 59	ceqsexv 3494	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥) ↔ ⟨𝑝, 𝑞⟩2nd 𝑥)
61	46, 47	br2ndeq 34346	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (⟨𝑝, 𝑞⟩2nd 𝑥 ↔ 𝑥 = 𝑞)
62	60, 61	bitri 274	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥) ↔ 𝑥 = 𝑞)
63		equcom 2021	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑞 ↔ 𝑞 = 𝑥)
64	58, 62, 63	3bitri 296	. . . . . . . . . . . . . . . . . . . 20 ⊢ (⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ 𝑞 = 𝑥)
65	50, 64	anbi12i 627	. . . . . . . . . . . . . . . . . . 19 ⊢ ((⟨𝑝, 𝑞⟩1st 𝑏 ∧ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥))
66	45, 65	bitrdi 286	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 = ⟨𝑝, 𝑞⟩ → ((𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥)))
67	66	pm5.32i 575	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥)))
68		df-3an 1089	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩) ↔ ((𝑝 = 𝑏 ∧ 𝑞 = 𝑥) ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
69	41, 67, 68	3bitr4i 302	. . . . . . . . . . . . . . . 16 ⊢ ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
70	69	2exbii 1851	. . . . . . . . . . . . . . 15 ⊢ (∃𝑝∃𝑞(𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ ∃𝑝∃𝑞(𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
71		19.41vv 1954	. . . . . . . . . . . . . . 15 ⊢ (∃𝑝∃𝑞(𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
72		opeq1 4830	. . . . . . . . . . . . . . . . 17 ⊢ (𝑝 = 𝑏 → ⟨𝑝, 𝑞⟩ = ⟨𝑏, 𝑞⟩)
73	72	eqeq2d 2747	. . . . . . . . . . . . . . . 16 ⊢ (𝑝 = 𝑏 → (𝑎 = ⟨𝑝, 𝑞⟩ ↔ 𝑎 = ⟨𝑏, 𝑞⟩))
74		opeq2 4831	. . . . . . . . . . . . . . . . 17 ⊢ (𝑞 = 𝑥 → ⟨𝑏, 𝑞⟩ = ⟨𝑏, 𝑥⟩)
75	74	eqeq2d 2747	. . . . . . . . . . . . . . . 16 ⊢ (𝑞 = 𝑥 → (𝑎 = ⟨𝑏, 𝑞⟩ ↔ 𝑎 = ⟨𝑏, 𝑥⟩))
76	33, 52, 73, 75	ceqsex2v 3499	. . . . . . . . . . . . . . 15 ⊢ (∃𝑝∃𝑞(𝑝 = 𝑏 ∧ 𝑞 = 𝑥 ∧ 𝑎 = ⟨𝑝, 𝑞⟩) ↔ 𝑎 = ⟨𝑏, 𝑥⟩)
77	70, 71, 76	3bitr3ri 301	. . . . . . . . . . . . . 14 ⊢ (𝑎 = ⟨𝑏, 𝑥⟩ ↔ (∃𝑝∃𝑞 𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
78	39, 40, 77	3bitr4ri 303	. . . . . . . . . . . . 13 ⊢ (𝑎 = ⟨𝑏, 𝑥⟩ ↔ ((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥))
79	52	brresi 5946	. . . . . . . . . . . . 13 ⊢ (⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥 ↔ (⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥))
80	37, 78, 79	3bitr4i 302	. . . . . . . . . . . 12 ⊢ (𝑎 = ⟨𝑏, 𝑥⟩ ↔ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)
81	80	rexbii 3097	. . . . . . . . . . 11 ⊢ (∃𝑎 ∈ 𝐴 𝑎 = ⟨𝑏, 𝑥⟩ ↔ ∃𝑎 ∈ 𝐴 ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)
82	32, 81	bitri 274	. . . . . . . . . 10 ⊢ (⟨𝑏, 𝑥⟩ ∈ 𝐴 ↔ ∃𝑎 ∈ 𝐴 ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)
83		df-rex 3074	. . . . . . . . . 10 ⊢ (∃𝑎 ∈ 𝐴 ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥 ↔ ∃𝑎(𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
84	31, 82, 83	3bitri 296	. . . . . . . . 9 ⊢ (𝑏𝐴𝑥 ↔ ∃𝑎(𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
85	84	anbi2i 623	. . . . . . . 8 ⊢ ((𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥) ↔ (𝑏 ∈ 𝐵 ∧ ∃𝑎(𝑎 ∈ 𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
86	17, 30, 85	3bitr4ri 303	. . . . . . 7 ⊢ ((𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥) ↔ ∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
87	86	exbii 1850	. . . . . 6 ⊢ (∃𝑏(𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥) ↔ ∃𝑏∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
88	52	elima2 6019	. . . . . 6 ⊢ (𝑥 ∈ (𝐴 “ 𝐵) ↔ ∃𝑏(𝑏 ∈ 𝐵 ∧ 𝑏𝐴𝑥))
89	52	elima2 6019	. . . . . . 7 ⊢ (𝑥 ∈ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ ∃𝑝(𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
90		elxp 5656	. . . . . . . . . 10 ⊢ (𝑝 ∈ (𝐴 × 𝐵) ↔ ∃𝑎∃𝑏(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)))
91	90	anbi1i 624	. . . . . . . . 9 ⊢ ((𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (∃𝑎∃𝑏(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
92		19.41vv 1954	. . . . . . . . 9 ⊢ (∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (∃𝑎∃𝑏(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
93	91, 92	bitr4i 277	. . . . . . . 8 ⊢ ((𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
94	93	exbii 1850	. . . . . . 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 274	. . . . . . 7 ⊢ (∃𝑝∃𝑎∃𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑏∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
98	89, 94, 97	3bitri 296	. . . . . 6 ⊢ (𝑥 ∈ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ ∃𝑏∃𝑝∃𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎 ∈ 𝐴 ∧ 𝑏 ∈ 𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
99	87, 88, 98	3bitr4ri 303	. . . . 5 ⊢ (𝑥 ∈ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ 𝑥 ∈ (𝐴 “ 𝐵))
100	99	eqriv 2733	. . . 4 ⊢ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) = (𝐴 “ 𝐵)
101	100	eqeq2i 2749	. . 3 ⊢ (𝐶 = (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ 𝐶 = (𝐴 “ 𝐵))
102	16, 101	bitri 274	. 2 ⊢ ((𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶 ↔ 𝐶 = (𝐴 “ 𝐵))
103	2, 15, 102	3bitri 296	1 ⊢ (⟨𝐴, 𝐵⟩Img𝐶 ↔ 𝐶 = (𝐴 “ 𝐵))

Syntax hints:   ↔ wb 205   ∧ wa 396   ∧ w3a 1087   = wceq 1541  ∃wex 1781   ∈ wcel 2106  ∃wrex 3073  Vcvv 3445  ⟨cop 4592   class class class wbr 5105   × cxp 5631   ↾ cres 5635   “ cima 5636   ∘ ccom 5637  1^st c1st 7919  2^nd c2nd 7920  Imagecimage 34425  Cartccart 34426  Imgcimg 34427

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-sep 5256  ax-nul 5263  ax-pow 5320  ax-pr 5384  ax-un 7672

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2889  df-ne 2944  df-ral 3065  df-rex 3074  df-rab 3408  df-v 3447  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-symdif 4202  df-nul 4283  df-if 4487  df-pw 4562  df-sn 4587  df-pr 4589  df-op 4593  df-uni 4866  df-br 5106  df-opab 5168  df-mpt 5189  df-id 5531  df-eprel 5537  df-xp 5639  df-rel 5640  df-cnv 5641  df-co 5642  df-dm 5643  df-rn 5644  df-res 5645  df-ima 5646  df-iota 6448  df-fun 6498  df-fn 6499  df-f 6500  df-fo 6502  df-fv 6504  df-1st 7921  df-2nd 7922  df-txp 34439  df-pprod 34440  df-image 34449  df-cart 34450  df-img 34451

This theorem is referenced by:  brapply  34523  dfrdg4  34536