MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  xpcomco Structured version   Visualization version   GIF version

Theorem xpcomco 8050
Description: Composition with the bijection of xpcomf1o 8049 swaps the arguments to a mapping. (Contributed by Mario Carneiro, 30-May-2015.)
Hypotheses
Ref Expression
xpcomf1o.1 𝐹 = (𝑥 ∈ (𝐴 × 𝐵) ↦ {𝑥})
xpcomco.1 𝐺 = (𝑦𝐵, 𝑧𝐴𝐶)
Assertion
Ref Expression
xpcomco (𝐺𝐹) = (𝑧𝐴, 𝑦𝐵𝐶)
Distinct variable groups:   𝑥,𝑦,𝑧,𝐴   𝑥,𝐵,𝑦,𝑧   𝑦,𝐹,𝑧
Allowed substitution hints:   𝐶(𝑥,𝑦,𝑧)   𝐹(𝑥)   𝐺(𝑥,𝑦,𝑧)

Proof of Theorem xpcomco
Dummy variables 𝑣 𝑢 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 xpcomf1o.1 . . . . . . . . . 10 𝐹 = (𝑥 ∈ (𝐴 × 𝐵) ↦ {𝑥})
21xpcomf1o 8049 . . . . . . . . 9 𝐹:(𝐴 × 𝐵)–1-1-onto→(𝐵 × 𝐴)
3 f1ofun 6139 . . . . . . . . 9 (𝐹:(𝐴 × 𝐵)–1-1-onto→(𝐵 × 𝐴) → Fun 𝐹)
4 funbrfv2b 6240 . . . . . . . . 9 (Fun 𝐹 → (𝑢𝐹𝑤 ↔ (𝑢 ∈ dom 𝐹 ∧ (𝐹𝑢) = 𝑤)))
52, 3, 4mp2b 10 . . . . . . . 8 (𝑢𝐹𝑤 ↔ (𝑢 ∈ dom 𝐹 ∧ (𝐹𝑢) = 𝑤))
6 ancom 466 . . . . . . . 8 ((𝑢 ∈ dom 𝐹 ∧ (𝐹𝑢) = 𝑤) ↔ ((𝐹𝑢) = 𝑤𝑢 ∈ dom 𝐹))
7 eqcom 2629 . . . . . . . . 9 ((𝐹𝑢) = 𝑤𝑤 = (𝐹𝑢))
8 f1odm 6141 . . . . . . . . . . 11 (𝐹:(𝐴 × 𝐵)–1-1-onto→(𝐵 × 𝐴) → dom 𝐹 = (𝐴 × 𝐵))
92, 8ax-mp 5 . . . . . . . . . 10 dom 𝐹 = (𝐴 × 𝐵)
109eleq2i 2693 . . . . . . . . 9 (𝑢 ∈ dom 𝐹𝑢 ∈ (𝐴 × 𝐵))
117, 10anbi12i 733 . . . . . . . 8 (((𝐹𝑢) = 𝑤𝑢 ∈ dom 𝐹) ↔ (𝑤 = (𝐹𝑢) ∧ 𝑢 ∈ (𝐴 × 𝐵)))
125, 6, 113bitri 286 . . . . . . 7 (𝑢𝐹𝑤 ↔ (𝑤 = (𝐹𝑢) ∧ 𝑢 ∈ (𝐴 × 𝐵)))
1312anbi1i 731 . . . . . 6 ((𝑢𝐹𝑤𝑤𝐺𝑣) ↔ ((𝑤 = (𝐹𝑢) ∧ 𝑢 ∈ (𝐴 × 𝐵)) ∧ 𝑤𝐺𝑣))
14 anass 681 . . . . . 6 (((𝑤 = (𝐹𝑢) ∧ 𝑢 ∈ (𝐴 × 𝐵)) ∧ 𝑤𝐺𝑣) ↔ (𝑤 = (𝐹𝑢) ∧ (𝑢 ∈ (𝐴 × 𝐵) ∧ 𝑤𝐺𝑣)))
1513, 14bitri 264 . . . . 5 ((𝑢𝐹𝑤𝑤𝐺𝑣) ↔ (𝑤 = (𝐹𝑢) ∧ (𝑢 ∈ (𝐴 × 𝐵) ∧ 𝑤𝐺𝑣)))
1615exbii 1774 . . . 4 (∃𝑤(𝑢𝐹𝑤𝑤𝐺𝑣) ↔ ∃𝑤(𝑤 = (𝐹𝑢) ∧ (𝑢 ∈ (𝐴 × 𝐵) ∧ 𝑤𝐺𝑣)))
17 fvex 6201 . . . . 5 (𝐹𝑢) ∈ V
18 breq1 4656 . . . . . 6 (𝑤 = (𝐹𝑢) → (𝑤𝐺𝑣 ↔ (𝐹𝑢)𝐺𝑣))
1918anbi2d 740 . . . . 5 (𝑤 = (𝐹𝑢) → ((𝑢 ∈ (𝐴 × 𝐵) ∧ 𝑤𝐺𝑣) ↔ (𝑢 ∈ (𝐴 × 𝐵) ∧ (𝐹𝑢)𝐺𝑣)))
2017, 19ceqsexv 3242 . . . 4 (∃𝑤(𝑤 = (𝐹𝑢) ∧ (𝑢 ∈ (𝐴 × 𝐵) ∧ 𝑤𝐺𝑣)) ↔ (𝑢 ∈ (𝐴 × 𝐵) ∧ (𝐹𝑢)𝐺𝑣))
21 elxp 5131 . . . . . 6 (𝑢 ∈ (𝐴 × 𝐵) ↔ ∃𝑧𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)))
2221anbi1i 731 . . . . 5 ((𝑢 ∈ (𝐴 × 𝐵) ∧ (𝐹𝑢)𝐺𝑣) ↔ (∃𝑧𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)) ∧ (𝐹𝑢)𝐺𝑣))
23 nfcv 2764 . . . . . . 7 𝑧(𝐹𝑢)
24 xpcomco.1 . . . . . . . 8 𝐺 = (𝑦𝐵, 𝑧𝐴𝐶)
25 nfmpt22 6723 . . . . . . . 8 𝑧(𝑦𝐵, 𝑧𝐴𝐶)
2624, 25nfcxfr 2762 . . . . . . 7 𝑧𝐺
27 nfcv 2764 . . . . . . 7 𝑧𝑣
2823, 26, 27nfbr 4699 . . . . . 6 𝑧(𝐹𝑢)𝐺𝑣
292819.41 2103 . . . . 5 (∃𝑧(∃𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)) ∧ (𝐹𝑢)𝐺𝑣) ↔ (∃𝑧𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)) ∧ (𝐹𝑢)𝐺𝑣))
30 nfcv 2764 . . . . . . . . 9 𝑦(𝐹𝑢)
31 nfmpt21 6722 . . . . . . . . . 10 𝑦(𝑦𝐵, 𝑧𝐴𝐶)
3224, 31nfcxfr 2762 . . . . . . . . 9 𝑦𝐺
33 nfcv 2764 . . . . . . . . 9 𝑦𝑣
3430, 32, 33nfbr 4699 . . . . . . . 8 𝑦(𝐹𝑢)𝐺𝑣
353419.41 2103 . . . . . . 7 (∃𝑦((𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)) ∧ (𝐹𝑢)𝐺𝑣) ↔ (∃𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)) ∧ (𝐹𝑢)𝐺𝑣))
36 anass 681 . . . . . . . . 9 (((𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)) ∧ (𝐹𝑢)𝐺𝑣) ↔ (𝑢 = ⟨𝑧, 𝑦⟩ ∧ ((𝑧𝐴𝑦𝐵) ∧ (𝐹𝑢)𝐺𝑣)))
37 fveq2 6191 . . . . . . . . . . . . . 14 (𝑢 = ⟨𝑧, 𝑦⟩ → (𝐹𝑢) = (𝐹‘⟨𝑧, 𝑦⟩))
38 opelxpi 5148 . . . . . . . . . . . . . . 15 ((𝑧𝐴𝑦𝐵) → ⟨𝑧, 𝑦⟩ ∈ (𝐴 × 𝐵))
39 sneq 4187 . . . . . . . . . . . . . . . . . . 19 (𝑥 = ⟨𝑧, 𝑦⟩ → {𝑥} = {⟨𝑧, 𝑦⟩})
4039cnveqd 5298 . . . . . . . . . . . . . . . . . 18 (𝑥 = ⟨𝑧, 𝑦⟩ → {𝑥} = {⟨𝑧, 𝑦⟩})
4140unieqd 4446 . . . . . . . . . . . . . . . . 17 (𝑥 = ⟨𝑧, 𝑦⟩ → {𝑥} = {⟨𝑧, 𝑦⟩})
42 opswap 5622 . . . . . . . . . . . . . . . . 17 {⟨𝑧, 𝑦⟩} = ⟨𝑦, 𝑧
4341, 42syl6eq 2672 . . . . . . . . . . . . . . . 16 (𝑥 = ⟨𝑧, 𝑦⟩ → {𝑥} = ⟨𝑦, 𝑧⟩)
44 opex 4932 . . . . . . . . . . . . . . . 16 𝑦, 𝑧⟩ ∈ V
4543, 1, 44fvmpt 6282 . . . . . . . . . . . . . . 15 (⟨𝑧, 𝑦⟩ ∈ (𝐴 × 𝐵) → (𝐹‘⟨𝑧, 𝑦⟩) = ⟨𝑦, 𝑧⟩)
4638, 45syl 17 . . . . . . . . . . . . . 14 ((𝑧𝐴𝑦𝐵) → (𝐹‘⟨𝑧, 𝑦⟩) = ⟨𝑦, 𝑧⟩)
4737, 46sylan9eq 2676 . . . . . . . . . . . . 13 ((𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)) → (𝐹𝑢) = ⟨𝑦, 𝑧⟩)
4847breq1d 4663 . . . . . . . . . . . 12 ((𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)) → ((𝐹𝑢)𝐺𝑣 ↔ ⟨𝑦, 𝑧𝐺𝑣))
49 df-br 4654 . . . . . . . . . . . . . . . 16 (⟨𝑦, 𝑧𝐺𝑣 ↔ ⟨⟨𝑦, 𝑧⟩, 𝑣⟩ ∈ 𝐺)
50 df-mpt2 6655 . . . . . . . . . . . . . . . . . 18 (𝑦𝐵, 𝑧𝐴𝐶) = {⟨⟨𝑦, 𝑧⟩, 𝑣⟩ ∣ ((𝑦𝐵𝑧𝐴) ∧ 𝑣 = 𝐶)}
5124, 50eqtri 2644 . . . . . . . . . . . . . . . . 17 𝐺 = {⟨⟨𝑦, 𝑧⟩, 𝑣⟩ ∣ ((𝑦𝐵𝑧𝐴) ∧ 𝑣 = 𝐶)}
5251eleq2i 2693 . . . . . . . . . . . . . . . 16 (⟨⟨𝑦, 𝑧⟩, 𝑣⟩ ∈ 𝐺 ↔ ⟨⟨𝑦, 𝑧⟩, 𝑣⟩ ∈ {⟨⟨𝑦, 𝑧⟩, 𝑣⟩ ∣ ((𝑦𝐵𝑧𝐴) ∧ 𝑣 = 𝐶)})
53 oprabid 6677 . . . . . . . . . . . . . . . 16 (⟨⟨𝑦, 𝑧⟩, 𝑣⟩ ∈ {⟨⟨𝑦, 𝑧⟩, 𝑣⟩ ∣ ((𝑦𝐵𝑧𝐴) ∧ 𝑣 = 𝐶)} ↔ ((𝑦𝐵𝑧𝐴) ∧ 𝑣 = 𝐶))
5449, 52, 533bitri 286 . . . . . . . . . . . . . . 15 (⟨𝑦, 𝑧𝐺𝑣 ↔ ((𝑦𝐵𝑧𝐴) ∧ 𝑣 = 𝐶))
5554baib 944 . . . . . . . . . . . . . 14 ((𝑦𝐵𝑧𝐴) → (⟨𝑦, 𝑧𝐺𝑣𝑣 = 𝐶))
5655ancoms 469 . . . . . . . . . . . . 13 ((𝑧𝐴𝑦𝐵) → (⟨𝑦, 𝑧𝐺𝑣𝑣 = 𝐶))
5756adantl 482 . . . . . . . . . . . 12 ((𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)) → (⟨𝑦, 𝑧𝐺𝑣𝑣 = 𝐶))
5848, 57bitrd 268 . . . . . . . . . . 11 ((𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)) → ((𝐹𝑢)𝐺𝑣𝑣 = 𝐶))
5958pm5.32da 673 . . . . . . . . . 10 (𝑢 = ⟨𝑧, 𝑦⟩ → (((𝑧𝐴𝑦𝐵) ∧ (𝐹𝑢)𝐺𝑣) ↔ ((𝑧𝐴𝑦𝐵) ∧ 𝑣 = 𝐶)))
6059pm5.32i 669 . . . . . . . . 9 ((𝑢 = ⟨𝑧, 𝑦⟩ ∧ ((𝑧𝐴𝑦𝐵) ∧ (𝐹𝑢)𝐺𝑣)) ↔ (𝑢 = ⟨𝑧, 𝑦⟩ ∧ ((𝑧𝐴𝑦𝐵) ∧ 𝑣 = 𝐶)))
6136, 60bitri 264 . . . . . . . 8 (((𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)) ∧ (𝐹𝑢)𝐺𝑣) ↔ (𝑢 = ⟨𝑧, 𝑦⟩ ∧ ((𝑧𝐴𝑦𝐵) ∧ 𝑣 = 𝐶)))
6261exbii 1774 . . . . . . 7 (∃𝑦((𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)) ∧ (𝐹𝑢)𝐺𝑣) ↔ ∃𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ ((𝑧𝐴𝑦𝐵) ∧ 𝑣 = 𝐶)))
6335, 62bitr3i 266 . . . . . 6 ((∃𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)) ∧ (𝐹𝑢)𝐺𝑣) ↔ ∃𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ ((𝑧𝐴𝑦𝐵) ∧ 𝑣 = 𝐶)))
6463exbii 1774 . . . . 5 (∃𝑧(∃𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ (𝑧𝐴𝑦𝐵)) ∧ (𝐹𝑢)𝐺𝑣) ↔ ∃𝑧𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ ((𝑧𝐴𝑦𝐵) ∧ 𝑣 = 𝐶)))
6522, 29, 643bitr2i 288 . . . 4 ((𝑢 ∈ (𝐴 × 𝐵) ∧ (𝐹𝑢)𝐺𝑣) ↔ ∃𝑧𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ ((𝑧𝐴𝑦𝐵) ∧ 𝑣 = 𝐶)))
6616, 20, 653bitri 286 . . 3 (∃𝑤(𝑢𝐹𝑤𝑤𝐺𝑣) ↔ ∃𝑧𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ ((𝑧𝐴𝑦𝐵) ∧ 𝑣 = 𝐶)))
6766opabbii 4717 . 2 {⟨𝑢, 𝑣⟩ ∣ ∃𝑤(𝑢𝐹𝑤𝑤𝐺𝑣)} = {⟨𝑢, 𝑣⟩ ∣ ∃𝑧𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ ((𝑧𝐴𝑦𝐵) ∧ 𝑣 = 𝐶))}
68 df-co 5123 . 2 (𝐺𝐹) = {⟨𝑢, 𝑣⟩ ∣ ∃𝑤(𝑢𝐹𝑤𝑤𝐺𝑣)}
69 df-mpt2 6655 . . 3 (𝑧𝐴, 𝑦𝐵𝐶) = {⟨⟨𝑧, 𝑦⟩, 𝑣⟩ ∣ ((𝑧𝐴𝑦𝐵) ∧ 𝑣 = 𝐶)}
70 dfoprab2 6701 . . 3 {⟨⟨𝑧, 𝑦⟩, 𝑣⟩ ∣ ((𝑧𝐴𝑦𝐵) ∧ 𝑣 = 𝐶)} = {⟨𝑢, 𝑣⟩ ∣ ∃𝑧𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ ((𝑧𝐴𝑦𝐵) ∧ 𝑣 = 𝐶))}
7169, 70eqtri 2644 . 2 (𝑧𝐴, 𝑦𝐵𝐶) = {⟨𝑢, 𝑣⟩ ∣ ∃𝑧𝑦(𝑢 = ⟨𝑧, 𝑦⟩ ∧ ((𝑧𝐴𝑦𝐵) ∧ 𝑣 = 𝐶))}
7267, 68, 713eqtr4i 2654 1 (𝐺𝐹) = (𝑧𝐴, 𝑦𝐵𝐶)
Colors of variables: wff setvar class
Syntax hints:  wb 196  wa 384   = wceq 1483  wex 1704  wcel 1990  {csn 4177  cop 4183   cuni 4436   class class class wbr 4653  {copab 4712  cmpt 4729   × cxp 5112  ccnv 5113  dom cdm 5114  ccom 5118  Fun wfun 5882  1-1-ontowf1o 5887  cfv 5888  {coprab 6651  cmpt2 6652
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-ral 2917  df-rex 2918  df-rab 2921  df-v 3202  df-sbc 3436  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-op 4184  df-uni 4437  df-br 4654  df-opab 4713  df-mpt 4730  df-id 5024  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-oprab 6654  df-mpt2 6655  df-1st 7168  df-2nd 7169
This theorem is referenced by:  omf1o  8063
  Copyright terms: Public domain W3C validator