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

Theorem reldmprcof2 50045
Description: The domain of the morphism part of the pre-composition functor is a relation. (Contributed by Zhi Wang, 2-Nov-2025.)
Assertion
Ref Expression
reldmprcof2 Rel dom (2nd ‘(𝑃 −∘F 𝐹))

Proof of Theorem reldmprcof2
Dummy variables 𝑎 𝑘 𝑙 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqid 2769 . . . 4 (𝑘 ∈ ((1st𝑃) Func (2nd𝑃)), 𝑙 ∈ ((1st𝑃) Func (2nd𝑃)) ↦ (𝑎 ∈ (𝑘((1st𝑃) Nat (2nd𝑃))𝑙) ↦ (𝑎 ∘ (1st𝐹)))) = (𝑘 ∈ ((1st𝑃) Func (2nd𝑃)), 𝑙 ∈ ((1st𝑃) Func (2nd𝑃)) ↦ (𝑎 ∈ (𝑘((1st𝑃) Nat (2nd𝑃))𝑙) ↦ (𝑎 ∘ (1st𝐹))))
21reldmmpo 7545 . . 3 Rel dom (𝑘 ∈ ((1st𝑃) Func (2nd𝑃)), 𝑙 ∈ ((1st𝑃) Func (2nd𝑃)) ↦ (𝑎 ∈ (𝑘((1st𝑃) Nat (2nd𝑃))𝑙) ↦ (𝑎 ∘ (1st𝐹))))
3 eqid 2769 . . . . . . 7 ((1st𝑃) Func (2nd𝑃)) = ((1st𝑃) Func (2nd𝑃))
4 eqid 2769 . . . . . . 7 ((1st𝑃) Nat (2nd𝑃)) = ((1st𝑃) Nat (2nd𝑃))
5 simpr 489 . . . . . . 7 ((𝑃 ∈ V ∧ 𝐹 ∈ V) → 𝐹 ∈ V)
6 simpl 487 . . . . . . 7 ((𝑃 ∈ V ∧ 𝐹 ∈ V) → 𝑃 ∈ V)
7 eqidd 2770 . . . . . . 7 ((𝑃 ∈ V ∧ 𝐹 ∈ V) → (1st𝑃) = (1st𝑃))
8 eqidd 2770 . . . . . . 7 ((𝑃 ∈ V ∧ 𝐹 ∈ V) → (2nd𝑃) = (2nd𝑃))
93, 4, 5, 6, 7, 8prcofvalg 50039 . . . . . 6 ((𝑃 ∈ V ∧ 𝐹 ∈ V) → (𝑃 −∘F 𝐹) = ⟨(𝑘 ∈ ((1st𝑃) Func (2nd𝑃)) ↦ (𝑘func 𝐹)), (𝑘 ∈ ((1st𝑃) Func (2nd𝑃)), 𝑙 ∈ ((1st𝑃) Func (2nd𝑃)) ↦ (𝑎 ∈ (𝑘((1st𝑃) Nat (2nd𝑃))𝑙) ↦ (𝑎 ∘ (1st𝐹))))⟩)
10 ovex 7444 . . . . . . . 8 ((1st𝑃) Func (2nd𝑃)) ∈ V
1110mptex 7222 . . . . . . 7 (𝑘 ∈ ((1st𝑃) Func (2nd𝑃)) ↦ (𝑘func 𝐹)) ∈ V
1210, 10mpoex 8076 . . . . . . 7 (𝑘 ∈ ((1st𝑃) Func (2nd𝑃)), 𝑙 ∈ ((1st𝑃) Func (2nd𝑃)) ↦ (𝑎 ∈ (𝑘((1st𝑃) Nat (2nd𝑃))𝑙) ↦ (𝑎 ∘ (1st𝐹)))) ∈ V
1311, 12op2ndd 7997 . . . . . 6 ((𝑃 −∘F 𝐹) = ⟨(𝑘 ∈ ((1st𝑃) Func (2nd𝑃)) ↦ (𝑘func 𝐹)), (𝑘 ∈ ((1st𝑃) Func (2nd𝑃)), 𝑙 ∈ ((1st𝑃) Func (2nd𝑃)) ↦ (𝑎 ∈ (𝑘((1st𝑃) Nat (2nd𝑃))𝑙) ↦ (𝑎 ∘ (1st𝐹))))⟩ → (2nd ‘(𝑃 −∘F 𝐹)) = (𝑘 ∈ ((1st𝑃) Func (2nd𝑃)), 𝑙 ∈ ((1st𝑃) Func (2nd𝑃)) ↦ (𝑎 ∈ (𝑘((1st𝑃) Nat (2nd𝑃))𝑙) ↦ (𝑎 ∘ (1st𝐹)))))
149, 13syl 18 . . . . 5 ((𝑃 ∈ V ∧ 𝐹 ∈ V) → (2nd ‘(𝑃 −∘F 𝐹)) = (𝑘 ∈ ((1st𝑃) Func (2nd𝑃)), 𝑙 ∈ ((1st𝑃) Func (2nd𝑃)) ↦ (𝑎 ∈ (𝑘((1st𝑃) Nat (2nd𝑃))𝑙) ↦ (𝑎 ∘ (1st𝐹)))))
1514dmeqd 5896 . . . 4 ((𝑃 ∈ V ∧ 𝐹 ∈ V) → dom (2nd ‘(𝑃 −∘F 𝐹)) = dom (𝑘 ∈ ((1st𝑃) Func (2nd𝑃)), 𝑙 ∈ ((1st𝑃) Func (2nd𝑃)) ↦ (𝑎 ∈ (𝑘((1st𝑃) Nat (2nd𝑃))𝑙) ↦ (𝑎 ∘ (1st𝐹)))))
1615releqd 5766 . . 3 ((𝑃 ∈ V ∧ 𝐹 ∈ V) → (Rel dom (2nd ‘(𝑃 −∘F 𝐹)) ↔ Rel dom (𝑘 ∈ ((1st𝑃) Func (2nd𝑃)), 𝑙 ∈ ((1st𝑃) Func (2nd𝑃)) ↦ (𝑎 ∈ (𝑘((1st𝑃) Nat (2nd𝑃))𝑙) ↦ (𝑎 ∘ (1st𝐹))))))
172, 16mpbiri 261 . 2 ((𝑃 ∈ V ∧ 𝐹 ∈ V) → Rel dom (2nd ‘(𝑃 −∘F 𝐹)))
18 rel0 5786 . . 3 Rel ∅
19 reldmprcof 50038 . . . . . . . . 9 Rel dom −∘F
2019ovprc 7449 . . . . . . . 8 (¬ (𝑃 ∈ V ∧ 𝐹 ∈ V) → (𝑃 −∘F 𝐹) = ∅)
2120fveq2d 6886 . . . . . . 7 (¬ (𝑃 ∈ V ∧ 𝐹 ∈ V) → (2nd ‘(𝑃 −∘F 𝐹)) = (2nd ‘∅))
22 2nd0 7993 . . . . . . 7 (2nd ‘∅) = ∅
2321, 22eqtrdi 2820 . . . . . 6 (¬ (𝑃 ∈ V ∧ 𝐹 ∈ V) → (2nd ‘(𝑃 −∘F 𝐹)) = ∅)
2423dmeqd 5896 . . . . 5 (¬ (𝑃 ∈ V ∧ 𝐹 ∈ V) → dom (2nd ‘(𝑃 −∘F 𝐹)) = dom ∅)
25 dm0 5911 . . . . 5 dom ∅ = ∅
2624, 25eqtrdi 2820 . . . 4 (¬ (𝑃 ∈ V ∧ 𝐹 ∈ V) → dom (2nd ‘(𝑃 −∘F 𝐹)) = ∅)
2726releqd 5766 . . 3 (¬ (𝑃 ∈ V ∧ 𝐹 ∈ V) → (Rel dom (2nd ‘(𝑃 −∘F 𝐹)) ↔ Rel ∅))
2818, 27mpbiri 261 . 2 (¬ (𝑃 ∈ V ∧ 𝐹 ∈ V) → Rel dom (2nd ‘(𝑃 −∘F 𝐹)))
2917, 28pm2.61i 184 1 Rel dom (2nd ‘(𝑃 −∘F 𝐹))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wa 400   = wceq 1567  wcel 2149  Vcvv 3463  c0 4294  cop 4600  cmpt 5196  dom cdm 5662  ccom 5666  Rel wrel 5667  cfv 6537  (class class class)co 7411  cmpo 7413  1st c1st 7984  2nd c2nd 7985   Func cfunc 17911  func ccofu 17913   Nat cnat 18001   −∘F cprcof 50036
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-rep 5242  ax-sep 5261  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  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-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-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4877  df-iun 4962  df-br 5114  df-opab 5178  df-mpt 5197  df-id 5557  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-ov 7414  df-oprab 7415  df-mpo 7416  df-1st 7986  df-2nd 7987  df-prcof 50037
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator