![]() |
Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
|
Mirrors > Home > MPE Home > Th. List > curf11 | Structured version Visualization version GIF version |
Description: Value of the double evaluated curry functor. (Contributed by Mario Carneiro, 12-Jan-2017.) |
Ref | Expression |
---|---|
curfval.g | ⊢ 𝐺 = (⟨𝐶, 𝐷⟩ curryF 𝐹) |
curfval.a | ⊢ 𝐴 = (Base‘𝐶) |
curfval.c | ⊢ (𝜑 → 𝐶 ∈ Cat) |
curfval.d | ⊢ (𝜑 → 𝐷 ∈ Cat) |
curfval.f | ⊢ (𝜑 → 𝐹 ∈ ((𝐶 ×c 𝐷) Func 𝐸)) |
curfval.b | ⊢ 𝐵 = (Base‘𝐷) |
curf1.x | ⊢ (𝜑 → 𝑋 ∈ 𝐴) |
curf1.k | ⊢ 𝐾 = ((1st ‘𝐺)‘𝑋) |
curf11.y | ⊢ (𝜑 → 𝑌 ∈ 𝐵) |
Ref | Expression |
---|---|
curf11 | ⊢ (𝜑 → ((1st ‘𝐾)‘𝑌) = (𝑋(1st ‘𝐹)𝑌)) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | curfval.g | . . . 4 ⊢ 𝐺 = (⟨𝐶, 𝐷⟩ curryF 𝐹) | |
2 | curfval.a | . . . 4 ⊢ 𝐴 = (Base‘𝐶) | |
3 | curfval.c | . . . 4 ⊢ (𝜑 → 𝐶 ∈ Cat) | |
4 | curfval.d | . . . 4 ⊢ (𝜑 → 𝐷 ∈ Cat) | |
5 | curfval.f | . . . 4 ⊢ (𝜑 → 𝐹 ∈ ((𝐶 ×c 𝐷) Func 𝐸)) | |
6 | curfval.b | . . . 4 ⊢ 𝐵 = (Base‘𝐷) | |
7 | curf1.x | . . . 4 ⊢ (𝜑 → 𝑋 ∈ 𝐴) | |
8 | curf1.k | . . . 4 ⊢ 𝐾 = ((1st ‘𝐺)‘𝑋) | |
9 | eqid 2733 | . . . 4 ⊢ (Hom ‘𝐷) = (Hom ‘𝐷) | |
10 | eqid 2733 | . . . 4 ⊢ (Id‘𝐶) = (Id‘𝐶) | |
11 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 | curf1 18119 | . . 3 ⊢ (𝜑 → 𝐾 = ⟨(𝑦 ∈ 𝐵 ↦ (𝑋(1st ‘𝐹)𝑦)), (𝑦 ∈ 𝐵, 𝑧 ∈ 𝐵 ↦ (𝑔 ∈ (𝑦(Hom ‘𝐷)𝑧) ↦ (((Id‘𝐶)‘𝑋)(⟨𝑋, 𝑦⟩(2nd ‘𝐹)⟨𝑋, 𝑧⟩)𝑔)))⟩) |
12 | 6 | fvexi 6857 | . . . . 5 ⊢ 𝐵 ∈ V |
13 | 12 | mptex 7174 | . . . 4 ⊢ (𝑦 ∈ 𝐵 ↦ (𝑋(1st ‘𝐹)𝑦)) ∈ V |
14 | 12, 12 | mpoex 8013 | . . . 4 ⊢ (𝑦 ∈ 𝐵, 𝑧 ∈ 𝐵 ↦ (𝑔 ∈ (𝑦(Hom ‘𝐷)𝑧) ↦ (((Id‘𝐶)‘𝑋)(⟨𝑋, 𝑦⟩(2nd ‘𝐹)⟨𝑋, 𝑧⟩)𝑔))) ∈ V |
15 | 13, 14 | op1std 7932 | . . 3 ⊢ (𝐾 = ⟨(𝑦 ∈ 𝐵 ↦ (𝑋(1st ‘𝐹)𝑦)), (𝑦 ∈ 𝐵, 𝑧 ∈ 𝐵 ↦ (𝑔 ∈ (𝑦(Hom ‘𝐷)𝑧) ↦ (((Id‘𝐶)‘𝑋)(⟨𝑋, 𝑦⟩(2nd ‘𝐹)⟨𝑋, 𝑧⟩)𝑔)))⟩ → (1st ‘𝐾) = (𝑦 ∈ 𝐵 ↦ (𝑋(1st ‘𝐹)𝑦))) |
16 | 11, 15 | syl 17 | . 2 ⊢ (𝜑 → (1st ‘𝐾) = (𝑦 ∈ 𝐵 ↦ (𝑋(1st ‘𝐹)𝑦))) |
17 | simpr 486 | . . 3 ⊢ ((𝜑 ∧ 𝑦 = 𝑌) → 𝑦 = 𝑌) | |
18 | 17 | oveq2d 7374 | . 2 ⊢ ((𝜑 ∧ 𝑦 = 𝑌) → (𝑋(1st ‘𝐹)𝑦) = (𝑋(1st ‘𝐹)𝑌)) |
19 | curf11.y | . 2 ⊢ (𝜑 → 𝑌 ∈ 𝐵) | |
20 | ovexd 7393 | . 2 ⊢ (𝜑 → (𝑋(1st ‘𝐹)𝑌) ∈ V) | |
21 | 16, 18, 19, 20 | fvmptd 6956 | 1 ⊢ (𝜑 → ((1st ‘𝐾)‘𝑌) = (𝑋(1st ‘𝐹)𝑌)) |
Colors of variables: wff setvar class |
Syntax hints: → wi 4 ∧ wa 397 = wceq 1542 ∈ wcel 2107 Vcvv 3444 ⟨cop 4593 ↦ cmpt 5189 ‘cfv 6497 (class class class)co 7358 ∈ cmpo 7360 1st c1st 7920 2nd c2nd 7921 Basecbs 17088 Hom chom 17149 Catccat 17549 Idccid 17550 Func cfunc 17745 ×c cxpc 18061 curryF ccurf 18104 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2704 ax-rep 5243 ax-sep 5257 ax-nul 5264 ax-pow 5321 ax-pr 5385 ax-un 7673 |
This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2535 df-eu 2564 df-clab 2711 df-cleq 2725 df-clel 2811 df-nfc 2886 df-ne 2941 df-ral 3062 df-rex 3071 df-reu 3353 df-rab 3407 df-v 3446 df-sbc 3741 df-csb 3857 df-dif 3914 df-un 3916 df-in 3918 df-ss 3928 df-nul 4284 df-if 4488 df-pw 4563 df-sn 4588 df-pr 4590 df-op 4594 df-uni 4867 df-iun 4957 df-br 5107 df-opab 5169 df-mpt 5190 df-id 5532 df-xp 5640 df-rel 5641 df-cnv 5642 df-co 5643 df-dm 5644 df-rn 5645 df-res 5646 df-ima 5647 df-iota 6449 df-fun 6499 df-fn 6500 df-f 6501 df-f1 6502 df-fo 6503 df-f1o 6504 df-fv 6505 df-ov 7361 df-oprab 7362 df-mpo 7363 df-1st 7922 df-2nd 7923 df-curf 18108 |
This theorem is referenced by: curf1cl 18122 curf2cl 18125 curfcl 18126 uncfcurf 18133 diag11 18137 yon11 18158 |
Copyright terms: Public domain | W3C validator |