equivestrcsetc - Metamath Proof Explorer

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

Theorem equivestrcsetc 18112

Description: The "natural forgetful functor" from the category of extensible structures into the category of sets which sends each extensible structure to its base set is an equivalence. According to definition 3.33 (1) of [Adamek] p. 36, "A functor F : A -> B is called an equivalence provided that it is full, faithful, and isomorphism-dense in the sense that for any B-object B' there exists some A-object A' such that F(A') is isomorphic to B'.". Therefore, the category of sets and the category of extensible structures are equivalent, according to definition 3.33 (2) of [Adamek] p. 36, "Categories A and B are called equivalent provided that there is an equivalence from A to B.". (Contributed by AV, 2-Apr-2020.)

**Hypotheses**
Ref	Expression
funcestrcsetc.e	⊢ 𝐸 = (ExtStrCat‘𝑈)
funcestrcsetc.s	⊢ 𝑆 = (SetCat‘𝑈)
funcestrcsetc.b	⊢ 𝐵 = (Base‘𝐸)
funcestrcsetc.c	⊢ 𝐶 = (Base‘𝑆)
funcestrcsetc.u	⊢ (𝜑 → 𝑈 ∈ WUni)
funcestrcsetc.f	⊢ (𝜑 → 𝐹 = (𝑥 ∈ 𝐵 ↦ (Base‘𝑥)))
funcestrcsetc.g	⊢ (𝜑 → 𝐺 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐵 ↦ ( I ↾ ((Base‘𝑦) ↑_m (Base‘𝑥)))))
equivestrcsetc.i	⊢ (𝜑 → (Base‘ndx) ∈ 𝑈)

**Assertion**
Ref	Expression
equivestrcsetc	⊢ (𝜑 → (𝐹(𝐸 Faith 𝑆)𝐺 ∧ 𝐹(𝐸 Full 𝑆)𝐺 ∧ ∀𝑏 ∈ 𝐶 ∃𝑎 ∈ 𝐵 ∃𝑖 𝑖:𝑏–1-1-onto→(𝐹‘𝑎)))

Distinct variable groups: 𝑥,𝐵 𝜑,𝑥 𝑥,𝐶 𝑦,𝐵,𝑥 𝜑,𝑦 𝑎,𝑏,𝑥,𝑦,𝐵 𝐹,𝑎,𝑏 𝐺,𝑎,𝑏 𝐸,𝑎,𝑏 𝑆,𝑎,𝑏 𝜑,𝑎,𝑏 𝐶,𝑎 𝑖,𝐹,𝑎,𝑏 Allowed substitution hints: 𝜑(𝑖) 𝐵(𝑖) 𝐶(𝑦,𝑖,𝑏) 𝑆(𝑥,𝑦,𝑖) 𝑈(𝑥,𝑦,𝑖,𝑎,𝑏) 𝐸(𝑥,𝑦,𝑖) 𝐹(𝑥,𝑦) 𝐺(𝑥,𝑦,𝑖)

**Proof of Theorem equivestrcsetc**
Step	Hyp	Ref	Expression
1		funcestrcsetc.e	. . 3 ⊢ 𝐸 = (ExtStrCat‘𝑈)
2		funcestrcsetc.s	. . 3 ⊢ 𝑆 = (SetCat‘𝑈)
3		funcestrcsetc.b	. . 3 ⊢ 𝐵 = (Base‘𝐸)
4		funcestrcsetc.c	. . 3 ⊢ 𝐶 = (Base‘𝑆)
5		funcestrcsetc.u	. . 3 ⊢ (𝜑 → 𝑈 ∈ WUni)
6		funcestrcsetc.f	. . 3 ⊢ (𝜑 → 𝐹 = (𝑥 ∈ 𝐵 ↦ (Base‘𝑥)))
7		funcestrcsetc.g	. . 3 ⊢ (𝜑 → 𝐺 = (𝑥 ∈ 𝐵, 𝑦 ∈ 𝐵 ↦ ( I ↾ ((Base‘𝑦) ↑_m (Base‘𝑥)))))
8	1, 2, 3, 4, 5, 6, 7	fthestrcsetc 18110	. 2 ⊢ (𝜑 → 𝐹(𝐸 Faith 𝑆)𝐺)
9	1, 2, 3, 4, 5, 6, 7	fullestrcsetc 18111	. 2 ⊢ (𝜑 → 𝐹(𝐸 Full 𝑆)𝐺)
10	2, 5	setcbas 18039	. . . . . . . . 9 ⊢ (𝜑 → 𝑈 = (Base‘𝑆))
11	4, 10	eqtr4id 2791	. . . . . . . 8 ⊢ (𝜑 → 𝐶 = 𝑈)
12	11	eleq2d 2823	. . . . . . 7 ⊢ (𝜑 → (𝑏 ∈ 𝐶 ↔ 𝑏 ∈ 𝑈))
13		eqid 2737	. . . . . . . . 9 ⊢ {⟨(Base‘ndx), 𝑏⟩} = {⟨(Base‘ndx), 𝑏⟩}
14		equivestrcsetc.i	. . . . . . . . 9 ⊢ (𝜑 → (Base‘ndx) ∈ 𝑈)
15	13, 5, 14	1strwunbndx 17189	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝑈) → {⟨(Base‘ndx), 𝑏⟩} ∈ 𝑈)
16	15	ex 412	. . . . . . 7 ⊢ (𝜑 → (𝑏 ∈ 𝑈 → {⟨(Base‘ndx), 𝑏⟩} ∈ 𝑈))
17	12, 16	sylbid 240	. . . . . 6 ⊢ (𝜑 → (𝑏 ∈ 𝐶 → {⟨(Base‘ndx), 𝑏⟩} ∈ 𝑈))
18	17	imp 406	. . . . 5 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → {⟨(Base‘ndx), 𝑏⟩} ∈ 𝑈)
19	1, 5	estrcbas 18085	. . . . . . 7 ⊢ (𝜑 → 𝑈 = (Base‘𝐸))
20	19	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → 𝑈 = (Base‘𝐸))
21	3, 20	eqtr4id 2791	. . . . 5 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → 𝐵 = 𝑈)
22	18, 21	eleqtrrd 2840	. . . 4 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → {⟨(Base‘ndx), 𝑏⟩} ∈ 𝐵)
23		fveq2 6835	. . . . . . 7 ⊢ (𝑎 = {⟨(Base‘ndx), 𝑏⟩} → (𝐹‘𝑎) = (𝐹‘{⟨(Base‘ndx), 𝑏⟩}))
24	23	f1oeq3d 6772	. . . . . 6 ⊢ (𝑎 = {⟨(Base‘ndx), 𝑏⟩} → (𝑖:𝑏–1-1-onto→(𝐹‘𝑎) ↔ 𝑖:𝑏–1-1-onto→(𝐹‘{⟨(Base‘ndx), 𝑏⟩})))
25	24	exbidv 1923	. . . . 5 ⊢ (𝑎 = {⟨(Base‘ndx), 𝑏⟩} → (∃𝑖 𝑖:𝑏–1-1-onto→(𝐹‘𝑎) ↔ ∃𝑖 𝑖:𝑏–1-1-onto→(𝐹‘{⟨(Base‘ndx), 𝑏⟩})))
26	25	adantl 481	. . . 4 ⊢ (((𝜑 ∧ 𝑏 ∈ 𝐶) ∧ 𝑎 = {⟨(Base‘ndx), 𝑏⟩}) → (∃𝑖 𝑖:𝑏–1-1-onto→(𝐹‘𝑎) ↔ ∃𝑖 𝑖:𝑏–1-1-onto→(𝐹‘{⟨(Base‘ndx), 𝑏⟩})))
27		f1oi 6813	. . . . . 6 ⊢ ( I ↾ 𝑏):𝑏–1-1-onto→𝑏
28	1, 2, 3, 4, 5, 6	funcestrcsetclem1 18100	. . . . . . . . 9 ⊢ ((𝜑 ∧ {⟨(Base‘ndx), 𝑏⟩} ∈ 𝐵) → (𝐹‘{⟨(Base‘ndx), 𝑏⟩}) = (Base‘{⟨(Base‘ndx), 𝑏⟩}))
29	22, 28	syldan 592	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → (𝐹‘{⟨(Base‘ndx), 𝑏⟩}) = (Base‘{⟨(Base‘ndx), 𝑏⟩}))
30	13	1strbas 17188	. . . . . . . . 9 ⊢ (𝑏 ∈ 𝐶 → 𝑏 = (Base‘{⟨(Base‘ndx), 𝑏⟩}))
31	30	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → 𝑏 = (Base‘{⟨(Base‘ndx), 𝑏⟩}))
32	29, 31	eqtr4d 2775	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → (𝐹‘{⟨(Base‘ndx), 𝑏⟩}) = 𝑏)
33	32	f1oeq3d 6772	. . . . . 6 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → (( I ↾ 𝑏):𝑏–1-1-onto→(𝐹‘{⟨(Base‘ndx), 𝑏⟩}) ↔ ( I ↾ 𝑏):𝑏–1-1-onto→𝑏))
34	27, 33	mpbiri 258	. . . . 5 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → ( I ↾ 𝑏):𝑏–1-1-onto→(𝐹‘{⟨(Base‘ndx), 𝑏⟩}))
35		resiexg 7857	. . . . . . 7 ⊢ (𝑏 ∈ V → ( I ↾ 𝑏) ∈ V)
36	35	elv 3435	. . . . . 6 ⊢ ( I ↾ 𝑏) ∈ V
37		f1oeq1 6763	. . . . . 6 ⊢ (𝑖 = ( I ↾ 𝑏) → (𝑖:𝑏–1-1-onto→(𝐹‘{⟨(Base‘ndx), 𝑏⟩}) ↔ ( I ↾ 𝑏):𝑏–1-1-onto→(𝐹‘{⟨(Base‘ndx), 𝑏⟩})))
38	36, 37	spcev 3549	. . . . 5 ⊢ (( I ↾ 𝑏):𝑏–1-1-onto→(𝐹‘{⟨(Base‘ndx), 𝑏⟩}) → ∃𝑖 𝑖:𝑏–1-1-onto→(𝐹‘{⟨(Base‘ndx), 𝑏⟩}))
39	34, 38	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → ∃𝑖 𝑖:𝑏–1-1-onto→(𝐹‘{⟨(Base‘ndx), 𝑏⟩}))
40	22, 26, 39	rspcedvd 3567	. . 3 ⊢ ((𝜑 ∧ 𝑏 ∈ 𝐶) → ∃𝑎 ∈ 𝐵 ∃𝑖 𝑖:𝑏–1-1-onto→(𝐹‘𝑎))
41	40	ralrimiva 3130	. 2 ⊢ (𝜑 → ∀𝑏 ∈ 𝐶 ∃𝑎 ∈ 𝐵 ∃𝑖 𝑖:𝑏–1-1-onto→(𝐹‘𝑎))
42	8, 9, 41	3jca 1129	1 ⊢ (𝜑 → (𝐹(𝐸 Faith 𝑆)𝐺 ∧ 𝐹(𝐸 Full 𝑆)𝐺 ∧ ∀𝑏 ∈ 𝐶 ∃𝑎 ∈ 𝐵 ∃𝑖 𝑖:𝑏–1-1-onto→(𝐹‘𝑎)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1087 = wceq 1542 ∃wex 1781 ∈ wcel 2114 ∀wral 3052 ∃wrex 3062 Vcvv 3430 {csn 4568 ⟨cop 4574 class class class wbr 5086 ↦ cmpt 5167 I cid 5519 ↾ cres 5627 –1-1-onto→wf1o 6492 ‘cfv 6493 (class class class)co 7361 ∈ cmpo 7363 ↑_m cmap 8767 WUnicwun 10617 ndxcnx 17157 Basecbs 17173 Full cful 17865 Faith cfth 17866 SetCatcsetc 18036 ExtStrCatcestrc 18082

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 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2709 ax-rep 5213 ax-sep 5232 ax-nul 5242 ax-pow 5303 ax-pr 5371 ax-un 7683 ax-cnex 11088 ax-resscn 11089 ax-1cn 11090 ax-icn 11091 ax-addcl 11092 ax-addrcl 11093 ax-mulcl 11094 ax-mulrcl 11095 ax-mulcom 11096 ax-addass 11097 ax-mulass 11098 ax-distr 11099 ax-i2m1 11100 ax-1ne0 11101 ax-1rid 11102 ax-rnegex 11103 ax-rrecex 11104 ax-cnre 11105 ax-pre-lttri 11106 ax-pre-lttrn 11107 ax-pre-ltadd 11108 ax-pre-mulgt0 11109

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-nel 3038 df-ral 3053 df-rex 3063 df-rmo 3343 df-reu 3344 df-rab 3391 df-v 3432 df-sbc 3730 df-csb 3839 df-dif 3893 df-un 3895 df-in 3897 df-ss 3907 df-pss 3910 df-nul 4275 df-if 4468 df-pw 4544 df-sn 4569 df-pr 4571 df-tp 4573 df-op 4575 df-uni 4852 df-iun 4936 df-br 5087 df-opab 5149 df-mpt 5168 df-tr 5194 df-id 5520 df-eprel 5525 df-po 5533 df-so 5534 df-fr 5578 df-we 5580 df-xp 5631 df-rel 5632 df-cnv 5633 df-co 5634 df-dm 5635 df-rn 5636 df-res 5637 df-ima 5638 df-pred 6260 df-ord 6321 df-on 6322 df-lim 6323 df-suc 6324 df-iota 6449 df-fun 6495 df-fn 6496 df-f 6497 df-f1 6498 df-fo 6499 df-f1o 6500 df-fv 6501 df-riota 7318 df-ov 7364 df-oprab 7365 df-mpo 7366 df-om 7812 df-1st 7936 df-2nd 7937 df-frecs 8225 df-wrecs 8256 df-recs 8305 df-rdg 8343 df-1o 8399 df-er 8637 df-map 8769 df-ixp 8840 df-en 8888 df-dom 8889 df-sdom 8890 df-fin 8891 df-wun 10619 df-pnf 11175 df-mnf 11176 df-xr 11177 df-ltxr 11178 df-le 11179 df-sub 11373 df-neg 11374 df-nn 12169 df-2 12238 df-3 12239 df-4 12240 df-5 12241 df-6 12242 df-7 12243 df-8 12244 df-9 12245 df-n0 12432 df-z 12519 df-dec 12639 df-uz 12783 df-fz 13456 df-struct 17111 df-slot 17146 df-ndx 17158 df-base 17174 df-hom 17238 df-cco 17239 df-cat 17628 df-cid 17629 df-func 17819 df-full 17867 df-fth 17868 df-setc 18037 df-estrc 18083

This theorem is referenced by: (None)

W3C validator