Theorem prcofval 49737

Description: Value of the pre-composition functor. (Contributed by Zhi Wang, 2-Nov-2025.)

Hypotheses

Ref	Expression
prcofvalg.b	⊢ 𝐵 = (𝐷 Func 𝐸)
prcofvalg.n	⊢ 𝑁 = (𝐷 Nat 𝐸)
prcofvala.d	⊢ (𝜑 → 𝐷 ∈ 𝑉)
prcofvala.e	⊢ (𝜑 → 𝐸 ∈ 𝑊)
prcofval.r	⊢ Rel 𝑅
prcofval.f	⊢ (𝜑 → 𝐹𝑅𝐺)

Assertion

Ref	Expression
prcofval	⊢ (𝜑 → (⟨𝐷, 𝐸⟩ −∘F ⟨𝐹, 𝐺⟩) = ⟨(𝑘 ∈ 𝐵 ↦ (𝑘 ∘func ⟨𝐹, 𝐺⟩)), (𝑘 ∈ 𝐵, 𝑙 ∈ 𝐵 ↦ (𝑎 ∈ (𝑘𝑁𝑙) ↦ (𝑎 ∘ 𝐹)))⟩)

Distinct variable groups:   𝐵,𝑎,𝑘,𝑙   𝐷,𝑎,𝑘,𝑙   𝐸,𝑎,𝑘,𝑙   𝐹,𝑎,𝑘,𝑙   𝐺,𝑎,𝑘,𝑙   𝜑,𝑎,𝑘,𝑙

Allowed substitution hints:   𝑅(𝑘,𝑎,𝑙)   𝑁(𝑘,𝑎,𝑙)   𝑉(𝑘,𝑎,𝑙)   𝑊(𝑘,𝑎,𝑙)

Proof of Theorem prcofval

Step	Hyp	Ref	Expression
1		prcofvalg.b	. . 3 ⊢ 𝐵 = (𝐷 Func 𝐸)
2		prcofvalg.n	. . 3 ⊢ 𝑁 = (𝐷 Nat 𝐸)
3		prcofvala.d	. . 3 ⊢ (𝜑 → 𝐷 ∈ 𝑉)
4		prcofvala.e	. . 3 ⊢ (𝜑 → 𝐸 ∈ 𝑊)
5		opex 5419	. . . 4 ⊢ ⟨𝐹, 𝐺⟩ ∈ V
6	5	a1i 11	. . 3 ⊢ (𝜑 → ⟨𝐹, 𝐺⟩ ∈ V)
7	1, 2, 3, 4, 6	prcofvala 49736	. 2 ⊢ (𝜑 → (⟨𝐷, 𝐸⟩ −∘F ⟨𝐹, 𝐺⟩) = ⟨(𝑘 ∈ 𝐵 ↦ (𝑘 ∘func ⟨𝐹, 𝐺⟩)), (𝑘 ∈ 𝐵, 𝑙 ∈ 𝐵 ↦ (𝑎 ∈ (𝑘𝑁𝑙) ↦ (𝑎 ∘ (1st ‘⟨𝐹, 𝐺⟩))))⟩)
8		prcofval.f	. . . . . . 7 ⊢ (𝜑 → 𝐹𝑅𝐺)
9		prcofval.r	. . . . . . . 8 ⊢ Rel 𝑅
10	9	brrelex12i 5687	. . . . . . 7 ⊢ (𝐹𝑅𝐺 → (𝐹 ∈ V ∧ 𝐺 ∈ V))
11		op1stg 7955	. . . . . . 7 ⊢ ((𝐹 ∈ V ∧ 𝐺 ∈ V) → (1st ‘⟨𝐹, 𝐺⟩) = 𝐹)
12	8, 10, 11	3syl 18	. . . . . 6 ⊢ (𝜑 → (1st ‘⟨𝐹, 𝐺⟩) = 𝐹)
13	12	coeq2d 5819	. . . . 5 ⊢ (𝜑 → (𝑎 ∘ (1st ‘⟨𝐹, 𝐺⟩)) = (𝑎 ∘ 𝐹))
14	13	mpteq2dv 5194	. . . 4 ⊢ (𝜑 → (𝑎 ∈ (𝑘𝑁𝑙) ↦ (𝑎 ∘ (1st ‘⟨𝐹, 𝐺⟩))) = (𝑎 ∈ (𝑘𝑁𝑙) ↦ (𝑎 ∘ 𝐹)))
15	14	mpoeq3dv 7447	. . 3 ⊢ (𝜑 → (𝑘 ∈ 𝐵, 𝑙 ∈ 𝐵 ↦ (𝑎 ∈ (𝑘𝑁𝑙) ↦ (𝑎 ∘ (1st ‘⟨𝐹, 𝐺⟩)))) = (𝑘 ∈ 𝐵, 𝑙 ∈ 𝐵 ↦ (𝑎 ∈ (𝑘𝑁𝑙) ↦ (𝑎 ∘ 𝐹))))
16	15	opeq2d 4838	. 2 ⊢ (𝜑 → ⟨(𝑘 ∈ 𝐵 ↦ (𝑘 ∘func ⟨𝐹, 𝐺⟩)), (𝑘 ∈ 𝐵, 𝑙 ∈ 𝐵 ↦ (𝑎 ∈ (𝑘𝑁𝑙) ↦ (𝑎 ∘ (1st ‘⟨𝐹, 𝐺⟩))))⟩ = ⟨(𝑘 ∈ 𝐵 ↦ (𝑘 ∘func ⟨𝐹, 𝐺⟩)), (𝑘 ∈ 𝐵, 𝑙 ∈ 𝐵 ↦ (𝑎 ∈ (𝑘𝑁𝑙) ↦ (𝑎 ∘ 𝐹)))⟩)
17	7, 16	eqtrd 2772	1 ⊢ (𝜑 → (⟨𝐷, 𝐸⟩ −∘F ⟨𝐹, 𝐺⟩) = ⟨(𝑘 ∈ 𝐵 ↦ (𝑘 ∘func ⟨𝐹, 𝐺⟩)), (𝑘 ∈ 𝐵, 𝑙 ∈ 𝐵 ↦ (𝑎 ∈ (𝑘𝑁𝑙) ↦ (𝑎 ∘ 𝐹)))⟩)

Syntax hints:   → wi 4   ∧ wa 395   = wceq 1542   ∈ wcel 2114  Vcvv 3442  ⟨cop 4588   class class class wbr 5100   ↦ cmpt 5181   ∘ ccom 5636  Rel wrel 5637  ‘cfv 6500  (class class class)co 7368   ∈ cmpo 7370  1^st c1st 7941   Func cfunc 17790   ∘_func ccofu 17792   Nat cnat 17880   −∘_F cprcof 49732

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-sep 5243  ax-nul 5253  ax-pr 5379  ax-un 7690

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  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-ral 3053  df-rex 3063  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-nul 4288  df-if 4482  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-br 5101  df-opab 5163  df-mpt 5182  df-id 5527  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-iota 6456  df-fun 6502  df-fv 6508  df-ov 7371  df-oprab 7372  df-mpo 7373  df-1st 7943  df-2nd 7944  df-prcof 49733

This theorem is referenced by:  prcoftposcurfuco  49742  prcof2  49749