Users' Mathboxes Mathbox for Zhi Wang < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  fuconuniqex2 Structured version   Visualization version   GIF version

Theorem fuconuniqex2 50992
Description: There are categories for which the object function of functor composition does not determine its morphism function. Choose both source categories to be the trivial category and apply fuconuniqex 50991. The full compatibility conditions are given in fucoisfunc 50692; fucoisfunc2 50695 expands the natural-transformation component conditions. (Contributed by Zhi Wang, 14-Sep-2026.)
Assertion
Ref Expression
fuconuniqex2 ∃𝑐 ∈ Cat ∃𝑑 ∈ Cat ∃𝑒 ∈ Cat ∃𝑧((1st ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c (𝑐 FuncCat 𝑑)) Func (𝑐 FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒)))
Distinct variable group:   𝑐,𝑑,𝑒,𝑧

Proof of Theorem fuconuniqex2
StepHypRef Expression
1 setc1oterm 50831 . . 3 (SetCat‘1o) ∈ TermCat
2 termcthin 50817 . . 3 ((SetCat‘1o) ∈ TermCat → (SetCat‘1o) ∈ ThinCat)
3 thinccat 50762 . . 3 ((SetCat‘1o) ∈ ThinCat → (SetCat‘1o) ∈ Cat)
41, 2, 3mp2b 10 . 2 (SetCat‘1o) ∈ Cat
5 fuconuniqex 50991 . . 3 ∃𝑒 ∈ Cat ∃𝑧((1st ‘(⟨(SetCat‘1o), (SetCat‘1o)⟩ ∘F 𝑒))((((SetCat‘1o) FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat (SetCat‘1o))) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), (SetCat‘1o)⟩ ∘F 𝑒)))
6 opeq2 4844 . . . . . . . . 9 (𝑑 = (SetCat‘1o) → ⟨(SetCat‘1o), 𝑑⟩ = ⟨(SetCat‘1o), (SetCat‘1o)⟩)
76fvoveq1d 7465 . . . . . . . 8 (𝑑 = (SetCat‘1o) → (1st ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒)) = (1st ‘(⟨(SetCat‘1o), (SetCat‘1o)⟩ ∘F 𝑒)))
8 oveq1 7450 . . . . . . . . . 10 (𝑑 = (SetCat‘1o) → (𝑑 FuncCat 𝑒) = ((SetCat‘1o) FuncCat 𝑒))
9 oveq2 7451 . . . . . . . . . 10 (𝑑 = (SetCat‘1o) → ((SetCat‘1o) FuncCat 𝑑) = ((SetCat‘1o) FuncCat (SetCat‘1o)))
108, 9oveq12d 7461 . . . . . . . . 9 (𝑑 = (SetCat‘1o) → ((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)) = (((SetCat‘1o) FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat (SetCat‘1o))))
1110oveq1d 7458 . . . . . . . 8 (𝑑 = (SetCat‘1o) → (((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)) Func ((SetCat‘1o) FuncCat 𝑒)) = ((((SetCat‘1o) FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat (SetCat‘1o))) Func ((SetCat‘1o) FuncCat 𝑒)))
12 eqidd 2764 . . . . . . . 8 (𝑑 = (SetCat‘1o) → 𝑧 = 𝑧)
137, 11, 12breq123d 5120 . . . . . . 7 (𝑑 = (SetCat‘1o) → ((1st ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ↔ (1st ‘(⟨(SetCat‘1o), (SetCat‘1o)⟩ ∘F 𝑒))((((SetCat‘1o) FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat (SetCat‘1o))) Func ((SetCat‘1o) FuncCat 𝑒))𝑧))
146fvoveq1d 7465 . . . . . . . 8 (𝑑 = (SetCat‘1o) → (2nd ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒)) = (2nd ‘(⟨(SetCat‘1o), (SetCat‘1o)⟩ ∘F 𝑒)))
1514neeq2d 3019 . . . . . . 7 (𝑑 = (SetCat‘1o) → (𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒)) ↔ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), (SetCat‘1o)⟩ ∘F 𝑒))))
1613, 15anbi12d 644 . . . . . 6 (𝑑 = (SetCat‘1o) → (((1st ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))) ↔ ((1st ‘(⟨(SetCat‘1o), (SetCat‘1o)⟩ ∘F 𝑒))((((SetCat‘1o) FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat (SetCat‘1o))) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), (SetCat‘1o)⟩ ∘F 𝑒)))))
1716exbidv 1956 . . . . 5 (𝑑 = (SetCat‘1o) → (∃𝑧((1st ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))) ↔ ∃𝑧((1st ‘(⟨(SetCat‘1o), (SetCat‘1o)⟩ ∘F 𝑒))((((SetCat‘1o) FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat (SetCat‘1o))) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), (SetCat‘1o)⟩ ∘F 𝑒)))))
1817rexbidv 3190 . . . 4 (𝑑 = (SetCat‘1o) → (∃𝑒 ∈ Cat ∃𝑧((1st ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))) ↔ ∃𝑒 ∈ Cat ∃𝑧((1st ‘(⟨(SetCat‘1o), (SetCat‘1o)⟩ ∘F 𝑒))((((SetCat‘1o) FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat (SetCat‘1o))) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), (SetCat‘1o)⟩ ∘F 𝑒)))))
1918rspcev 3580 . . 3 (((SetCat‘1o) ∈ Cat ∧ ∃𝑒 ∈ Cat ∃𝑧((1st ‘(⟨(SetCat‘1o), (SetCat‘1o)⟩ ∘F 𝑒))((((SetCat‘1o) FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat (SetCat‘1o))) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), (SetCat‘1o)⟩ ∘F 𝑒)))) → ∃𝑑 ∈ Cat ∃𝑒 ∈ Cat ∃𝑧((1st ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))))
204, 5, 19mp2an 705 . 2 ∃𝑑 ∈ Cat ∃𝑒 ∈ Cat ∃𝑧((1st ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒)))
21 opeq1 4843 . . . . . . . 8 (𝑐 = (SetCat‘1o) → ⟨𝑐, 𝑑⟩ = ⟨(SetCat‘1o), 𝑑⟩)
2221fvoveq1d 7465 . . . . . . 7 (𝑐 = (SetCat‘1o) → (1st ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒)) = (1st ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒)))
23 oveq1 7450 . . . . . . . . 9 (𝑐 = (SetCat‘1o) → (𝑐 FuncCat 𝑑) = ((SetCat‘1o) FuncCat 𝑑))
2423oveq2d 7459 . . . . . . . 8 (𝑐 = (SetCat‘1o) → ((𝑑 FuncCat 𝑒) ×c (𝑐 FuncCat 𝑑)) = ((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)))
25 oveq1 7450 . . . . . . . 8 (𝑐 = (SetCat‘1o) → (𝑐 FuncCat 𝑒) = ((SetCat‘1o) FuncCat 𝑒))
2624, 25oveq12d 7461 . . . . . . 7 (𝑐 = (SetCat‘1o) → (((𝑑 FuncCat 𝑒) ×c (𝑐 FuncCat 𝑑)) Func (𝑐 FuncCat 𝑒)) = (((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)) Func ((SetCat‘1o) FuncCat 𝑒)))
27 eqidd 2764 . . . . . . 7 (𝑐 = (SetCat‘1o) → 𝑧 = 𝑧)
2822, 26, 27breq123d 5120 . . . . . 6 (𝑐 = (SetCat‘1o) → ((1st ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c (𝑐 FuncCat 𝑑)) Func (𝑐 FuncCat 𝑒))𝑧 ↔ (1st ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)) Func ((SetCat‘1o) FuncCat 𝑒))𝑧))
2921fvoveq1d 7465 . . . . . . 7 (𝑐 = (SetCat‘1o) → (2nd ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒)) = (2nd ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒)))
3029neeq2d 3019 . . . . . 6 (𝑐 = (SetCat‘1o) → (𝑧 ≠ (2nd ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒)) ↔ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))))
3128, 30anbi12d 644 . . . . 5 (𝑐 = (SetCat‘1o) → (((1st ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c (𝑐 FuncCat 𝑑)) Func (𝑐 FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒))) ↔ ((1st ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒)))))
3231exbidv 1956 . . . 4 (𝑐 = (SetCat‘1o) → (∃𝑧((1st ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c (𝑐 FuncCat 𝑑)) Func (𝑐 FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒))) ↔ ∃𝑧((1st ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒)))))
33322rexbidv 3231 . . 3 (𝑐 = (SetCat‘1o) → (∃𝑑 ∈ Cat ∃𝑒 ∈ Cat ∃𝑧((1st ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c (𝑐 FuncCat 𝑑)) Func (𝑐 FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒))) ↔ ∃𝑑 ∈ Cat ∃𝑒 ∈ Cat ∃𝑧((1st ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒)))))
3433rspcev 3580 . 2 (((SetCat‘1o) ∈ Cat ∧ ∃𝑑 ∈ Cat ∃𝑒 ∈ Cat ∃𝑧((1st ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c ((SetCat‘1o) FuncCat 𝑑)) Func ((SetCat‘1o) FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨(SetCat‘1o), 𝑑⟩ ∘F 𝑒)))) → ∃𝑐 ∈ Cat ∃𝑑 ∈ Cat ∃𝑒 ∈ Cat ∃𝑧((1st ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c (𝑐 FuncCat 𝑑)) Func (𝑐 FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒))))
354, 20, 34mp2an 705 1 ∃𝑐 ∈ Cat ∃𝑑 ∈ Cat ∃𝑒 ∈ Cat ∃𝑧((1st ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒))(((𝑑 FuncCat 𝑒) ×c (𝑐 FuncCat 𝑑)) Func (𝑐 FuncCat 𝑒))𝑧 ∧ 𝑧 ≠ (2nd ‘(⟨𝑐, 𝑑⟩ ∘F 𝑒)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   ∧ wa 401   = wceq 1570  ∃wex 1812   ∈ wcel 2147   ≠ wne 2959  ∃wrex 3090  ⟨cop 4838   class class class wbr 5106  ‘cfv 6558  (class class class)co 7443  1st c1st 8023  2nd c2nd 8024  1oc1o 8497  Catccat 17867   Func cfunc 18058   FuncCat cfuc 18149  SetCatcsetc 18279   ×c cxpc 18371   ∘F cfuco 50643  ThinCatcthinc 50757  TermCatctermc 50812
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5235  ax-sep 5252  ax-nul 5263  ax-pow 5331  ax-pr 5395  ax-un 7775  ax-cnex 11283  ax-resscn 11284  ax-1cn 11285  ax-icn 11286  ax-addcl 11287  ax-addrcl 11288  ax-mulcl 11289  ax-mulrcl 11290  ax-mulcom 11291  ax-addass 11292  ax-mulass 11293  ax-distr 11294  ax-i2m1 11295  ax-1ne0 11296  ax-1rid 11297  ax-rnegex 11298  ax-rrecex 11299  ax-cnre 11300  ax-pre-lttri 11301  ax-pre-lttrn 11302  ax-pre-ltadd 11303  ax-pre-mulgt0 11304
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-tp 4593  df-op 4839  df-uni 4871  df-iun 4956  df-br 5107  df-opab 5171  df-mpt 5190  df-tr 5216  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6322  df-ord 6383  df-on 6384  df-lim 6385  df-suc 6386  df-iota 6512  df-fun 6560  df-fn 6561  df-f 6562  df-f1 6563  df-fo 6564  df-f1o 6565  df-fv 6566  df-riota 7400  df-ov 7446  df-oprab 7447  df-mpo 7448  df-om 7902  df-1st 8025  df-2nd 8026  df-frecs 8327  df-wrecs 8358  df-recs 8407  df-rdg 8446  df-1o 8504  df-2o 8505  df-3o 8506  df-er 8745  df-map 8877  df-ixp 8954  df-en 9002  df-dom 9003  df-sdom 9004  df-fin 9005  df-pnf 11372  df-mnf 11373  df-xr 11374  df-ltxr 11375  df-le 11376  df-sub 11570  df-neg 11571  df-nn 12363  df-2 12432  df-3 12433  df-4 12434  df-5 12435  df-6 12436  df-7 12437  df-8 12438  df-9 12439  df-n0 12634  df-z 12721  df-dec 12842  df-uz 12993  df-fz 13667  df-struct 17354  df-slot 17389  df-ndx 17401  df-base 17417  df-hom 17481  df-cco 17482  df-cat 17871  df-cid 17872  df-func 18062  df-idfu 18063  df-cofu 18064  df-nat 18150  df-fuc 18151  df-setc 18280  df-xpc 18375  df-1stf 18376  df-curf 18417  df-diag 18419  df-fuco 50644  df-thinc 50758  df-termc 50813
This theorem is used by: (None)
  Copyright terms: Public domain W3C validator