Users' Mathboxes Mathbox for Scott Fenton < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  brimg Structured version   Visualization version   GIF version

Theorem brimg 32350
Description: Binary relation form of the Img function. (Contributed by Scott Fenton, 12-Apr-2014.) (Revised by Mario Carneiro, 19-Apr-2014.)
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.
StepHypRef Expression
1 df-img 32279 . . 3 Img = (Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)
21breqi 4810 . 2 (⟨𝐴, 𝐵⟩Img𝐶 ↔ ⟨𝐴, 𝐵⟩(Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)𝐶)
3 opex 5081 . . . 4 𝐴, 𝐵⟩ ∈ V
4 brimg.3 . . . 4 𝐶 ∈ V
53, 4brco 5448 . . 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 3343 . . . . . 6 𝑎 ∈ V
96, 7, 8brcart 32345 . . . . 5 (⟨𝐴, 𝐵⟩Cart𝑎𝑎 = (𝐴 × 𝐵))
109anbi1i 733 . . . 4 ((⟨𝐴, 𝐵⟩Cart𝑎𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶) ↔ (𝑎 = (𝐴 × 𝐵) ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
1110exbii 1923 . . 3 (∃𝑎(⟨𝐴, 𝐵⟩Cart𝑎𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶) ↔ ∃𝑎(𝑎 = (𝐴 × 𝐵) ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
126, 7xpex 7127 . . . 4 (𝐴 × 𝐵) ∈ V
13 breq1 4807 . . . 4 (𝑎 = (𝐴 × 𝐵) → (𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶 ↔ (𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶))
1412, 13ceqsexv 3382 . . 3 (∃𝑎(𝑎 = (𝐴 × 𝐵) ∧ 𝑎Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶) ↔ (𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶)
155, 11, 143bitri 286 . 2 (⟨𝐴, 𝐵⟩(Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) ∘ Cart)𝐶 ↔ (𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶)
1612, 4brimage 32339 . . 3 ((𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶𝐶 = (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)))
17 19.42v 2030 . . . . . . . 8 (∃𝑎(𝑏𝐵 ∧ (𝑎𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)) ↔ (𝑏𝐵 ∧ ∃𝑎(𝑎𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
18 anass 684 . . . . . . . . . . 11 (((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑝 = ⟨𝑎, 𝑏⟩ ∧ ((𝑎𝐴𝑏𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
19 anass 684 . . . . . . . . . . . . 13 (((𝑎𝐴𝑏𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑎𝐴 ∧ (𝑏𝐵𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
20 an12 873 . . . . . . . . . . . . 13 ((𝑎𝐴 ∧ (𝑏𝐵𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)) ↔ (𝑏𝐵 ∧ (𝑎𝐴𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
2119, 20bitri 264 . . . . . . . . . . . 12 (((𝑎𝐴𝑏𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑏𝐵 ∧ (𝑎𝐴𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
2221anbi2i 732 . . . . . . . . . . 11 ((𝑝 = ⟨𝑎, 𝑏⟩ ∧ ((𝑎𝐴𝑏𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)) ↔ (𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏𝐵 ∧ (𝑎𝐴𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
2318, 22bitri 264 . . . . . . . . . 10 (((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏𝐵 ∧ (𝑎𝐴𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
24232exbii 1924 . . . . . . . . 9 (∃𝑝𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑝𝑎(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏𝐵 ∧ (𝑎𝐴𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
25 excom 2191 . . . . . . . . 9 (∃𝑝𝑎(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏𝐵 ∧ (𝑎𝐴𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))) ↔ ∃𝑎𝑝(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏𝐵 ∧ (𝑎𝐴𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
26 opex 5081 . . . . . . . . . . 11 𝑎, 𝑏⟩ ∈ V
27 breq1 4807 . . . . . . . . . . . . 13 (𝑝 = ⟨𝑎, 𝑏⟩ → (𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥 ↔ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
2827anbi2d 742 . . . . . . . . . . . 12 (𝑝 = ⟨𝑎, 𝑏⟩ → ((𝑎𝐴𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (𝑎𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
2928anbi2d 742 . . . . . . . . . . 11 (𝑝 = ⟨𝑎, 𝑏⟩ → ((𝑏𝐵 ∧ (𝑎𝐴𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)) ↔ (𝑏𝐵 ∧ (𝑎𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))))
3026, 29ceqsexv 3382 . . . . . . . . . 10 (∃𝑝(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏𝐵 ∧ (𝑎𝐴𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))) ↔ (𝑏𝐵 ∧ (𝑎𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
3130exbii 1923 . . . . . . . . 9 (∃𝑎𝑝(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑏𝐵 ∧ (𝑎𝐴𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))) ↔ ∃𝑎(𝑏𝐵 ∧ (𝑎𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
3224, 25, 313bitri 286 . . . . . . . 8 (∃𝑝𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑎(𝑏𝐵 ∧ (𝑎𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
33 df-br 4805 . . . . . . . . . 10 (𝑏𝐴𝑥 ↔ ⟨𝑏, 𝑥⟩ ∈ 𝐴)
34 risset 3200 . . . . . . . . . . 11 (⟨𝑏, 𝑥⟩ ∈ 𝐴 ↔ ∃𝑎𝐴 𝑎 = ⟨𝑏, 𝑥⟩)
35 vex 3343 . . . . . . . . . . . . . . . 16 𝑏 ∈ V
3635brres 5560 . . . . . . . . . . . . . . 15 (𝑎(1st ↾ (V × V))𝑏 ↔ (𝑎1st 𝑏𝑎 ∈ (V × V)))
37 df-br 4805 . . . . . . . . . . . . . . 15 (𝑎(1st ↾ (V × V))𝑏 ↔ ⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)))
38 ancom 465 . . . . . . . . . . . . . . 15 ((𝑎1st 𝑏𝑎 ∈ (V × V)) ↔ (𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏))
3936, 37, 383bitr3ri 291 . . . . . . . . . . . . . 14 ((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ↔ ⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V)))
4039anbi2i 732 . . . . . . . . . . . . 13 ((⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥 ∧ (𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏)) ↔ (⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥 ∧ ⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V))))
41 elvv 5334 . . . . . . . . . . . . . . . 16 (𝑎 ∈ (V × V) ↔ ∃𝑝𝑞 𝑎 = ⟨𝑝, 𝑞⟩)
4241anbi1i 733 . . . . . . . . . . . . . . 15 ((𝑎 ∈ (V × V) ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (∃𝑝𝑞 𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
43 anass 684 . . . . . . . . . . . . . . 15 (((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (𝑎 ∈ (V × V) ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
44 ancom 465 . . . . . . . . . . . . . . . . . 18 ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑝 = 𝑏𝑞 = 𝑥)) ↔ ((𝑝 = 𝑏𝑞 = 𝑥) ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
45 breq1 4807 . . . . . . . . . . . . . . . . . . . . 21 (𝑎 = ⟨𝑝, 𝑞⟩ → (𝑎1st 𝑏 ↔ ⟨𝑝, 𝑞⟩1st 𝑏))
46 opeq1 4553 . . . . . . . . . . . . . . . . . . . . . 22 (𝑎 = ⟨𝑝, 𝑞⟩ → ⟨𝑎, 𝑏⟩ = ⟨⟨𝑝, 𝑞⟩, 𝑏⟩)
4746breq1d 4814 . . . . . . . . . . . . . . . . . . . . 21 (𝑎 = ⟨𝑝, 𝑞⟩ → (⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥))
4845, 47anbi12d 749 . . . . . . . . . . . . . . . . . . . 20 (𝑎 = ⟨𝑝, 𝑞⟩ → ((𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (⟨𝑝, 𝑞⟩1st 𝑏 ∧ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥)))
49 vex 3343 . . . . . . . . . . . . . . . . . . . . . . 23 𝑝 ∈ V
50 vex 3343 . . . . . . . . . . . . . . . . . . . . . . 23 𝑞 ∈ V
5149, 50br1steq 31977 . . . . . . . . . . . . . . . . . . . . . 22 (⟨𝑝, 𝑞⟩1st 𝑏𝑏 = 𝑝)
52 equcom 2100 . . . . . . . . . . . . . . . . . . . . . 22 (𝑏 = 𝑝𝑝 = 𝑏)
5351, 52bitri 264 . . . . . . . . . . . . . . . . . . . . 21 (⟨𝑝, 𝑞⟩1st 𝑏𝑝 = 𝑏)
54 opex 5081 . . . . . . . . . . . . . . . . . . . . . . . 24 ⟨⟨𝑝, 𝑞⟩, 𝑏⟩ ∈ V
55 vex 3343 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑥 ∈ V
5654, 55brco 5448 . . . . . . . . . . . . . . . . . . . . . . 23 (⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ∃𝑎(⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎𝑎2nd 𝑥))
57 opex 5081 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑝, 𝑞⟩ ∈ V
5857, 35br1steq 31977 . . . . . . . . . . . . . . . . . . . . . . . . 25 (⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎𝑎 = ⟨𝑝, 𝑞⟩)
5958anbi1i 733 . . . . . . . . . . . . . . . . . . . . . . . 24 ((⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎𝑎2nd 𝑥) ↔ (𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
6059exbii 1923 . . . . . . . . . . . . . . . . . . . . . . 23 (∃𝑎(⟨⟨𝑝, 𝑞⟩, 𝑏⟩1st 𝑎𝑎2nd 𝑥) ↔ ∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
6156, 60bitri 264 . . . . . . . . . . . . . . . . . . . . . 22 (⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥 ↔ ∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥))
62 breq1 4807 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑎 = ⟨𝑝, 𝑞⟩ → (𝑎2nd 𝑥 ↔ ⟨𝑝, 𝑞⟩2nd 𝑥))
6357, 62ceqsexv 3382 . . . . . . . . . . . . . . . . . . . . . . 23 (∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥) ↔ ⟨𝑝, 𝑞⟩2nd 𝑥)
6449, 50br2ndeq 31978 . . . . . . . . . . . . . . . . . . . . . . 23 (⟨𝑝, 𝑞⟩2nd 𝑥𝑥 = 𝑞)
6563, 64bitri 264 . . . . . . . . . . . . . . . . . . . . . 22 (∃𝑎(𝑎 = ⟨𝑝, 𝑞⟩ ∧ 𝑎2nd 𝑥) ↔ 𝑥 = 𝑞)
66 equcom 2100 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = 𝑞𝑞 = 𝑥)
6761, 65, 663bitri 286 . . . . . . . . . . . . . . . . . . . . 21 (⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥𝑞 = 𝑥)
6853, 67anbi12i 735 . . . . . . . . . . . . . . . . . . . 20 ((⟨𝑝, 𝑞⟩1st 𝑏 ∧ ⟨⟨𝑝, 𝑞⟩, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (𝑝 = 𝑏𝑞 = 𝑥))
6948, 68syl6bb 276 . . . . . . . . . . . . . . . . . . 19 (𝑎 = ⟨𝑝, 𝑞⟩ → ((𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (𝑝 = 𝑏𝑞 = 𝑥)))
7069pm5.32i 672 . . . . . . . . . . . . . . . . . 18 ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑝 = 𝑏𝑞 = 𝑥)))
71 df-3an 1074 . . . . . . . . . . . . . . . . . 18 ((𝑝 = 𝑏𝑞 = 𝑥𝑎 = ⟨𝑝, 𝑞⟩) ↔ ((𝑝 = 𝑏𝑞 = 𝑥) ∧ 𝑎 = ⟨𝑝, 𝑞⟩))
7244, 70, 713bitr4i 292 . . . . . . . . . . . . . . . . 17 ((𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (𝑝 = 𝑏𝑞 = 𝑥𝑎 = ⟨𝑝, 𝑞⟩))
73722exbii 1924 . . . . . . . . . . . . . . . 16 (∃𝑝𝑞(𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ ∃𝑝𝑞(𝑝 = 𝑏𝑞 = 𝑥𝑎 = ⟨𝑝, 𝑞⟩))
74 19.41vv 2027 . . . . . . . . . . . . . . . 16 (∃𝑝𝑞(𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)) ↔ (∃𝑝𝑞 𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
75 opeq1 4553 . . . . . . . . . . . . . . . . . 18 (𝑝 = 𝑏 → ⟨𝑝, 𝑞⟩ = ⟨𝑏, 𝑞⟩)
7675eqeq2d 2770 . . . . . . . . . . . . . . . . 17 (𝑝 = 𝑏 → (𝑎 = ⟨𝑝, 𝑞⟩ ↔ 𝑎 = ⟨𝑏, 𝑞⟩))
77 opeq2 4554 . . . . . . . . . . . . . . . . . 18 (𝑞 = 𝑥 → ⟨𝑏, 𝑞⟩ = ⟨𝑏, 𝑥⟩)
7877eqeq2d 2770 . . . . . . . . . . . . . . . . 17 (𝑞 = 𝑥 → (𝑎 = ⟨𝑏, 𝑞⟩ ↔ 𝑎 = ⟨𝑏, 𝑥⟩))
7935, 55, 76, 78ceqsex2v 3385 . . . . . . . . . . . . . . . 16 (∃𝑝𝑞(𝑝 = 𝑏𝑞 = 𝑥𝑎 = ⟨𝑝, 𝑞⟩) ↔ 𝑎 = ⟨𝑏, 𝑥⟩)
8073, 74, 793bitr3ri 291 . . . . . . . . . . . . . . 15 (𝑎 = ⟨𝑏, 𝑥⟩ ↔ (∃𝑝𝑞 𝑎 = ⟨𝑝, 𝑞⟩ ∧ (𝑎1st 𝑏 ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥)))
8142, 43, 803bitr4ri 293 . . . . . . . . . . . . . 14 (𝑎 = ⟨𝑏, 𝑥⟩ ↔ ((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥))
82 ancom 465 . . . . . . . . . . . . . 14 (((𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏) ∧ ⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥) ↔ (⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥 ∧ (𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏)))
8381, 82bitri 264 . . . . . . . . . . . . 13 (𝑎 = ⟨𝑏, 𝑥⟩ ↔ (⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥 ∧ (𝑎 ∈ (V × V) ∧ 𝑎1st 𝑏)))
8455brres 5560 . . . . . . . . . . . . 13 (⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥 ↔ (⟨𝑎, 𝑏⟩(2nd ∘ 1st )𝑥 ∧ ⟨𝑎, 𝑏⟩ ∈ (1st ↾ (V × V))))
8540, 83, 843bitr4i 292 . . . . . . . . . . . 12 (𝑎 = ⟨𝑏, 𝑥⟩ ↔ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)
8685rexbii 3179 . . . . . . . . . . 11 (∃𝑎𝐴 𝑎 = ⟨𝑏, 𝑥⟩ ↔ ∃𝑎𝐴𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)
8734, 86bitri 264 . . . . . . . . . 10 (⟨𝑏, 𝑥⟩ ∈ 𝐴 ↔ ∃𝑎𝐴𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)
88 df-rex 3056 . . . . . . . . . 10 (∃𝑎𝐴𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥 ↔ ∃𝑎(𝑎𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
8933, 87, 883bitri 286 . . . . . . . . 9 (𝑏𝐴𝑥 ↔ ∃𝑎(𝑎𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
9089anbi2i 732 . . . . . . . 8 ((𝑏𝐵𝑏𝐴𝑥) ↔ (𝑏𝐵 ∧ ∃𝑎(𝑎𝐴 ∧ ⟨𝑎, 𝑏⟩((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥)))
9117, 32, 903bitr4ri 293 . . . . . . 7 ((𝑏𝐵𝑏𝐴𝑥) ↔ ∃𝑝𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
9291exbii 1923 . . . . . 6 (∃𝑏(𝑏𝐵𝑏𝐴𝑥) ↔ ∃𝑏𝑝𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
9355elima2 5630 . . . . . 6 (𝑥 ∈ (𝐴𝐵) ↔ ∃𝑏(𝑏𝐵𝑏𝐴𝑥))
9455elima2 5630 . . . . . . 7 (𝑥 ∈ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ ∃𝑝(𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
95 elxp 5288 . . . . . . . . . 10 (𝑝 ∈ (𝐴 × 𝐵) ↔ ∃𝑎𝑏(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)))
9695anbi1i 733 . . . . . . . . 9 ((𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (∃𝑎𝑏(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
97 19.41vv 2027 . . . . . . . . 9 (∃𝑎𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ (∃𝑎𝑏(𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
9896, 97bitr4i 267 . . . . . . . 8 ((𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑎𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
9998exbii 1923 . . . . . . 7 (∃𝑝(𝑝 ∈ (𝐴 × 𝐵) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑝𝑎𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
100 exrot3 2194 . . . . . . . 8 (∃𝑝𝑎𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑎𝑏𝑝((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
101 exrot3 2194 . . . . . . . 8 (∃𝑎𝑏𝑝((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑏𝑝𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
102100, 101bitri 264 . . . . . . 7 (∃𝑝𝑎𝑏((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥) ↔ ∃𝑏𝑝𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
10394, 99, 1023bitri 286 . . . . . 6 (𝑥 ∈ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ ∃𝑏𝑝𝑎((𝑝 = ⟨𝑎, 𝑏⟩ ∧ (𝑎𝐴𝑏𝐵)) ∧ 𝑝((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝑥))
10492, 93, 1033bitr4ri 293 . . . . 5 (𝑥 ∈ (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ 𝑥 ∈ (𝐴𝐵))
105104eqriv 2757 . . . 4 (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) = (𝐴𝐵)
106105eqeq2i 2772 . . 3 (𝐶 = (((2nd ∘ 1st ) ↾ (1st ↾ (V × V))) “ (𝐴 × 𝐵)) ↔ 𝐶 = (𝐴𝐵))
10716, 106bitri 264 . 2 ((𝐴 × 𝐵)Image((2nd ∘ 1st ) ↾ (1st ↾ (V × V)))𝐶𝐶 = (𝐴𝐵))
1082, 15, 1073bitri 286 1 (⟨𝐴, 𝐵⟩Img𝐶𝐶 = (𝐴𝐵))
Colors of variables: wff setvar class
Syntax hints:  wb 196  wa 383  w3a 1072   = wceq 1632  wex 1853  wcel 2139  wrex 3051  Vcvv 3340  cop 4327   class class class wbr 4804   × cxp 5264  cres 5268  cima 5269  ccom 5270  1st c1st 7331  2nd c2nd 7332  Imagecimage 32253  Cartccart 32254  Imgcimg 32255
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1871  ax-4 1886  ax-5 1988  ax-6 2054  ax-7 2090  ax-8 2141  ax-9 2148  ax-10 2168  ax-11 2183  ax-12 2196  ax-13 2391  ax-ext 2740  ax-sep 4933  ax-nul 4941  ax-pow 4992  ax-pr 5055  ax-un 7114
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3an 1074  df-tru 1635  df-ex 1854  df-nf 1859  df-sb 2047  df-eu 2611  df-mo 2612  df-clab 2747  df-cleq 2753  df-clel 2756  df-nfc 2891  df-ne 2933  df-ral 3055  df-rex 3056  df-rab 3059  df-v 3342  df-sbc 3577  df-dif 3718  df-un 3720  df-in 3722  df-ss 3729  df-symdif 3987  df-nul 4059  df-if 4231  df-pw 4304  df-sn 4322  df-pr 4324  df-op 4328  df-uni 4589  df-br 4805  df-opab 4865  df-mpt 4882  df-id 5174  df-eprel 5179  df-xp 5272  df-rel 5273  df-cnv 5274  df-co 5275  df-dm 5276  df-rn 5277  df-res 5278  df-ima 5279  df-iota 6012  df-fun 6051  df-fn 6052  df-f 6053  df-fo 6055  df-fv 6057  df-1st 7333  df-2nd 7334  df-txp 32267  df-pprod 32268  df-image 32277  df-cart 32278  df-img 32279
This theorem is referenced by:  brapply  32351  dfrdg4  32364
  Copyright terms: Public domain W3C validator