Theorem termcnatval 50037

Description: Value of natural transformations for a terminal category. (Contributed by Zhi Wang, 21-Oct-2025.)

Hypotheses

Ref	Expression
termcnatval.c	⊢ (𝜑 → 𝐶 ∈ TermCat)
termcnatval.n	⊢ 𝑁 = (𝐶 Nat 𝐷)
termcnatval.a	⊢ (𝜑 → 𝐴 ∈ (𝐹𝑁𝐺))
termcnatval.b	⊢ 𝐵 = (Base‘𝐶)
termcnatval.x	⊢ (𝜑 → 𝑋 ∈ 𝐵)
termcnatval.r	⊢ 𝑅 = (𝐴‘𝑋)

Assertion

Ref	Expression
termcnatval	⊢ (𝜑 → 𝐴 = {⟨𝑋, 𝑅⟩})

Proof of Theorem termcnatval

Step	Hyp	Ref	Expression
1		termcnatval.n	. . . . 5 ⊢ 𝑁 = (𝐶 Nat 𝐷)
2		termcnatval.a	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ (𝐹𝑁𝐺))
3	1, 2	nat1st2nd 17916	. . . . 5 ⊢ (𝜑 → 𝐴 ∈ (⟨(1st ‘𝐹), (2nd ‘𝐹)⟩𝑁⟨(1st ‘𝐺), (2nd ‘𝐺)⟩))
4		termcnatval.b	. . . . 5 ⊢ 𝐵 = (Base‘𝐶)
5	1, 3, 4	natfn 17919	. . . 4 ⊢ (𝜑 → 𝐴 Fn 𝐵)
6		termcnatval.c	. . . . . 6 ⊢ (𝜑 → 𝐶 ∈ TermCat)
7		termcnatval.x	. . . . . 6 ⊢ (𝜑 → 𝑋 ∈ 𝐵)
8	6, 4, 7	termcbas2 49984	. . . . 5 ⊢ (𝜑 → 𝐵 = {𝑋})
9	8	fneq2d 6582	. . . 4 ⊢ (𝜑 → (𝐴 Fn 𝐵 ↔ 𝐴 Fn {𝑋}))
10	5, 9	mpbid 234	. . 3 ⊢ (𝜑 → 𝐴 Fn {𝑋})
11		fnsnbg 7111	. . . 4 ⊢ (𝑋 ∈ 𝐵 → (𝐴 Fn {𝑋} ↔ 𝐴 = {⟨𝑋, (𝐴‘𝑋)⟩}))
12	7, 11	syl 17	. . 3 ⊢ (𝜑 → (𝐴 Fn {𝑋} ↔ 𝐴 = {⟨𝑋, (𝐴‘𝑋)⟩}))
13	10, 12	mpbid 234	. 2 ⊢ (𝜑 → 𝐴 = {⟨𝑋, (𝐴‘𝑋)⟩})
14		termcnatval.r	. . . 4 ⊢ 𝑅 = (𝐴‘𝑋)
15	14	opeq2i 4810	. . 3 ⊢ ⟨𝑋, 𝑅⟩ = ⟨𝑋, (𝐴‘𝑋)⟩
16	15	sneqi 4568	. 2 ⊢ {⟨𝑋, 𝑅⟩} = {⟨𝑋, (𝐴‘𝑋)⟩}
17	13, 16	eqtr4di 2794	1 ⊢ (𝜑 → 𝐴 = {⟨𝑋, 𝑅⟩})

Syntax hints:   → wi 4   ↔ wb 208   = wceq 1548   ∈ wcel 2121  {csn 4557  ⟨cop 4563   Fn wfn 6483  ‘cfv 6488  (class class class)co 7359  1^st c1st 7931  2^nd c2nd 7932  Basecbs 17174   Nat cnat 17906  TermCatctermc 49974

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1975  ax-7 2016  ax-8 2123  ax-9 2131  ax-10 2154  ax-11 2170  ax-12 2191  ax-ext 2713  ax-rep 5201  ax-sep 5220  ax-nul 5230  ax-pow 5296  ax-pr 5364  ax-un 7681

This theorem depends on definitions:  df-bi 209  df-an 398  df-or 855  df-3an 1095  df-tru 1551  df-fal 1561  df-ex 1788  df-nf 1792  df-sb 2075  df-mo 2545  df-eu 2575  df-clab 2720  df-cleq 2733  df-clel 2816  df-nfc 2890  df-ne 2937  df-ral 3056  df-rex 3066  df-reu 3347  df-rab 3394  df-v 3435  df-sbc 3725  df-csb 3833  df-dif 3887  df-un 3889  df-in 3891  df-ss 3901  df-nul 4264  df-if 4457  df-pw 4533  df-sn 4558  df-pr 4560  df-op 4564  df-uni 4841  df-iun 4925  df-br 5075  df-opab 5137  df-mpt 5156  df-id 5515  df-xp 5626  df-rel 5627  df-cnv 5628  df-co 5629  df-dm 5630  df-rn 5631  df-res 5632  df-ima 5633  df-iota 6444  df-fun 6490  df-fn 6491  df-f 6492  df-f1 6493  df-fo 6494  df-f1o 6495  df-fv 6496  df-ov 7362  df-oprab 7363  df-mpo 7364  df-1st 7933  df-2nd 7934  df-ixp 8840  df-func 17820  df-nat 17908  df-termc 49975

This theorem is referenced by:  diag2f1olem  50038