Theorem setc1onsubc 50531

Description: Construct a category with one object and two morphisms and prove that category (SetCat‘1_o) satisfies all conditions for a subcategory but the compatibility of identity morphisms, showing the necessity of the latter condition in defining a subcategory. Exercise 4A of [Adamek] p. 58. (Contributed by Zhi Wang, 6-Nov-2025.)

Hypotheses

Ref	Expression
setc1onsubc.c	⊢ 𝐶 = {⟨(Base‘ndx), {∅}⟩, ⟨(Hom ‘ndx), {⟨∅, ∅, 2o⟩}⟩, ⟨(comp‘ndx), {⟨⟨∅, ∅⟩, ∅, · ⟩}⟩}
setc1onsubc.x	⊢ · = (𝑓 ∈ 2o, 𝑔 ∈ 2o ↦ (𝑓 ∩ 𝑔))
setc1onsubc.e	⊢ 𝐸 = (SetCat‘1o)
setc1onsubc.j	⊢ 𝐽 = (Homf ‘𝐸)
setc1onsubc.s	⊢ 𝑆 = 1o
setc1onsubc.h	⊢ 𝐻 = (Homf ‘𝐶)
setc1onsubc.i	⊢ 1 = (Id‘𝐶)
setc1onsubc.d	⊢ 𝐷 = (𝐶 ↾cat 𝐽)

Assertion

Ref	Expression
setc1onsubc	⊢ (𝐶 ∈ Cat ∧ 𝐽 Fn (𝑆 × 𝑆) ∧ (𝐽 ⊆cat 𝐻 ∧ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ∧ 𝐷 ∈ Cat))

Distinct variable group:   𝑓,𝑔

Allowed substitution hints:   𝐶(𝑥, 𝑓, 𝑔)   𝐷(𝑥, 𝑓, 𝑔)   𝑆(𝑥, 𝑓, 𝑔)   · (𝑥, 𝑓, 𝑔)   1 (𝑥, 𝑓, 𝑔)   𝐸(𝑥, 𝑓, 𝑔)   𝐻(𝑥, 𝑓, 𝑔)   𝐽(𝑥, 𝑓, 𝑔)

Proof of Theorem setc1onsubc

Dummy variables 𝑦 𝑎 𝑏 𝑐 𝑚 𝑛 𝑝 𝑞 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		0ss 4350	. . . 4 ⊢ ∅ ⊆ 1o
2		1oex 8468	. . . 4 ⊢ 1o ∈ V
3		setc1onsubc.c	. . . . 5 ⊢ 𝐶 = {⟨(Base‘ndx), {∅}⟩, ⟨(Hom ‘ndx), {⟨∅, ∅, 2o⟩}⟩, ⟨(comp‘ndx), {⟨⟨∅, ∅⟩, ∅, · ⟩}⟩}
4		df2o3 8466	. . . . 5 ⊢ 2o = {∅, 1o}
5		setc1onsubc.x	. . . . 5 ⊢ · = (𝑓 ∈ 2o, 𝑔 ∈ 2o ↦ (𝑓 ∩ 𝑔))
6	3, 4, 5	incat 50530	. . . 4 ⊢ ((∅ ⊆ 1o ∧ 1o ∈ V) → (𝐶 ∈ Cat ∧ (Id‘𝐶) = (𝑦 ∈ {∅} ↦ 1o)))
7	1, 2, 6	mp2an 705	. . 3 ⊢ (𝐶 ∈ Cat ∧ (Id‘𝐶) = (𝑦 ∈ {∅} ↦ 1o))
8	7	simpli 489	. 2 ⊢ 𝐶 ∈ Cat
9		setc1onsubc.j	. . 3 ⊢ 𝐽 = (Homf ‘𝐸)
10		setc1onsubc.s	. . . 4 ⊢ 𝑆 = 1o
11		setc1onsubc.e	. . . . 5 ⊢ 𝐸 = (SetCat‘1o)
12	11	setc1obas 50421	. . . 4 ⊢ 1o = (Base‘𝐸)
13	10, 12	eqtri 2783	. . 3 ⊢ 𝑆 = (Base‘𝐸)
14	9, 13	homffn 17784	. 2 ⊢ 𝐽 Fn (𝑆 × 𝑆)
15		ssid 3953	. . . 4 ⊢ {∅} ⊆ {∅}
16		snsspr1 4775	. . . . . 6 ⊢ {∅} ⊆ {∅, 1o}
17	11	setc1ohomfval 50422	. . . . . . . . 9 ⊢ {⟨∅, ∅, 1o⟩} = (Hom ‘𝐸)
18		0lt1o 8494	. . . . . . . . . 10 ⊢ ∅ ∈ 1o
19	18	a1i 11	. . . . . . . . 9 ⊢ (⊤ → ∅ ∈ 1o)
20	9, 12, 17, 19, 19	homfval 17783	. . . . . . . 8 ⊢ (⊤ → (∅𝐽∅) = (∅{⟨∅, ∅, 1o⟩}∅))
21	20	mptru 1577	. . . . . . 7 ⊢ (∅𝐽∅) = (∅{⟨∅, ∅, 1o⟩}∅)
22	2	ovsn2 49792	. . . . . . 7 ⊢ (∅{⟨∅, ∅, 1o⟩}∅) = 1o
23		df1o2 8465	. . . . . . 7 ⊢ 1o = {∅}
24	21, 22, 23	3eqtri 2787	. . . . . 6 ⊢ (∅𝐽∅) = {∅}
25		setc1onsubc.h	. . . . . . . . 9 ⊢ 𝐻 = (Homf ‘𝐶)
26		snex 5404	. . . . . . . . . 10 ⊢ {∅} ∈ V
27	3, 26	catbas 50155	. . . . . . . . 9 ⊢ {∅} = (Base‘𝐶)
28		snex 5404	. . . . . . . . . 10 ⊢ {⟨∅, ∅, 2o⟩} ∈ V
29	3, 28	cathomfval 50156	. . . . . . . . 9 ⊢ {⟨∅, ∅, 2o⟩} = (Hom ‘𝐶)
30		0ex 5264	. . . . . . . . . . 11 ⊢ ∅ ∈ V
31	30	snid 4623	. . . . . . . . . 10 ⊢ ∅ ∈ {∅}
32	31	a1i 11	. . . . . . . . 9 ⊢ (⊤ → ∅ ∈ {∅})
33	25, 27, 29, 32, 32	homfval 17783	. . . . . . . 8 ⊢ (⊤ → (∅𝐻∅) = (∅{⟨∅, ∅, 2o⟩}∅))
34	33	mptru 1577	. . . . . . 7 ⊢ (∅𝐻∅) = (∅{⟨∅, ∅, 2o⟩}∅)
35		2oex 8470	. . . . . . . 8 ⊢ 2o ∈ V
36	35	ovsn2 49792	. . . . . . 7 ⊢ (∅{⟨∅, ∅, 2o⟩}∅) = 2o
37	34, 36, 4	3eqtri 2787	. . . . . 6 ⊢ (∅𝐻∅) = {∅, 1o}
38	16, 24, 37	3sstr4i 3982	. . . . 5 ⊢ (∅𝐽∅) ⊆ (∅𝐻∅)
39		oveq1 7421	. . . . . . . . 9 ⊢ (𝑝 = ∅ → (𝑝𝐽𝑞) = (∅𝐽𝑞))
40		oveq1 7421	. . . . . . . . 9 ⊢ (𝑝 = ∅ → (𝑝𝐻𝑞) = (∅𝐻𝑞))
41	39, 40	sseq12d 3964	. . . . . . . 8 ⊢ (𝑝 = ∅ → ((𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞) ↔ (∅𝐽𝑞) ⊆ (∅𝐻𝑞)))
42	41	ralbidv 3185	. . . . . . 7 ⊢ (𝑝 = ∅ → (∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞) ↔ ∀𝑞 ∈ {∅} (∅𝐽𝑞) ⊆ (∅𝐻𝑞)))
43	30, 42	ralsn 4642	. . . . . 6 ⊢ (∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞) ↔ ∀𝑞 ∈ {∅} (∅𝐽𝑞) ⊆ (∅𝐻𝑞))
44		oveq2 7422	. . . . . . . 8 ⊢ (𝑞 = ∅ → (∅𝐽𝑞) = (∅𝐽∅))
45		oveq2 7422	. . . . . . . 8 ⊢ (𝑞 = ∅ → (∅𝐻𝑞) = (∅𝐻∅))
46	44, 45	sseq12d 3964	. . . . . . 7 ⊢ (𝑞 = ∅ → ((∅𝐽𝑞) ⊆ (∅𝐻𝑞) ↔ (∅𝐽∅) ⊆ (∅𝐻∅)))
47	30, 46	ralsn 4642	. . . . . 6 ⊢ (∀𝑞 ∈ {∅} (∅𝐽𝑞) ⊆ (∅𝐻𝑞) ↔ (∅𝐽∅) ⊆ (∅𝐻∅))
48	43, 47	bitri 278	. . . . 5 ⊢ (∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞) ↔ (∅𝐽∅) ⊆ (∅𝐻∅))
49	38, 48	mpbir 234	. . . 4 ⊢ ∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞)
50	23, 12	eqtr3i 2785	. . . . . . . 8 ⊢ {∅} = (Base‘𝐸)
51	9, 50	homffn 17784	. . . . . . 7 ⊢ 𝐽 Fn ({∅} × {∅})
52	51	a1i 11	. . . . . 6 ⊢ (⊤ → 𝐽 Fn ({∅} × {∅}))
53	25, 27	homffn 17784	. . . . . . 7 ⊢ 𝐻 Fn ({∅} × {∅})
54	53	a1i 11	. . . . . 6 ⊢ (⊤ → 𝐻 Fn ({∅} × {∅}))
55	26	a1i 11	. . . . . 6 ⊢ (⊤ → {∅} ∈ V)
56	52, 54, 55	isssc 17912	. . . . 5 ⊢ (⊤ → (𝐽 ⊆cat 𝐻 ↔ ({∅} ⊆ {∅} ∧ ∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞))))
57	56	mptru 1577	. . . 4 ⊢ (𝐽 ⊆cat 𝐻 ↔ ({∅} ⊆ {∅} ∧ ∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞)))
58	15, 49, 57	mpbir2an 724	. . 3 ⊢ 𝐽 ⊆cat 𝐻
59		1on 8471	. . . . . 6 ⊢ 1o ∈ On
60	23, 59	eqeltrri 2857	. . . . 5 ⊢ {∅} ∈ On
61	60	onirri 6472	. . . 4 ⊢ ¬ {∅} ∈ {∅}
62	10, 23	eqtri 2783	. . . . . 6 ⊢ 𝑆 = {∅}
63		biid 264	. . . . . 6 ⊢ (¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥))
64	62, 63	rexeqbii 3333	. . . . 5 ⊢ (∃𝑥 ∈ 𝑆 ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ∃𝑥 ∈ {∅} ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥))
65		rexnal 3114	. . . . 5 ⊢ (∃𝑥 ∈ 𝑆 ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥))
66		fveq2 6879	. . . . . . . . 9 ⊢ (𝑥 = ∅ → ( 1 ‘𝑥) = ( 1 ‘∅))
67	23	a1i 11	. . . . . . . . . . 11 ⊢ (𝑦 = ∅ → 1o = {∅})
68		setc1onsubc.i	. . . . . . . . . . . 12 ⊢ 1 = (Id‘𝐶)
69	7	simpri 491	. . . . . . . . . . . 12 ⊢ (Id‘𝐶) = (𝑦 ∈ {∅} ↦ 1o)
70	68, 69	eqtri 2783	. . . . . . . . . . 11 ⊢ 1 = (𝑦 ∈ {∅} ↦ 1o)
71	67, 70, 26	fvmpt 6987	. . . . . . . . . 10 ⊢ (∅ ∈ {∅} → ( 1 ‘∅) = {∅})
72	31, 71	ax-mp 5	. . . . . . . . 9 ⊢ ( 1 ‘∅) = {∅}
73	66, 72	eqtrdi 2811	. . . . . . . 8 ⊢ (𝑥 = ∅ → ( 1 ‘𝑥) = {∅})
74		oveq12 7423	. . . . . . . . . 10 ⊢ ((𝑥 = ∅ ∧ 𝑥 = ∅) → (𝑥𝐽𝑥) = (∅𝐽∅))
75	74	anidms 577	. . . . . . . . 9 ⊢ (𝑥 = ∅ → (𝑥𝐽𝑥) = (∅𝐽∅))
76	75, 24	eqtrdi 2811	. . . . . . . 8 ⊢ (𝑥 = ∅ → (𝑥𝐽𝑥) = {∅})
77	73, 76	eleq12d 2854	. . . . . . 7 ⊢ (𝑥 = ∅ → (( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ {∅} ∈ {∅}))
78	77	notbid 321	. . . . . 6 ⊢ (𝑥 = ∅ → (¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ¬ {∅} ∈ {∅}))
79	30, 78	rexsn 4643	. . . . 5 ⊢ (∃𝑥 ∈ {∅} ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ¬ {∅} ∈ {∅})
80	64, 65, 79	3bitr3ri 305	. . . 4 ⊢ (¬ {∅} ∈ {∅} ↔ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥))
81	61, 80	mpbi 233	. . 3 ⊢ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥)
82		setc1oterm 50420	. . . . . . . 8 ⊢ (SetCat‘1o) ∈ TermCat
83	82	a1i 11	. . . . . . 7 ⊢ (⊤ → (SetCat‘1o) ∈ TermCat)
84	83	termccd 50408	. . . . . 6 ⊢ (⊤ → (SetCat‘1o) ∈ Cat)
85	84	mptru 1577	. . . . 5 ⊢ (SetCat‘1o) ∈ Cat
86	11, 85	eqeltri 2856	. . . 4 ⊢ 𝐸 ∈ Cat
87		setc1onsubc.d	. . . . . 6 ⊢ 𝐷 = (𝐶 ↾cat 𝐽)
88		snex 5404	. . . . . . 7 ⊢ {⟨⟨∅, ∅⟩, ∅, · ⟩} ∈ V
89	3, 88	catcofval 50157	. . . . . 6 ⊢ {⟨⟨∅, ∅⟩, ∅, · ⟩} = (comp‘𝐶)
90	11	setc1ocofval 50423	. . . . . 6 ⊢ {⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩} = (comp‘𝐸)
91		velsn 4600	. . . . . . . . . . 11 ⊢ (𝑎 ∈ {∅} ↔ 𝑎 = ∅)
92		velsn 4600	. . . . . . . . . . 11 ⊢ (𝑏 ∈ {∅} ↔ 𝑏 = ∅)
93		velsn 4600	. . . . . . . . . . 11 ⊢ (𝑐 ∈ {∅} ↔ 𝑐 = ∅)
94	91, 92, 93	3anbi123i 1173	. . . . . . . . . 10 ⊢ ((𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅}) ↔ (𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅))
95	94	anbi1i 636	. . . . . . . . 9 ⊢ (((𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅}) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) ↔ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))))
96		simp1 1154	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → 𝑎 = ∅)
97		simp2 1155	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → 𝑏 = ∅)
98	96, 97	oveq12d 7432	. . . . . . . . . . . . . 14 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑎𝐽𝑏) = (∅𝐽∅))
99	98, 24	eqtrdi 2811	. . . . . . . . . . . . 13 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑎𝐽𝑏) = {∅})
100	99	eleq2d 2846	. . . . . . . . . . . 12 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑚 ∈ (𝑎𝐽𝑏) ↔ 𝑚 ∈ {∅}))
101		velsn 4600	. . . . . . . . . . . 12 ⊢ (𝑚 ∈ {∅} ↔ 𝑚 = ∅)
102	100, 101	bitrdi 290	. . . . . . . . . . 11 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑚 ∈ (𝑎𝐽𝑏) ↔ 𝑚 = ∅))
103		simp3 1156	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → 𝑐 = ∅)
104	97, 103	oveq12d 7432	. . . . . . . . . . . . . 14 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑏𝐽𝑐) = (∅𝐽∅))
105	104, 24	eqtrdi 2811	. . . . . . . . . . . . 13 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑏𝐽𝑐) = {∅})
106	105	eleq2d 2846	. . . . . . . . . . . 12 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑛 ∈ (𝑏𝐽𝑐) ↔ 𝑛 ∈ {∅}))
107		velsn 4600	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ {∅} ↔ 𝑛 = ∅)
108	106, 107	bitrdi 290	. . . . . . . . . . 11 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑛 ∈ (𝑏𝐽𝑐) ↔ 𝑛 = ∅))
109	102, 108	anbi12d 644	. . . . . . . . . 10 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → ((𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐)) ↔ (𝑚 = ∅ ∧ 𝑛 = ∅)))
110	109	pm5.32i 585	. . . . . . . . 9 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) ↔ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)))
111	95, 110	bitri 278	. . . . . . . 8 ⊢ (((𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅}) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) ↔ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)))
112	30	prid1 4723	. . . . . . . . . . . 12 ⊢ ∅ ∈ {∅, 1o}
113	112, 4	eleqtrri 2859	. . . . . . . . . . 11 ⊢ ∅ ∈ 2o
114		ineq12 4161	. . . . . . . . . . . . 13 ⊢ ((𝑓 = ∅ ∧ 𝑔 = ∅) → (𝑓 ∩ 𝑔) = (∅ ∩ ∅))
115		0in 4347	. . . . . . . . . . . . 13 ⊢ (∅ ∩ ∅) = ∅
116	114, 115	eqtrdi 2811	. . . . . . . . . . . 12 ⊢ ((𝑓 = ∅ ∧ 𝑔 = ∅) → (𝑓 ∩ 𝑔) = ∅)
117	116, 5, 30	ovmpoa 7569	. . . . . . . . . . 11 ⊢ ((∅ ∈ 2o ∧ ∅ ∈ 2o) → (∅ · ∅) = ∅)
118	113, 113, 117	mp2an 705	. . . . . . . . . 10 ⊢ (∅ · ∅) = ∅
119	30	ovsn2 49792	. . . . . . . . . 10 ⊢ (∅{⟨∅, ∅, ∅⟩}∅) = ∅
120	118, 119	eqtr4i 2786	. . . . . . . . 9 ⊢ (∅ · ∅) = (∅{⟨∅, ∅, ∅⟩}∅)
121		simpl1 1210	. . . . . . . . . . . . 13 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑎 = ∅)
122		simpl2 1211	. . . . . . . . . . . . 13 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑏 = ∅)
123	121, 122	opeq12d 4841	. . . . . . . . . . . 12 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → ⟨𝑎, 𝑏⟩ = ⟨∅, ∅⟩)
124		simpl3 1212	. . . . . . . . . . . 12 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑐 = ∅)
125	123, 124	oveq12d 7432	. . . . . . . . . . 11 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐) = (⟨∅, ∅⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}∅))
126	35, 35	mpoex 8079	. . . . . . . . . . . . 13 ⊢ (𝑓 ∈ 2o, 𝑔 ∈ 2o ↦ (𝑓 ∩ 𝑔)) ∈ V
127	5, 126	eqeltri 2856	. . . . . . . . . . . 12 ⊢ · ∈ V
128	127	ovsn2 49792	. . . . . . . . . . 11 ⊢ (⟨∅, ∅⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}∅) = ·
129	125, 128	eqtrdi 2811	. . . . . . . . . 10 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐) = · )
130		simprr 785	. . . . . . . . . 10 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑛 = ∅)
131		simprl 783	. . . . . . . . . 10 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑚 = ∅)
132	129, 130, 131	oveq123d 7435	. . . . . . . . 9 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐)𝑚) = (∅ · ∅))
133	123, 124	oveq12d 7432	. . . . . . . . . . 11 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐) = (⟨∅, ∅⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}∅))
134		snex 5404	. . . . . . . . . . . 12 ⊢ {⟨∅, ∅, ∅⟩} ∈ V
135	134	ovsn2 49792	. . . . . . . . . . 11 ⊢ (⟨∅, ∅⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}∅) = {⟨∅, ∅, ∅⟩}
136	133, 135	eqtrdi 2811	. . . . . . . . . 10 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐) = {⟨∅, ∅, ∅⟩})
137	136, 130, 131	oveq123d 7435	. . . . . . . . 9 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐)𝑚) = (∅{⟨∅, ∅, ∅⟩}∅))
138	120, 132, 137	3eqtr4a 2821	. . . . . . . 8 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐)𝑚) = (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐)𝑚))
139	111, 138	sylbi 220	. . . . . . 7 ⊢ (((𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅}) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐)𝑚) = (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐)𝑚))
140	139	adantll 727	. . . . . 6 ⊢ (((⊤ ∧ (𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅})) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐)𝑚) = (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐)𝑚))
141	86	a1i 11	. . . . . 6 ⊢ (⊤ → 𝐸 ∈ Cat)
142	15	a1i 11	. . . . . 6 ⊢ (⊤ → {∅} ⊆ {∅})
143	87, 27, 50, 9, 89, 90, 140, 141, 142	resccat 50003	. . . . 5 ⊢ (⊤ → (𝐷 ∈ Cat ↔ 𝐸 ∈ Cat))
144	143	mptru 1577	. . . 4 ⊢ (𝐷 ∈ Cat ↔ 𝐸 ∈ Cat)
145	86, 144	mpbir 234	. . 3 ⊢ 𝐷 ∈ Cat
146	58, 81, 145	3pm3.2i 1358	. 2 ⊢ (𝐽 ⊆cat 𝐻 ∧ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ∧ 𝐷 ∈ Cat)
147	8, 14, 146	3pm3.2i 1358	1 ⊢ (𝐶 ∈ Cat ∧ 𝐽 Fn (𝑆 × 𝑆) ∧ (𝐽 ⊆cat 𝐻 ∧ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ∧ 𝐷 ∈ Cat))

This proof depends on syntax axioms:  ¬ wn 3   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570  ⊤wtru 1571   ∈ wcel 2145  ∀wral 3076  ∃wrex 3086  Vcvv 3450   ∩ cin 3898   ⊆ wss 3899  ∅c0 4279  {csn 4584  {cpr 4586  {ctp 4588  ⟨cop 4590  ⟨cotp 4592   class class class wbr 5103   ↦ cmpt 5186   × cxp 5653  Oncon0 6357   Fn wfn 6528  ‘cfv 6533  (class class class)co 7414   ∈ cmpo 7416  1_oc1o 8451  2_oc2o 8452  ndxcnx 17288  Basecbs 17304  Hom chom 17356  compcco 17357  Catccat 17755  Idccid 17756  Hom_f chomf 17757   ⊆_cat cssc 17899   ↾_cat cresc 17900  SetCatcsetc 18167  TermCatctermc 50401

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7737  ax-cnex 11183  ax-resscn 11184  ax-1cn 11185  ax-icn 11186  ax-addcl 11187  ax-addrcl 11188  ax-mulcl 11189  ax-mulrcl 11190  ax-mulcom 11191  ax-addass 11192  ax-mulass 11193  ax-distr 11194  ax-i2m1 11195  ax-1ne0 11196  ax-1rid 11197  ax-rnegex 11198  ax-rrecex 11199  ax-cnre 11200  ax-pre-lttri 11201  ax-pre-lttrn 11202  ax-pre-ltadd 11203  ax-pre-mulgt0 11204

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-ot 4593  df-uni 4868  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6299  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-riota 7371  df-ov 7417  df-oprab 7418  df-mpo 7419  df-om 7864  df-1st 7987  df-2nd 7988  df-frecs 8281  df-wrecs 8312  df-recs 8361  df-rdg 8400  df-1o 8458  df-2o 8459  df-er 8699  df-map 8831  df-ixp 8908  df-en 8956  df-dom 8957  df-sdom 8958  df-fin 8959  df-pnf 11272  df-mnf 11273  df-xr 11274  df-ltxr 11275  df-le 11276  df-sub 11470  df-neg 11471  df-nn 12261  df-2 12330  df-3 12331  df-4 12332  df-5 12333  df-6 12334  df-7 12335  df-8 12336  df-9 12337  df-n0 12532  df-z 12619  df-dec 12740  df-uz 12891  df-fz 13565  df-struct 17242  df-sets 17259  df-slot 17277  df-ndx 17289  df-base 17305  df-ress 17326  df-hom 17369  df-cco 17370  df-cat 17759  df-cid 17760  df-homf 17761  df-comf 17762  df-ssc 17902  df-resc 17903  df-setc 18168  df-thinc 50347  df-termc 50402

This theorem is used by:  cnelsubc  50533