Theorem oppcbas 17770

Description: Base set of an opposite category. (Contributed by Mario Carneiro, 2-Jan-2017.) (Proof shortened by AV, 18-Oct-2024.)

Hypotheses

Ref	Expression
oppcbas.1	⊢ 𝑂 = (oppCat‘𝐶)
oppcbas.2	⊢ 𝐵 = (Base‘𝐶)

Assertion

Ref	Expression
oppcbas	⊢ 𝐵 = (Base‘𝑂)

Proof of Theorem oppcbas

Dummy variables 𝑢 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		oppcbas.2	. 2 ⊢ 𝐵 = (Base‘𝐶)
2		baseid 17268	. . . . . 6 ⊢ Base = Slot (Base‘ndx)
3		slotsbhcdif 17464	. . . . . . 7 ⊢ ((Base‘ndx) ≠ (Hom ‘ndx) ∧ (Base‘ndx) ≠ (comp‘ndx) ∧ (Hom ‘ndx) ≠ (comp‘ndx))
4	3	simp1i 1155	. . . . . 6 ⊢ (Base‘ndx) ≠ (Hom ‘ndx)
5	2, 4	setsnid 17264	. . . . 5 ⊢ (Base‘𝐶) = (Base‘(𝐶 sSet ⟨(Hom ‘ndx), tpos (Hom ‘𝐶)⟩))
6	3	simp2i 1156	. . . . . 6 ⊢ (Base‘ndx) ≠ (comp‘ndx)
7	2, 6	setsnid 17264	. . . . 5 ⊢ (Base‘(𝐶 sSet ⟨(Hom ‘ndx), tpos (Hom ‘𝐶)⟩)) = (Base‘((𝐶 sSet ⟨(Hom ‘ndx), tpos (Hom ‘𝐶)⟩) sSet ⟨(comp‘ndx), (𝑢 ∈ ((Base‘𝐶) × (Base‘𝐶)), 𝑧 ∈ (Base‘𝐶) ↦ tpos (⟨𝑧, (2nd ‘𝑢)⟩(comp‘𝐶)(1st ‘𝑢)))⟩))
8	5, 7	eqtri 2792	. . . 4 ⊢ (Base‘𝐶) = (Base‘((𝐶 sSet ⟨(Hom ‘ndx), tpos (Hom ‘𝐶)⟩) sSet ⟨(comp‘ndx), (𝑢 ∈ ((Base‘𝐶) × (Base‘𝐶)), 𝑧 ∈ (Base‘𝐶) ↦ tpos (⟨𝑧, (2nd ‘𝑢)⟩(comp‘𝐶)(1st ‘𝑢)))⟩))
9		eqid 2769	. . . . . 6 ⊢ (Base‘𝐶) = (Base‘𝐶)
10		eqid 2769	. . . . . 6 ⊢ (Hom ‘𝐶) = (Hom ‘𝐶)
11		eqid 2769	. . . . . 6 ⊢ (comp‘𝐶) = (comp‘𝐶)
12		oppcbas.1	. . . . . 6 ⊢ 𝑂 = (oppCat‘𝐶)
13	9, 10, 11, 12	oppcval 17765	. . . . 5 ⊢ (𝐶 ∈ V → 𝑂 = ((𝐶 sSet ⟨(Hom ‘ndx), tpos (Hom ‘𝐶)⟩) sSet ⟨(comp‘ndx), (𝑢 ∈ ((Base‘𝐶) × (Base‘𝐶)), 𝑧 ∈ (Base‘𝐶) ↦ tpos (⟨𝑧, (2nd ‘𝑢)⟩(comp‘𝐶)(1st ‘𝑢)))⟩))
14	13	fveq2d 6883	. . . 4 ⊢ (𝐶 ∈ V → (Base‘𝑂) = (Base‘((𝐶 sSet ⟨(Hom ‘ndx), tpos (Hom ‘𝐶)⟩) sSet ⟨(comp‘ndx), (𝑢 ∈ ((Base‘𝐶) × (Base‘𝐶)), 𝑧 ∈ (Base‘𝐶) ↦ tpos (⟨𝑧, (2nd ‘𝑢)⟩(comp‘𝐶)(1st ‘𝑢)))⟩)))
15	8, 14	eqtr4id 2823	. . 3 ⊢ (𝐶 ∈ V → (Base‘𝐶) = (Base‘𝑂))
16		base0 17270	. . . . 5 ⊢ ∅ = (Base‘∅)
17	16	eqcomi 2778	. . . 4 ⊢ (Base‘∅) = ∅
18	17, 12	fveqprc 17247	. . 3 ⊢ (¬ 𝐶 ∈ V → (Base‘𝐶) = (Base‘𝑂))
19	15, 18	pm2.61i 184	. 2 ⊢ (Base‘𝐶) = (Base‘𝑂)
20	1, 19	eqtri 2792	1 ⊢ 𝐵 = (Base‘𝑂)

Syntax hints:   = wceq 1567   ∈ wcel 2149   ≠ wne 2964  Vcvv 3463  ∅c0 4294  ⟨cop 4597   × cxp 5657  ‘cfv 6533  (class class class)co 7408   ∈ cmpo 7410  1^st c1st 7980  2^nd c2nd 7981  tpos ctpos 8217   sSet csts 17219  ndxcnx 17249  Basecbs 17265  Hom chom 17317  compcco 17318  oppCatcoppc 17763

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-sep 5258  ax-nul 5268  ax-pow 5334  ax-pr 5402  ax-un 7730  ax-cnex 11152  ax-resscn 11153  ax-1cn 11154  ax-icn 11155  ax-addcl 11156  ax-addrcl 11157  ax-mulcl 11158  ax-mulrcl 11159  ax-mulcom 11160  ax-addass 11161  ax-mulass 11162  ax-distr 11163  ax-i2m1 11164  ax-1ne0 11165  ax-1rid 11166  ax-rnegex 11167  ax-rrecex 11168  ax-cnre 11169  ax-pre-lttri 11170  ax-pre-lttrn 11171  ax-pre-ltadd 11172  ax-pre-mulgt0 11173

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-nel 3071  df-ral 3086  df-rex 3096  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4874  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6299  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-riota 7365  df-ov 7411  df-oprab 7412  df-mpo 7413  df-om 7859  df-2nd 7983  df-tpos 8218  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-er 8690  df-en 8940  df-dom 8941  df-sdom 8942  df-pnf 11241  df-mnf 11242  df-xr 11243  df-ltxr 11244  df-le 11245  df-sub 11439  df-neg 11440  df-nn 12230  df-2 12299  df-3 12300  df-4 12301  df-5 12302  df-6 12303  df-7 12304  df-8 12305  df-9 12306  df-n0 12501  df-z 12588  df-dec 12708  df-sets 17220  df-slot 17238  df-ndx 17250  df-base 17266  df-hom 17330  df-cco 17331  df-oppc 17764

This theorem is referenced by:  oppccatid  17771  oppchomf  17772  2oppcbas  17775  2oppccomf  17777  oppccomfpropd  17779  isepi  17793  epii  17796  oppcsect  17831  oppcsect2  17832  oppcinv  17833  oppciso  17834  sectepi  17837  episect  17838  funcoppc  17928  fulloppc  17977  fthoppc  17978  fthepi  17983  dfinito2  18056  dftermo2  18057  hofcl  18311  yon11  18316  yon12  18317  yon2  18318  oyon1cl  18323  yonedalem21  18325  yonedalem3a  18326  yonedalem4c  18329  yonedalem22  18330  yonedalem3b  18331  yonedalem3  18332  yonedainv  18333  yonffthlem  18334  oppccic  49700  cofuoppf  49806  oppcuprcl4  49855  oppcuprcl3  49856  oppcup  49863  natoppf  49885  oppcinito  49891  oppctermo  49892  oppczeroo  49893  oppc1stf  49944  oppc2ndf  49945  fucoppcco  50065  fucoppc  50066  oppfdiag1  50070  oppfdiag  50072  oppcthin  50094  oppcthinendcALT  50097  oduoppcbas  50221  oduoppcciso  50222  oppgoppchom  50246  oppgoppcco  50247  oppgoppcid  50248  ranval2  50286  ranval3  50287  lmdfval2  50311  lmddu  50323  termolmd  50326  lmdran  50327