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

Theorem yoniso 18226
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 17804 . . . 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 18043 . . . . . . 7 (𝜑𝐵 = (𝑉 ∩ Cat))
7 inss2 4197 . . . . . . 7 (𝑉 ∩ Cat) ⊆ Cat
86, 7eqsstrdi 3988 . . . . . 6 (𝜑𝐵 ⊆ Cat)
9 yoniso.c . . . . . 6 (𝜑𝐶𝐵)
108, 9sseldd 3944 . . . . 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 18203 . . . 4 (𝜑𝑌 ∈ (𝐶 Func 𝑄))
17 1st2nd 7997 . . . 4 ((Rel (𝐶 Func 𝑄) ∧ 𝑌 ∈ (𝐶 Func 𝑄)) → 𝑌 = ⟨(1st𝑌), (2nd𝑌)⟩)
181, 16, 17sylancr 587 . . 3 (𝜑𝑌 = ⟨(1st𝑌), (2nd𝑌)⟩)
192, 11, 12, 13, 10, 14, 15yonffth 18225 . . . . 5 (𝜑𝑌 ∈ ((𝐶 Full 𝑄) ∩ (𝐶 Faith 𝑄)))
2018, 19eqeltrrd 2829 . . . 4 (𝜑 → ⟨(1st𝑌), (2nd𝑌)⟩ ∈ ((𝐶 Full 𝑄) ∩ (𝐶 Faith 𝑄)))
21 eqid 2729 . . . . . 6 (Base‘𝐶) = (Base‘𝐶)
22 yoniso.e . . . . . 6 𝐸 = (𝑄s ran (1st𝑌))
2311oppccat 17663 . . . . . . . 8 (𝐶 ∈ Cat → 𝑂 ∈ Cat)
2410, 23syl 17 . . . . . . 7 (𝜑𝑂 ∈ Cat)
2512setccat 18027 . . . . . . . 8 (𝑈𝑊𝑆 ∈ Cat)
2614, 25syl 17 . . . . . . 7 (𝜑𝑆 ∈ Cat)
2713, 24, 26fuccat 17915 . . . . . 6 (𝜑𝑄 ∈ Cat)
28 fvex 6853 . . . . . . . 8 (1st𝑌) ∈ V
2928rnex 7866 . . . . . . 7 ran (1st𝑌) ∈ V
3029a1i 11 . . . . . 6 (𝜑 → ran (1st𝑌) ∈ V)
3113fucbas 17905 . . . . . . . . 9 (𝑂 Func 𝑆) = (Base‘𝑄)
32 1st2ndbr 8000 . . . . . . . . . 10 ((Rel (𝐶 Func 𝑄) ∧ 𝑌 ∈ (𝐶 Func 𝑄)) → (1st𝑌)(𝐶 Func 𝑄)(2nd𝑌))
331, 16, 32sylancr 587 . . . . . . . . 9 (𝜑 → (1st𝑌)(𝐶 Func 𝑄)(2nd𝑌))
3421, 31, 33funcf1 17808 . . . . . . . 8 (𝜑 → (1st𝑌):(Base‘𝐶)⟶(𝑂 Func 𝑆))
3534ffnd 6671 . . . . . . 7 (𝜑 → (1st𝑌) Fn (Base‘𝐶))
36 dffn3 6682 . . . . . . 7 ((1st𝑌) Fn (Base‘𝐶) ↔ (1st𝑌):(Base‘𝐶)⟶ran (1st𝑌))
3735, 36sylib 218 . . . . . 6 (𝜑 → (1st𝑌):(Base‘𝐶)⟶ran (1st𝑌))
3821, 22, 27, 30, 37ffthres2c 17884 . . . . 5 (𝜑 → ((1st𝑌)((𝐶 Full 𝑄) ∩ (𝐶 Faith 𝑄))(2nd𝑌) ↔ (1st𝑌)((𝐶 Full 𝐸) ∩ (𝐶 Faith 𝐸))(2nd𝑌)))
39 df-br 5103 . . . . 5 ((1st𝑌)((𝐶 Full 𝑄) ∩ (𝐶 Faith 𝑄))(2nd𝑌) ↔ ⟨(1st𝑌), (2nd𝑌)⟩ ∈ ((𝐶 Full 𝑄) ∩ (𝐶 Faith 𝑄)))
40 df-br 5103 . . . . 5 ((1st𝑌)((𝐶 Full 𝐸) ∩ (𝐶 Faith 𝐸))(2nd𝑌) ↔ ⟨(1st𝑌), (2nd𝑌)⟩ ∈ ((𝐶 Full 𝐸) ∩ (𝐶 Faith 𝐸)))
4138, 39, 403bitr3g 313 . . . 4 (𝜑 → (⟨(1st𝑌), (2nd𝑌)⟩ ∈ ((𝐶 Full 𝑄) ∩ (𝐶 Faith 𝑄)) ↔ ⟨(1st𝑌), (2nd𝑌)⟩ ∈ ((𝐶 Full 𝐸) ∩ (𝐶 Faith 𝐸))))
4220, 41mpbid 232 . . 3 (𝜑 → ⟨(1st𝑌), (2nd𝑌)⟩ ∈ ((𝐶 Full 𝐸) ∩ (𝐶 Faith 𝐸)))
4318, 42eqeltrd 2828 . 2 (𝜑𝑌 ∈ ((𝐶 Full 𝐸) ∩ (𝐶 Faith 𝐸)))
44 fveq2 6840 . . . . . . . . 9 (((1st𝑌)‘𝑥) = ((1st𝑌)‘𝑦) → (1st ‘((1st𝑌)‘𝑥)) = (1st ‘((1st𝑌)‘𝑦)))
4544fveq1d 6842 . . . . . . . 8 (((1st𝑌)‘𝑥) = ((1st𝑌)‘𝑦) → ((1st ‘((1st𝑌)‘𝑥))‘𝑥) = ((1st ‘((1st𝑌)‘𝑦))‘𝑥))
4645fveq2d 6844 . . . . . . 7 (((1st𝑌)‘𝑥) = ((1st𝑌)‘𝑦) → (𝐹‘((1st ‘((1st𝑌)‘𝑥))‘𝑥)) = (𝐹‘((1st ‘((1st𝑌)‘𝑦))‘𝑥)))
47 simpl 482 . . . . . . . . . 10 ((𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶)) → 𝑥 ∈ (Base‘𝐶))
4847, 47jca 511 . . . . . . . . 9 ((𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶)) → (𝑥 ∈ (Base‘𝐶) ∧ 𝑥 ∈ (Base‘𝐶)))
49 eleq1w 2811 . . . . . . . . . . . . 13 (𝑦 = 𝑥 → (𝑦 ∈ (Base‘𝐶) ↔ 𝑥 ∈ (Base‘𝐶)))
5049anbi2d 630 . . . . . . . . . . . 12 (𝑦 = 𝑥 → ((𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶)) ↔ (𝑥 ∈ (Base‘𝐶) ∧ 𝑥 ∈ (Base‘𝐶))))
5150anbi2d 630 . . . . . . . . . . 11 (𝑦 = 𝑥 → ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) ↔ (𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑥 ∈ (Base‘𝐶)))))
52 2fveq3 6845 . . . . . . . . . . . . . 14 (𝑦 = 𝑥 → (1st ‘((1st𝑌)‘𝑦)) = (1st ‘((1st𝑌)‘𝑥)))
5352fveq1d 6842 . . . . . . . . . . . . 13 (𝑦 = 𝑥 → ((1st ‘((1st𝑌)‘𝑦))‘𝑥) = ((1st ‘((1st𝑌)‘𝑥))‘𝑥))
5453fveq2d 6844 . . . . . . . . . . . 12 (𝑦 = 𝑥 → (𝐹‘((1st ‘((1st𝑌)‘𝑦))‘𝑥)) = (𝐹‘((1st ‘((1st𝑌)‘𝑥))‘𝑥)))
55 id 22 . . . . . . . . . . . 12 (𝑦 = 𝑥𝑦 = 𝑥)
5654, 55eqeq12d 2745 . . . . . . . . . . 11 (𝑦 = 𝑥 → ((𝐹‘((1st ‘((1st𝑌)‘𝑦))‘𝑥)) = 𝑦 ↔ (𝐹‘((1st ‘((1st𝑌)‘𝑥))‘𝑥)) = 𝑥))
5751, 56imbi12d 344 . . . . . . . . . 10 (𝑦 = 𝑥 → (((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (𝐹‘((1st ‘((1st𝑌)‘𝑦))‘𝑥)) = 𝑦) ↔ ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑥 ∈ (Base‘𝐶))) → (𝐹‘((1st ‘((1st𝑌)‘𝑥))‘𝑥)) = 𝑥)))
5810adantr 480 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → 𝐶 ∈ Cat)
59 simprr 772 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → 𝑦 ∈ (Base‘𝐶))
60 eqid 2729 . . . . . . . . . . . . 13 (Hom ‘𝐶) = (Hom ‘𝐶)
61 simprl 770 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → 𝑥 ∈ (Base‘𝐶))
622, 21, 58, 59, 60, 61yon11 18205 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → ((1st ‘((1st𝑌)‘𝑦))‘𝑥) = (𝑥(Hom ‘𝐶)𝑦))
6362fveq2d 6844 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (𝐹‘((1st ‘((1st𝑌)‘𝑦))‘𝑥)) = (𝐹‘(𝑥(Hom ‘𝐶)𝑦)))
64 yoniso.1 . . . . . . . . . . 11 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (𝐹‘(𝑥(Hom ‘𝐶)𝑦)) = 𝑦)
6563, 64eqtrd 2764 . . . . . . . . . 10 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (𝐹‘((1st ‘((1st𝑌)‘𝑦))‘𝑥)) = 𝑦)
6657, 65chvarvv 1989 . . . . . . . . 9 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑥 ∈ (Base‘𝐶))) → (𝐹‘((1st ‘((1st𝑌)‘𝑥))‘𝑥)) = 𝑥)
6748, 66sylan2 593 . . . . . . . 8 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (𝐹‘((1st ‘((1st𝑌)‘𝑥))‘𝑥)) = 𝑥)
6867, 65eqeq12d 2745 . . . . . . 7 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → ((𝐹‘((1st ‘((1st𝑌)‘𝑥))‘𝑥)) = (𝐹‘((1st ‘((1st𝑌)‘𝑦))‘𝑥)) ↔ 𝑥 = 𝑦))
6946, 68imbitrid 244 . . . . . 6 ((𝜑 ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (((1st𝑌)‘𝑥) = ((1st𝑌)‘𝑦) → 𝑥 = 𝑦))
7069ralrimivva 3178 . . . . 5 (𝜑 → ∀𝑥 ∈ (Base‘𝐶)∀𝑦 ∈ (Base‘𝐶)(((1st𝑌)‘𝑥) = ((1st𝑌)‘𝑦) → 𝑥 = 𝑦))
71 dff13 7211 . . . . 5 ((1st𝑌):(Base‘𝐶)–1-1→(𝑂 Func 𝑆) ↔ ((1st𝑌):(Base‘𝐶)⟶(𝑂 Func 𝑆) ∧ ∀𝑥 ∈ (Base‘𝐶)∀𝑦 ∈ (Base‘𝐶)(((1st𝑌)‘𝑥) = ((1st𝑌)‘𝑦) → 𝑥 = 𝑦)))
7234, 70, 71sylanbrc 583 . . . 4 (𝜑 → (1st𝑌):(Base‘𝐶)–1-1→(𝑂 Func 𝑆))
73 f1f1orn 6793 . . . 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 6678 . . . . 5 (𝜑 → ran (1st𝑌) ⊆ (𝑂 Func 𝑆))
7622, 31ressbas2 17184 . . . . 5 (ran (1st𝑌) ⊆ (𝑂 Func 𝑆) → ran (1st𝑌) = (Base‘𝐸))
7775, 76syl 17 . . . 4 (𝜑 → ran (1st𝑌) = (Base‘𝐸))
7877f1oeq3d 6779 . . 3 (𝜑 → ((1st𝑌):(Base‘𝐶)–1-1-onto→ran (1st𝑌) ↔ (1st𝑌):(Base‘𝐶)–1-1-onto→(Base‘𝐸)))
7974, 78mpbid 232 . 2 (𝜑 → (1st𝑌):(Base‘𝐶)–1-1-onto→(Base‘𝐸))
80 eqid 2729 . . 3 (Base‘𝐸) = (Base‘𝐸)
81 yoniso.eb . . 3 (𝜑𝐸𝐵)
82 yoniso.i . . 3 𝐼 = (Iso‘𝐷)
833, 4, 21, 80, 5, 9, 81, 82catciso 18053 . 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 395   = wceq 1540  wcel 2109  wral 3044  Vcvv 3444  cin 3910  wss 3911  cop 4591   class class class wbr 5102  ran crn 5632  Rel wrel 5636   Fn wfn 6494  wf 6495  1-1wf1 6496  1-1-ontowf1o 6498  cfv 6499  (class class class)co 7369  1st c1st 7945  2nd c2nd 7946  Basecbs 17155  s cress 17176  Hom chom 17207  Catccat 17605  Homf chomf 17607  oppCatcoppc 17652  Isociso 17688   Func cfunc 17796   Full cful 17846   Faith cfth 17847   FuncCat cfuc 17887  SetCatcsetc 18017  CatCatccatc 18040  Yoncyon 18190
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5229  ax-sep 5246  ax-nul 5256  ax-pow 5315  ax-pr 5382  ax-un 7691  ax-cnex 11100  ax-resscn 11101  ax-1cn 11102  ax-icn 11103  ax-addcl 11104  ax-addrcl 11105  ax-mulcl 11106  ax-mulrcl 11107  ax-mulcom 11108  ax-addass 11109  ax-mulass 11110  ax-distr 11111  ax-i2m1 11112  ax-1ne0 11113  ax-1rid 11114  ax-rnegex 11115  ax-rrecex 11116  ax-cnre 11117  ax-pre-lttri 11118  ax-pre-lttrn 11119  ax-pre-ltadd 11120  ax-pre-mulgt0 11121
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3351  df-reu 3352  df-rab 3403  df-v 3446  df-sbc 3751  df-csb 3860  df-dif 3914  df-un 3916  df-in 3918  df-ss 3928  df-pss 3931  df-nul 4293  df-if 4485  df-pw 4561  df-sn 4586  df-pr 4588  df-tp 4590  df-op 4592  df-uni 4868  df-iun 4953  df-br 5103  df-opab 5165  df-mpt 5184  df-tr 5210  df-id 5526  df-eprel 5531  df-po 5539  df-so 5540  df-fr 5584  df-we 5586  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-pred 6262  df-ord 6323  df-on 6324  df-lim 6325  df-suc 6326  df-iota 6452  df-fun 6501  df-fn 6502  df-f 6503  df-f1 6504  df-fo 6505  df-f1o 6506  df-fv 6507  df-riota 7326  df-ov 7372  df-oprab 7373  df-mpo 7374  df-om 7823  df-1st 7947  df-2nd 7948  df-tpos 8182  df-frecs 8237  df-wrecs 8268  df-recs 8317  df-rdg 8355  df-1o 8411  df-er 8648  df-map 8778  df-pm 8779  df-ixp 8848  df-en 8896  df-dom 8897  df-sdom 8898  df-fin 8899  df-pnf 11186  df-mnf 11187  df-xr 11188  df-ltxr 11189  df-le 11190  df-sub 11383  df-neg 11384  df-nn 12163  df-2 12225  df-3 12226  df-4 12227  df-5 12228  df-6 12229  df-7 12230  df-8 12231  df-9 12232  df-n0 12419  df-z 12506  df-dec 12626  df-uz 12770  df-fz 13445  df-struct 17093  df-sets 17110  df-slot 17128  df-ndx 17140  df-base 17156  df-ress 17177  df-hom 17220  df-cco 17221  df-cat 17609  df-cid 17610  df-homf 17611  df-comf 17612  df-oppc 17653  df-sect 17689  df-inv 17690  df-iso 17691  df-ssc 17752  df-resc 17753  df-subc 17754  df-func 17800  df-idfu 17801  df-cofu 17802  df-full 17848  df-fth 17849  df-nat 17888  df-fuc 17889  df-setc 18018  df-catc 18041  df-xpc 18113  df-1stf 18114  df-2ndf 18115  df-prf 18116  df-evlf 18154  df-curf 18155  df-hof 18191  df-yon 18192
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator