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

Theorem uobeqw 49980
Description: If a full functor (in fact, a full embedding) is a section of a fully faithful functor (surjective on objects), then the sets of universal objects are equal. (Contributed by Zhi Wang, 17-Nov-2025.)
Hypotheses
Ref Expression
uobffth.b 𝐵 = (Base‘𝐷)
uobffth.x (𝜑𝑋𝐵)
uobffth.f (𝜑𝐹 ∈ (𝐶 Func 𝐷))
uobffth.g (𝜑 → (𝐾func 𝐹) = 𝐺)
uobffth.y (𝜑 → ((1st𝐾)‘𝑋) = 𝑌)
uobeq.i 𝐼 = (idfunc𝐷)
uobeq.k (𝜑𝐾 ∈ (𝐷 Full 𝐸))
uobeq.n (𝜑 → (𝐿func 𝐾) = 𝐼)
uobeqw.l (𝜑𝐿 ∈ ((𝐸 Full 𝐷) ∩ (𝐸 Faith 𝐷)))
Assertion
Ref Expression
uobeqw (𝜑 → dom (𝐹(𝐶 UP 𝐷)𝑋) = dom (𝐺(𝐶 UP 𝐸)𝑌))

Proof of Theorem uobeqw
Dummy variables 𝑚 𝑛 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 19.42v 1983 . . . . 5 (∃𝑚(𝜑𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚) ↔ (𝜑 ∧ ∃𝑚 𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚))
2 fvexd 6898 . . . . . . 7 ((𝜑𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚) → ((𝑋(2nd𝐾)((1st𝐹)‘𝑧))‘𝑚) ∈ V)
3 uobffth.y . . . . . . . . 9 (𝜑 → ((1st𝐾)‘𝑋) = 𝑌)
43adantr 485 . . . . . . . 8 ((𝜑𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚) → ((1st𝐾)‘𝑋) = 𝑌)
5 uobeq.k . . . . . . . . . 10 (𝜑𝐾 ∈ (𝐷 Full 𝐸))
6 relfunc 17920 . . . . . . . . . . . 12 Rel (𝐷 Func 𝐸)
7 fullfunc 17966 . . . . . . . . . . . . 13 (𝐷 Full 𝐸) ⊆ (𝐷 Func 𝐸)
87, 5sselid 3936 . . . . . . . . . . . 12 (𝜑𝐾 ∈ (𝐷 Func 𝐸))
9 1st2nd 8037 . . . . . . . . . . . 12 ((Rel (𝐷 Func 𝐸) ∧ 𝐾 ∈ (𝐷 Func 𝐸)) → 𝐾 = ⟨(1st𝐾), (2nd𝐾)⟩)
106, 8, 9sylancr 598 . . . . . . . . . . 11 (𝜑𝐾 = ⟨(1st𝐾), (2nd𝐾)⟩)
11 uobeq.i . . . . . . . . . . . . 13 𝐼 = (idfunc𝐷)
128func1st2nd 49837 . . . . . . . . . . . . 13 (𝜑 → (1st𝐾)(𝐷 Func 𝐸)(2nd𝐾))
13 inss1 4190 . . . . . . . . . . . . . . . 16 ((𝐸 Full 𝐷) ∩ (𝐸 Faith 𝐷)) ⊆ (𝐸 Full 𝐷)
14 fullfunc 17966 . . . . . . . . . . . . . . . 16 (𝐸 Full 𝐷) ⊆ (𝐸 Func 𝐷)
1513, 14sstri 3947 . . . . . . . . . . . . . . 15 ((𝐸 Full 𝐷) ∩ (𝐸 Faith 𝐷)) ⊆ (𝐸 Func 𝐷)
16 uobeqw.l . . . . . . . . . . . . . . 15 (𝜑𝐿 ∈ ((𝐸 Full 𝐷) ∩ (𝐸 Faith 𝐷)))
1715, 16sselid 3936 . . . . . . . . . . . . . 14 (𝜑𝐿 ∈ (𝐸 Func 𝐷))
1817func1st2nd 49837 . . . . . . . . . . . . 13 (𝜑 → (1st𝐿)(𝐸 Func 𝐷)(2nd𝐿))
198, 17cofu1st2nd 49853 . . . . . . . . . . . . . 14 (𝜑 → (𝐿func 𝐾) = (⟨(1st𝐿), (2nd𝐿)⟩ ∘func ⟨(1st𝐾), (2nd𝐾)⟩))
20 uobeq.n . . . . . . . . . . . . . 14 (𝜑 → (𝐿func 𝐾) = 𝐼)
2119, 20eqtr3d 2800 . . . . . . . . . . . . 13 (𝜑 → (⟨(1st𝐿), (2nd𝐿)⟩ ∘func ⟨(1st𝐾), (2nd𝐾)⟩) = 𝐼)
2211, 12, 18, 21cofidfth 49923 . . . . . . . . . . . 12 (𝜑 → (1st𝐾)(𝐷 Faith 𝐸)(2nd𝐾))
23 df-br 5111 . . . . . . . . . . . 12 ((1st𝐾)(𝐷 Faith 𝐸)(2nd𝐾) ↔ ⟨(1st𝐾), (2nd𝐾)⟩ ∈ (𝐷 Faith 𝐸))
2422, 23sylib 221 . . . . . . . . . . 11 (𝜑 → ⟨(1st𝐾), (2nd𝐾)⟩ ∈ (𝐷 Faith 𝐸))
2510, 24eqeltrd 2863 . . . . . . . . . 10 (𝜑𝐾 ∈ (𝐷 Faith 𝐸))
265, 25elind 4154 . . . . . . . . 9 (𝜑𝐾 ∈ ((𝐷 Full 𝐸) ∩ (𝐷 Faith 𝐸)))
2726adantr 485 . . . . . . . 8 ((𝜑𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚) → 𝐾 ∈ ((𝐷 Full 𝐸) ∩ (𝐷 Faith 𝐸)))
28 uobffth.g . . . . . . . . 9 (𝜑 → (𝐾func 𝐹) = 𝐺)
2928adantr 485 . . . . . . . 8 ((𝜑𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚) → (𝐾func 𝐹) = 𝐺)
30 eqidd 2764 . . . . . . . 8 ((𝜑𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚) → ((𝑋(2nd𝐾)((1st𝐹)‘𝑧))‘𝑚) = ((𝑋(2nd𝐾)((1st𝐹)‘𝑧))‘𝑚))
31 simpr 489 . . . . . . . 8 ((𝜑𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚) → 𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚)
324, 27, 29, 30, 31uptrai 49978 . . . . . . 7 ((𝜑𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚) → 𝑧(𝐺(𝐶 UP 𝐸)𝑌)((𝑋(2nd𝐾)((1st𝐹)‘𝑧))‘𝑚))
33 breq2 5114 . . . . . . 7 (𝑛 = ((𝑋(2nd𝐾)((1st𝐹)‘𝑧))‘𝑚) → (𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛𝑧(𝐺(𝐶 UP 𝐸)𝑌)((𝑋(2nd𝐾)((1st𝐹)‘𝑧))‘𝑚)))
342, 32, 33spcedv 3558 . . . . . 6 ((𝜑𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚) → ∃𝑛 𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛)
3534exlimiv 1960 . . . . 5 (∃𝑚(𝜑𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚) → ∃𝑛 𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛)
361, 35sylbir 238 . . . 4 ((𝜑 ∧ ∃𝑚 𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚) → ∃𝑛 𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛)
37 19.42v 1983 . . . . 5 (∃𝑛(𝜑𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛) ↔ (𝜑 ∧ ∃𝑛 𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛))
38 fvexd 6898 . . . . . . 7 ((𝜑𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛) → ((𝑌(2nd𝐿)((1st𝐺)‘𝑧))‘𝑛) ∈ V)
393fveq2d 6887 . . . . . . . . . 10 (𝜑 → ((1st𝐿)‘((1st𝐾)‘𝑋)) = ((1st𝐿)‘𝑌))
40 uobffth.b . . . . . . . . . . 11 𝐵 = (Base‘𝐷)
41 uobffth.x . . . . . . . . . . 11 (𝜑𝑋𝐵)
4211, 40, 41, 8, 17, 20cofid1a 49873 . . . . . . . . . 10 (𝜑 → ((1st𝐿)‘((1st𝐾)‘𝑋)) = 𝑋)
4339, 42eqtr3d 2800 . . . . . . . . 9 (𝜑 → ((1st𝐿)‘𝑌) = 𝑋)
4443adantr 485 . . . . . . . 8 ((𝜑𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛) → ((1st𝐿)‘𝑌) = 𝑋)
4516adantr 485 . . . . . . . 8 ((𝜑𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛) → 𝐿 ∈ ((𝐸 Full 𝐷) ∩ (𝐸 Faith 𝐷)))
46 uobffth.f . . . . . . . . . . 11 (𝜑𝐹 ∈ (𝐶 Func 𝐷))
4746, 8, 17cofuass 17947 . . . . . . . . . 10 (𝜑 → ((𝐿func 𝐾) ∘func 𝐹) = (𝐿func (𝐾func 𝐹)))
4820oveq1d 7427 . . . . . . . . . . 11 (𝜑 → ((𝐿func 𝐾) ∘func 𝐹) = (𝐼func 𝐹))
4946, 11cofulid 17948 . . . . . . . . . . 11 (𝜑 → (𝐼func 𝐹) = 𝐹)
5048, 49eqtrd 2798 . . . . . . . . . 10 (𝜑 → ((𝐿func 𝐾) ∘func 𝐹) = 𝐹)
5128oveq2d 7428 . . . . . . . . . 10 (𝜑 → (𝐿func (𝐾func 𝐹)) = (𝐿func 𝐺))
5247, 50, 513eqtr3rd 2807 . . . . . . . . 9 (𝜑 → (𝐿func 𝐺) = 𝐹)
5352adantr 485 . . . . . . . 8 ((𝜑𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛) → (𝐿func 𝐺) = 𝐹)
54 eqidd 2764 . . . . . . . 8 ((𝜑𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛) → ((𝑌(2nd𝐿)((1st𝐺)‘𝑧))‘𝑛) = ((𝑌(2nd𝐿)((1st𝐺)‘𝑧))‘𝑛))
55 simpr 489 . . . . . . . 8 ((𝜑𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛) → 𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛)
5644, 45, 53, 54, 55uptrai 49978 . . . . . . 7 ((𝜑𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛) → 𝑧(𝐹(𝐶 UP 𝐷)𝑋)((𝑌(2nd𝐿)((1st𝐺)‘𝑧))‘𝑛))
57 breq2 5114 . . . . . . 7 (𝑚 = ((𝑌(2nd𝐿)((1st𝐺)‘𝑧))‘𝑛) → (𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚𝑧(𝐹(𝐶 UP 𝐷)𝑋)((𝑌(2nd𝐿)((1st𝐺)‘𝑧))‘𝑛)))
5838, 56, 57spcedv 3558 . . . . . 6 ((𝜑𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛) → ∃𝑚 𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚)
5958exlimiv 1960 . . . . 5 (∃𝑛(𝜑𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛) → ∃𝑚 𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚)
6037, 59sylbir 238 . . . 4 ((𝜑 ∧ ∃𝑛 𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛) → ∃𝑚 𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚)
6136, 60impbida 812 . . 3 (𝜑 → (∃𝑚 𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚 ↔ ∃𝑛 𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛))
62 relup 49944 . . . 4 Rel (𝐹(𝐶 UP 𝐷)𝑋)
63 releldmb 5938 . . . 4 (Rel (𝐹(𝐶 UP 𝐷)𝑋) → (𝑧 ∈ dom (𝐹(𝐶 UP 𝐷)𝑋) ↔ ∃𝑚 𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚))
6462, 63ax-mp 5 . . 3 (𝑧 ∈ dom (𝐹(𝐶 UP 𝐷)𝑋) ↔ ∃𝑚 𝑧(𝐹(𝐶 UP 𝐷)𝑋)𝑚)
65 relup 49944 . . . 4 Rel (𝐺(𝐶 UP 𝐸)𝑌)
66 releldmb 5938 . . . 4 (Rel (𝐺(𝐶 UP 𝐸)𝑌) → (𝑧 ∈ dom (𝐺(𝐶 UP 𝐸)𝑌) ↔ ∃𝑛 𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛))
6765, 66ax-mp 5 . . 3 (𝑧 ∈ dom (𝐺(𝐶 UP 𝐸)𝑌) ↔ ∃𝑛 𝑧(𝐺(𝐶 UP 𝐸)𝑌)𝑛)
6861, 64, 673bitr4g 317 . 2 (𝜑 → (𝑧 ∈ dom (𝐹(𝐶 UP 𝐷)𝑋) ↔ 𝑧 ∈ dom (𝐺(𝐶 UP 𝐸)𝑌)))
6968eqrdv 2761 1 (𝜑 → dom (𝐹(𝐶 UP 𝐷)𝑋) = dom (𝐺(𝐶 UP 𝐸)𝑌))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 400   = wceq 1570  wex 1809  wcel 2143  Vcvv 3455  cin 3905  cop 4596   class class class wbr 5110  dom cdm 5663  Rel wrel 5668  cfv 6538  (class class class)co 7412  1st c1st 7985  2nd c2nd 7986  Basecbs 17270   Func cfunc 17912  idfunccidfu 17913  func ccofu 17914   Full cful 17962   Faith cfth 17963   UP cup 49934
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5239  ax-sep 5258  ax-nul 5270  ax-pow 5338  ax-pr 5406  ax-un 7734
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3746  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-nul 4288  df-if 4489  df-pw 4565  df-sn 4591  df-pr 4593  df-op 4597  df-uni 4874  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-id 5558  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-1st 7987  df-2nd 7988  df-map 8827  df-ixp 8897  df-cat 17725  df-cid 17726  df-func 17916  df-idfu 17917  df-cofu 17918  df-full 17964  df-fth 17965  df-up 49935
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator