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

Theorem yoniso 17586
Description: If the codomain is recoverable from a hom-set, then the Yoneda embedding is injective on objects, and hence is an isomorphism from 𝐶 into a full subcategory of a presheaf category. (Contributed by Mario Carneiro, 30-Jan-2017.)
Hypotheses
Ref Expression
yoniso.y 𝑌 = (Yon‘𝐶)
yoniso.o 𝑂 = (oppCat‘𝐶)
yoniso.s 𝑆 = (SetCat‘𝑈)
yoniso.d 𝐷 = (CatCat‘𝑉)
yoniso.b 𝐵 = (Base‘𝐷)
yoniso.i 𝐼 = (Iso‘𝐷)
yoniso.q 𝑄 = (𝑂 FuncCat 𝑆)
yoniso.e 𝐸 = (𝑄s ran (1st𝑌))
yoniso.v (𝜑𝑉𝑋)
yoniso.c (𝜑𝐶𝐵)
yoniso.u (𝜑𝑈𝑊)
yoniso.h (𝜑 → ran (Homf𝐶) ⊆ 𝑈)
yoniso.eb (𝜑𝐸𝐵)
yoniso.1 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (𝐹‘(𝑥(Hom ‘𝐶)𝑦)) = 𝑦)
Assertion
Ref Expression
yoniso (𝜑𝑌 ∈ (𝐶𝐼𝐸))
Distinct variable groups:   𝑥,𝑦,𝐶   𝑦,𝐹   𝜑,𝑥,𝑦   𝑥,𝑌,𝑦
Allowed substitution hints:   𝐵(𝑥,𝑦)   𝐷(𝑥,𝑦)   𝑄(𝑥,𝑦)   𝑆(𝑥,𝑦)   𝑈(𝑥,𝑦)   𝐸(𝑥,𝑦)   𝐹(𝑥)   𝐼(𝑥,𝑦)   𝑂(𝑥,𝑦)   𝑉(𝑥,𝑦)   𝑊(𝑥,𝑦)   𝑋(𝑥,𝑦)

Proof of Theorem yoniso
StepHypRef Expression
1 relfunc 17176 . . . 4 Rel (𝐶 Func 𝑄)
2 yoniso.y . . . . 5 𝑌 = (Yon‘𝐶)
3 yoniso.d . . . . . . . 8 𝐷 = (CatCat‘𝑉)
4 yoniso.b . . . . . . . 8 𝐵 = (Base‘𝐷)
5 yoniso.v . . . . . . . 8 (𝜑𝑉𝑋)
63, 4, 5catcbas 17408 . . . . . . 7 (𝜑𝐵 = (𝑉 ∩ Cat))
7 inss2 4130 . . . . . . 7 (𝑉 ∩ Cat) ⊆ Cat
86, 7eqsstrdi 3942 . . . . . 6 (𝜑𝐵 ⊆ Cat)
9 yoniso.c . . . . . 6 (𝜑𝐶𝐵)
108, 9sseldd 3889 . . . . 5 (𝜑𝐶 ∈ Cat)
11 yoniso.o . . . . 5 𝑂 = (oppCat‘𝐶)
12 yoniso.s . . . . 5 𝑆 = (SetCat‘𝑈)
13 yoniso.q . . . . 5 𝑄 = (𝑂 FuncCat 𝑆)
14 yoniso.u . . . . 5 (𝜑𝑈𝑊)
15 yoniso.h . . . . 5 (𝜑 → ran (Homf𝐶) ⊆ 𝑈)
162, 10, 11, 12, 13, 14, 15yoncl 17563 . . . 4 (𝜑𝑌 ∈ (𝐶 Func 𝑄))
17 1st2nd 7735 . . . 4 ((Rel (𝐶 Func 𝑄) ∧ 𝑌 ∈ (𝐶 Func 𝑄)) → 𝑌 = ⟨(1st𝑌), (2nd𝑌)⟩)
181, 16, 17sylancr 591 . . 3 (𝜑𝑌 = ⟨(1st𝑌), (2nd𝑌)⟩)
192, 11, 12, 13, 10, 14, 15yonffth 17585 . . . . 5 (𝜑𝑌 ∈ ((𝐶 Full 𝑄) ∩ (𝐶 Faith 𝑄)))
2018, 19eqeltrrd 2852 . . . 4 (𝜑 → ⟨(1st𝑌), (2nd𝑌)⟩ ∈ ((𝐶 Full 𝑄) ∩ (𝐶 Faith 𝑄)))
21 eqid 2759 . . . . . 6 (Base‘𝐶) = (Base‘𝐶)
22 yoniso.e . . . . . 6 𝐸 = (𝑄s ran (1st𝑌))
2311oppccat 17035 . . . . . . . 8 (𝐶 ∈ Cat → 𝑂 ∈ Cat)
2410, 23syl 17 . . . . . . 7 (𝜑𝑂 ∈ Cat)
2512setccat 17396 . . . . . . . 8 (𝑈𝑊𝑆 ∈ Cat)
2614, 25syl 17 . . . . . . 7 (𝜑𝑆 ∈ Cat)
2713, 24, 26fuccat 17284 . . . . . 6 (𝜑𝑄 ∈ Cat)
28 fvex 6664 . . . . . . . 8 (1st𝑌) ∈ V
2928rnex 7615 . . . . . . 7 ran (1st𝑌) ∈ V
3029a1i 11 . . . . . 6 (𝜑 → ran (1st𝑌) ∈ V)
3113fucbas 17274 . . . . . . . . 9 (𝑂 Func 𝑆) = (Base‘𝑄)
32 1st2ndbr 7738 . . . . . . . . . 10 ((Rel (𝐶 Func 𝑄) ∧ 𝑌 ∈ (𝐶 Func 𝑄)) → (1st𝑌)(𝐶 Func 𝑄)(2nd𝑌))
331, 16, 32sylancr 591 . . . . . . . . 9 (𝜑 → (1st𝑌)(𝐶 Func 𝑄)(2nd𝑌))
3421, 31, 33funcf1 17180 . . . . . . . 8 (𝜑 → (1st𝑌):(Base‘𝐶)⟶(𝑂 Func 𝑆))
3534ffnd 6492 . . . . . . 7 (𝜑 → (1st𝑌) Fn (Base‘𝐶))
36 dffn3 6503 . . . . . . 7 ((1st𝑌) Fn (Base‘𝐶) ↔ (1st𝑌):(Base‘𝐶)⟶ran (1st𝑌))
3735, 36sylib 221 . . . . . 6 (𝜑 → (1st𝑌):(Base‘𝐶)⟶ran (1st𝑌))
3821, 22, 27, 30, 37ffthres2c 17254 . . . . 5 (𝜑 → ((1st𝑌)((𝐶 Full 𝑄) ∩ (𝐶 Faith 𝑄))(2nd𝑌) ↔ (1st𝑌)((𝐶 Full 𝐸) ∩ (𝐶 Faith 𝐸))(2nd𝑌)))
39 df-br 5026 . . . . 5 ((1st𝑌)((𝐶 Full 𝑄) ∩ (𝐶 Faith 𝑄))(2nd𝑌) ↔ ⟨(1st𝑌), (2nd𝑌)⟩ ∈ ((𝐶 Full 𝑄) ∩ (𝐶 Faith 𝑄)))
40 df-br 5026 . . . . 5 ((1st𝑌)((𝐶 Full 𝐸) ∩ (𝐶 Faith 𝐸))(2nd𝑌) ↔ ⟨(1st𝑌), (2nd𝑌)⟩ ∈ ((𝐶 Full 𝐸) ∩ (𝐶 Faith 𝐸)))
4138, 39, 403bitr3g 317 . . . 4 (𝜑 → (⟨(1st𝑌), (2nd𝑌)⟩ ∈ ((𝐶 Full 𝑄) ∩ (𝐶 Faith 𝑄)) ↔ ⟨(1st𝑌), (2nd𝑌)⟩ ∈ ((𝐶 Full 𝐸) ∩ (𝐶 Faith 𝐸))))
4220, 41mpbid 235 . . 3 (𝜑 → ⟨(1st𝑌), (2nd𝑌)⟩ ∈ ((𝐶 Full 𝐸) ∩ (𝐶 Faith 𝐸)))
4318, 42eqeltrd 2851 . 2 (𝜑𝑌 ∈ ((𝐶 Full 𝐸) ∩ (𝐶 Faith 𝐸)))
44 fveq2 6651 . . . . . . . . 9 (((1st𝑌)‘𝑥) = ((1st𝑌)‘𝑦) → (1st ‘((1st𝑌)‘𝑥)) = (1st ‘((1st𝑌)‘𝑦)))
4544fveq1d 6653 . . . . . . . 8 (((1st𝑌)‘𝑥) = ((1st𝑌)‘𝑦) → ((1st ‘((1st𝑌)‘𝑥))‘𝑥) = ((1st ‘((1st𝑌)‘𝑦))‘𝑥))
4645fveq2d 6655 . . . . . . 7 (((1st𝑌)‘𝑥) = ((1st𝑌)‘𝑦) → (𝐹‘((1st ‘((1st𝑌)‘𝑥))‘𝑥)) = (𝐹‘((1st ‘((1st𝑌)‘𝑦))‘𝑥)))
47 simpl 487 . . . . . . . . . 10 ((𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶)) → 𝑥 ∈ (Base‘𝐶))
4847, 47jca 516 . . . . . . . . 9 ((𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶)) → (𝑥 ∈ (Base‘𝐶) ∧ 𝑥 ∈ (Base‘𝐶)))
49 eleq1w 2833 . . . . . . . . . . . . 13 (𝑦 = 𝑥 → (𝑦 ∈ (Base‘𝐶) ↔ 𝑥 ∈ (Base‘𝐶)))
5049anbi2d 632 . . . . . . . . . . . 12 (𝑦 = 𝑥 → ((𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶)) ↔ (𝑥 ∈ (Base‘𝐶) ∧ 𝑥 ∈ (Base‘𝐶))))
5150anbi2d 632 . . . . . . . . . . 11 (𝑦 = 𝑥 → ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) ↔ (𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑥 ∈ (Base‘𝐶)))))
52 2fveq3 6656 . . . . . . . . . . . . . 14 (𝑦 = 𝑥 → (1st ‘((1st𝑌)‘𝑦)) = (1st ‘((1st𝑌)‘𝑥)))
5352fveq1d 6653 . . . . . . . . . . . . 13 (𝑦 = 𝑥 → ((1st ‘((1st𝑌)‘𝑦))‘𝑥) = ((1st ‘((1st𝑌)‘𝑥))‘𝑥))
5453fveq2d 6655 . . . . . . . . . . . 12 (𝑦 = 𝑥 → (𝐹‘((1st ‘((1st𝑌)‘𝑦))‘𝑥)) = (𝐹‘((1st ‘((1st𝑌)‘𝑥))‘𝑥)))
55 id 22 . . . . . . . . . . . 12 (𝑦 = 𝑥𝑦 = 𝑥)
5654, 55eqeq12d 2775 . . . . . . . . . . 11 (𝑦 = 𝑥 → ((𝐹‘((1st ‘((1st𝑌)‘𝑦))‘𝑥)) = 𝑦 ↔ (𝐹‘((1st ‘((1st𝑌)‘𝑥))‘𝑥)) = 𝑥))
5751, 56imbi12d 349 . . . . . . . . . 10 (𝑦 = 𝑥 → (((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (𝐹‘((1st ‘((1st𝑌)‘𝑦))‘𝑥)) = 𝑦) ↔ ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑥 ∈ (Base‘𝐶))) → (𝐹‘((1st ‘((1st𝑌)‘𝑥))‘𝑥)) = 𝑥)))
5810adantr 485 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → 𝐶 ∈ Cat)
59 simprr 773 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → 𝑦 ∈ (Base‘𝐶))
60 eqid 2759 . . . . . . . . . . . . 13 (Hom ‘𝐶) = (Hom ‘𝐶)
61 simprl 771 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → 𝑥 ∈ (Base‘𝐶))
622, 21, 58, 59, 60, 61yon11 17565 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → ((1st ‘((1st𝑌)‘𝑦))‘𝑥) = (𝑥(Hom ‘𝐶)𝑦))
6362fveq2d 6655 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (𝐹‘((1st ‘((1st𝑌)‘𝑦))‘𝑥)) = (𝐹‘(𝑥(Hom ‘𝐶)𝑦)))
64 yoniso.1 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (𝐹‘(𝑥(Hom ‘𝐶)𝑦)) = 𝑦)
6563, 64eqtrd 2794 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (𝐹‘((1st ‘((1st𝑌)‘𝑦))‘𝑥)) = 𝑦)
6657, 65chvarvv 2006 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑥 ∈ (Base‘𝐶))) → (𝐹‘((1st ‘((1st𝑌)‘𝑥))‘𝑥)) = 𝑥)
6748, 66sylan2 596 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (𝐹‘((1st ‘((1st𝑌)‘𝑥))‘𝑥)) = 𝑥)
6867, 65eqeq12d 2775 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → ((𝐹‘((1st ‘((1st𝑌)‘𝑥))‘𝑥)) = (𝐹‘((1st ‘((1st𝑌)‘𝑦))‘𝑥)) ↔ 𝑥 = 𝑦))
6946, 68syl5ib 247 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (((1st𝑌)‘𝑥) = ((1st𝑌)‘𝑦) → 𝑥 = 𝑦))
7069ralrimivva 3118 . . . . 5 (𝜑 → ∀𝑥 ∈ (Base‘𝐶)∀𝑦 ∈ (Base‘𝐶)(((1st𝑌)‘𝑥) = ((1st𝑌)‘𝑦) → 𝑥 = 𝑦))
71 dff13 6998 . . . . 5 ((1st𝑌):(Base‘𝐶)–1-1→(𝑂 Func 𝑆) ↔ ((1st𝑌):(Base‘𝐶)⟶(𝑂 Func 𝑆) ∧ ∀𝑥 ∈ (Base‘𝐶)∀𝑦 ∈ (Base‘𝐶)(((1st𝑌)‘𝑥) = ((1st𝑌)‘𝑦) → 𝑥 = 𝑦)))
7234, 70, 71sylanbrc 587 . . . 4 (𝜑 → (1st𝑌):(Base‘𝐶)–1-1→(𝑂 Func 𝑆))
73 f1f1orn 6606 . . . 4 ((1st𝑌):(Base‘𝐶)–1-1→(𝑂 Func 𝑆) → (1st𝑌):(Base‘𝐶)–1-1-onto→ran (1st𝑌))
7472, 73syl 17 . . 3 (𝜑 → (1st𝑌):(Base‘𝐶)–1-1-onto→ran (1st𝑌))
7534frnd 6498 . . . . 5 (𝜑 → ran (1st𝑌) ⊆ (𝑂 Func 𝑆))
7622, 31ressbas2 16598 . . . . 5 (ran (1st𝑌) ⊆ (𝑂 Func 𝑆) → ran (1st𝑌) = (Base‘𝐸))
7775, 76syl 17 . . . 4 (𝜑 → ran (1st𝑌) = (Base‘𝐸))
7877f1oeq3d 6592 . . 3 (𝜑 → ((1st𝑌):(Base‘𝐶)–1-1-onto→ran (1st𝑌) ↔ (1st𝑌):(Base‘𝐶)–1-1-onto→(Base‘𝐸)))
7974, 78mpbid 235 . 2 (𝜑 → (1st𝑌):(Base‘𝐶)–1-1-onto→(Base‘𝐸))
80 eqid 2759 . . 3 (Base‘𝐸) = (Base‘𝐸)
81 yoniso.eb . . 3 (𝜑𝐸𝐵)
82 yoniso.i . . 3 𝐼 = (Iso‘𝐷)
833, 4, 21, 80, 5, 9, 81, 82catciso 17418 . 2 (𝜑 → (𝑌 ∈ (𝐶𝐼𝐸) ↔ (𝑌 ∈ ((𝐶 Full 𝐸) ∩ (𝐶 Faith 𝐸)) ∧ (1st𝑌):(Base‘𝐶)–1-1-onto→(Base‘𝐸))))
8443, 79, 83mpbir2and 713 1 (𝜑𝑌 ∈ (𝐶𝐼𝐸))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 400   = wceq 1539  wcel 2112  wral 3068  Vcvv 3407  cin 3853  wss 3854  cop 4521   class class class wbr 5025  ran crn 5518  Rel wrel 5522   Fn wfn 6323  wf 6324  1-1wf1 6325  1-1-ontowf1o 6327  cfv 6328  (class class class)co 7143  1st c1st 7684  2nd c2nd 7685  Basecbs 16526  s cress 16527  Hom chom 16619  Catccat 16978  Homf chomf 16980  oppCatcoppc 17024  Isociso 17060   Func cfunc 17168   Full cful 17216   Faith cfth 17217   FuncCat cfuc 17256  SetCatcsetc 17386  CatCatccatc 17405  Yoncyon 17550
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 1912  ax-6 1971  ax-7 2016  ax-8 2114  ax-9 2122  ax-10 2143  ax-11 2159  ax-12 2176  ax-ext 2730  ax-rep 5149  ax-sep 5162  ax-nul 5169  ax-pow 5227  ax-pr 5291  ax-un 7452  ax-cnex 10616  ax-resscn 10617  ax-1cn 10618  ax-icn 10619  ax-addcl 10620  ax-addrcl 10621  ax-mulcl 10622  ax-mulrcl 10623  ax-mulcom 10624  ax-addass 10625  ax-mulass 10626  ax-distr 10627  ax-i2m1 10628  ax-1ne0 10629  ax-1rid 10630  ax-rnegex 10631  ax-rrecex 10632  ax-cnre 10633  ax-pre-lttri 10634  ax-pre-lttrn 10635  ax-pre-ltadd 10636  ax-pre-mulgt0 10637
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 846  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2071  df-mo 2558  df-eu 2589  df-clab 2737  df-cleq 2751  df-clel 2831  df-nfc 2899  df-ne 2950  df-nel 3054  df-ral 3073  df-rex 3074  df-reu 3075  df-rmo 3076  df-rab 3077  df-v 3409  df-sbc 3694  df-csb 3802  df-dif 3857  df-un 3859  df-in 3861  df-ss 3871  df-pss 3873  df-nul 4222  df-if 4414  df-pw 4489  df-sn 4516  df-pr 4518  df-tp 4520  df-op 4522  df-uni 4792  df-int 4832  df-iun 4878  df-br 5026  df-opab 5088  df-mpt 5106  df-tr 5132  df-id 5423  df-eprel 5428  df-po 5436  df-so 5437  df-fr 5476  df-we 5478  df-xp 5523  df-rel 5524  df-cnv 5525  df-co 5526  df-dm 5527  df-rn 5528  df-res 5529  df-ima 5530  df-pred 6119  df-ord 6165  df-on 6166  df-lim 6167  df-suc 6168  df-iota 6287  df-fun 6330  df-fn 6331  df-f 6332  df-f1 6333  df-fo 6334  df-f1o 6335  df-fv 6336  df-riota 7101  df-ov 7146  df-oprab 7147  df-mpo 7148  df-om 7573  df-1st 7686  df-2nd 7687  df-tpos 7895  df-wrecs 7950  df-recs 8011  df-rdg 8049  df-1o 8105  df-oadd 8109  df-er 8292  df-map 8411  df-pm 8412  df-ixp 8473  df-en 8521  df-dom 8522  df-sdom 8523  df-fin 8524  df-pnf 10700  df-mnf 10701  df-xr 10702  df-ltxr 10703  df-le 10704  df-sub 10895  df-neg 10896  df-nn 11660  df-2 11722  df-3 11723  df-4 11724  df-5 11725  df-6 11726  df-7 11727  df-8 11728  df-9 11729  df-n0 11920  df-z 12006  df-dec 12123  df-uz 12268  df-fz 12925  df-struct 16528  df-ndx 16529  df-slot 16530  df-base 16532  df-sets 16533  df-ress 16534  df-hom 16632  df-cco 16633  df-cat 16982  df-cid 16983  df-homf 16984  df-comf 16985  df-oppc 17025  df-sect 17061  df-inv 17062  df-iso 17063  df-ssc 17124  df-resc 17125  df-subc 17126  df-func 17172  df-idfu 17173  df-cofu 17174  df-full 17218  df-fth 17219  df-nat 17257  df-fuc 17258  df-setc 17387  df-catc 17406  df-xpc 17473  df-1stf 17474  df-2ndf 17475  df-prf 17476  df-evlf 17514  df-curf 17515  df-hof 17551  df-yon 17552
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator