Theorem setc1onsubc 50224

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 4355	. . . 4 ⊢ ∅ ⊆ 1o
2		1oex 8448	. . . 4 ⊢ 1o ∈ V
3		setc1onsubc.c	. . . . 5 ⊢ 𝐶 = {⟨(Base‘ndx), {∅}⟩, ⟨(Hom ‘ndx), {⟨∅, ∅, 2o⟩}⟩, ⟨(comp‘ndx), {⟨⟨∅, ∅⟩, ∅, · ⟩}⟩}
4		df2o3 8446	. . . . 5 ⊢ 2o = {∅, 1o}
5		setc1onsubc.x	. . . . 5 ⊢ · = (𝑓 ∈ 2o, 𝑔 ∈ 2o ↦ (𝑓 ∩ 𝑔))
6	3, 4, 5	incat 50223	. . . 4 ⊢ ((∅ ⊆ 1o ∧ 1o ∈ V) → (𝐶 ∈ Cat ∧ (Id‘𝐶) = (𝑦 ∈ {∅} ↦ 1o)))
7	1, 2, 6	mp2an 702	. . 3 ⊢ (𝐶 ∈ Cat ∧ (Id‘𝐶) = (𝑦 ∈ {∅} ↦ 1o))
8	7	simpli 487	. 2 ⊢ 𝐶 ∈ Cat
9		setc1onsubc.j	. . 3 ⊢ 𝐽 = (Homf ‘𝐸)
10		setc1onsubc.s	. . . 4 ⊢ 𝑆 = 1o
11		setc1onsubc.e	. . . . 5 ⊢ 𝐸 = (SetCat‘1o)
12	11	setc1obas 50114	. . . 4 ⊢ 1o = (Base‘𝐸)
13	10, 12	eqtri 2786	. . 3 ⊢ 𝑆 = (Base‘𝐸)
14	9, 13	homffn 17726	. 2 ⊢ 𝐽 Fn (𝑆 × 𝑆)
15		ssid 3959	. . . 4 ⊢ {∅} ⊆ {∅}
16		snsspr1 4773	. . . . . 6 ⊢ {∅} ⊆ {∅, 1o}
17	11	setc1ohomfval 50115	. . . . . . . . 9 ⊢ {⟨∅, ∅, 1o⟩} = (Hom ‘𝐸)
18		0lt1o 8474	. . . . . . . . . 10 ⊢ ∅ ∈ 1o
19	18	a1i 11	. . . . . . . . 9 ⊢ (⊤ → ∅ ∈ 1o)
20	9, 12, 17, 19, 19	homfval 17725	. . . . . . . 8 ⊢ (⊤ → (∅𝐽∅) = (∅{⟨∅, ∅, 1o⟩}∅))
21	20	mptru 1568	. . . . . . 7 ⊢ (∅𝐽∅) = (∅{⟨∅, ∅, 1o⟩}∅)
22	2	ovsn2 49483	. . . . . . 7 ⊢ (∅{⟨∅, ∅, 1o⟩}∅) = 1o
23		df1o2 8445	. . . . . . 7 ⊢ 1o = {∅}
24	21, 22, 23	3eqtri 2790	. . . . . 6 ⊢ (∅𝐽∅) = {∅}
25		setc1onsubc.h	. . . . . . . . 9 ⊢ 𝐻 = (Homf ‘𝐶)
26		snex 5397	. . . . . . . . . 10 ⊢ {∅} ∈ V
27	3, 26	catbas 49848	. . . . . . . . 9 ⊢ {∅} = (Base‘𝐶)
28		snex 5397	. . . . . . . . . 10 ⊢ {⟨∅, ∅, 2o⟩} ∈ V
29	3, 28	cathomfval 49849	. . . . . . . . 9 ⊢ {⟨∅, ∅, 2o⟩} = (Hom ‘𝐶)
30		0ex 5258	. . . . . . . . . . 11 ⊢ ∅ ∈ V
31	30	snid 4622	. . . . . . . . . 10 ⊢ ∅ ∈ {∅}
32	31	a1i 11	. . . . . . . . 9 ⊢ (⊤ → ∅ ∈ {∅})
33	25, 27, 29, 32, 32	homfval 17725	. . . . . . . 8 ⊢ (⊤ → (∅𝐻∅) = (∅{⟨∅, ∅, 2o⟩}∅))
34	33	mptru 1568	. . . . . . 7 ⊢ (∅𝐻∅) = (∅{⟨∅, ∅, 2o⟩}∅)
35		2oex 8450	. . . . . . . 8 ⊢ 2o ∈ V
36	35	ovsn2 49483	. . . . . . 7 ⊢ (∅{⟨∅, ∅, 2o⟩}∅) = 2o
37	34, 36, 4	3eqtri 2790	. . . . . 6 ⊢ (∅𝐻∅) = {∅, 1o}
38	16, 24, 37	3sstr4i 3988	. . . . 5 ⊢ (∅𝐽∅) ⊆ (∅𝐻∅)
39		oveq1 7404	. . . . . . . . 9 ⊢ (𝑝 = ∅ → (𝑝𝐽𝑞) = (∅𝐽𝑞))
40		oveq1 7404	. . . . . . . . 9 ⊢ (𝑝 = ∅ → (𝑝𝐻𝑞) = (∅𝐻𝑞))
41	39, 40	sseq12d 3970	. . . . . . . 8 ⊢ (𝑝 = ∅ → ((𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞) ↔ (∅𝐽𝑞) ⊆ (∅𝐻𝑞)))
42	41	ralbidv 3186	. . . . . . 7 ⊢ (𝑝 = ∅ → (∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞) ↔ ∀𝑞 ∈ {∅} (∅𝐽𝑞) ⊆ (∅𝐻𝑞)))
43	30, 42	ralsn 4641	. . . . . 6 ⊢ (∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞) ↔ ∀𝑞 ∈ {∅} (∅𝐽𝑞) ⊆ (∅𝐻𝑞))
44		oveq2 7405	. . . . . . . 8 ⊢ (𝑞 = ∅ → (∅𝐽𝑞) = (∅𝐽∅))
45		oveq2 7405	. . . . . . . 8 ⊢ (𝑞 = ∅ → (∅𝐻𝑞) = (∅𝐻∅))
46	44, 45	sseq12d 3970	. . . . . . 7 ⊢ (𝑞 = ∅ → ((∅𝐽𝑞) ⊆ (∅𝐻𝑞) ↔ (∅𝐽∅) ⊆ (∅𝐻∅)))
47	30, 46	ralsn 4641	. . . . . 6 ⊢ (∀𝑞 ∈ {∅} (∅𝐽𝑞) ⊆ (∅𝐻𝑞) ↔ (∅𝐽∅) ⊆ (∅𝐻∅))
48	43, 47	bitri 277	. . . . 5 ⊢ (∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞) ↔ (∅𝐽∅) ⊆ (∅𝐻∅))
49	38, 48	mpbir 233	. . . 4 ⊢ ∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞)
50	23, 12	eqtr3i 2788	. . . . . . . 8 ⊢ {∅} = (Base‘𝐸)
51	9, 50	homffn 17726	. . . . . . 7 ⊢ 𝐽 Fn ({∅} × {∅})
52	51	a1i 11	. . . . . 6 ⊢ (⊤ → 𝐽 Fn ({∅} × {∅}))
53	25, 27	homffn 17726	. . . . . . 7 ⊢ 𝐻 Fn ({∅} × {∅})
54	53	a1i 11	. . . . . 6 ⊢ (⊤ → 𝐻 Fn ({∅} × {∅}))
55	26	a1i 11	. . . . . 6 ⊢ (⊤ → {∅} ∈ V)
56	52, 54, 55	isssc 17854	. . . . 5 ⊢ (⊤ → (𝐽 ⊆cat 𝐻 ↔ ({∅} ⊆ {∅} ∧ ∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞))))
57	56	mptru 1568	. . . 4 ⊢ (𝐽 ⊆cat 𝐻 ↔ ({∅} ⊆ {∅} ∧ ∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞)))
58	15, 49, 57	mpbir2an 721	. . 3 ⊢ 𝐽 ⊆cat 𝐻
59		1on 8451	. . . . . 6 ⊢ 1o ∈ On
60	23, 59	eqeltrri 2860	. . . . 5 ⊢ {∅} ∈ On
61	60	onirri 6461	. . . 4 ⊢ ¬ {∅} ∈ {∅}
62	10, 23	eqtri 2786	. . . . . 6 ⊢ 𝑆 = {∅}
63		biid 263	. . . . . 6 ⊢ (¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥))
64	62, 63	rexeqbii 3336	. . . . 5 ⊢ (∃𝑥 ∈ 𝑆 ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ∃𝑥 ∈ {∅} ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥))
65		rexnal 3115	. . . . 5 ⊢ (∃𝑥 ∈ 𝑆 ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥))
66		fveq2 6868	. . . . . . . . 9 ⊢ (𝑥 = ∅ → ( 1 ‘𝑥) = ( 1 ‘∅))
67	23	a1i 11	. . . . . . . . . . 11 ⊢ (𝑦 = ∅ → 1o = {∅})
68		setc1onsubc.i	. . . . . . . . . . . 12 ⊢ 1 = (Id‘𝐶)
69	7	simpri 489	. . . . . . . . . . . 12 ⊢ (Id‘𝐶) = (𝑦 ∈ {∅} ↦ 1o)
70	68, 69	eqtri 2786	. . . . . . . . . . 11 ⊢ 1 = (𝑦 ∈ {∅} ↦ 1o)
71	67, 70, 26	fvmpt 6976	. . . . . . . . . 10 ⊢ (∅ ∈ {∅} → ( 1 ‘∅) = {∅})
72	31, 71	ax-mp 5	. . . . . . . . 9 ⊢ ( 1 ‘∅) = {∅}
73	66, 72	eqtrdi 2814	. . . . . . . 8 ⊢ (𝑥 = ∅ → ( 1 ‘𝑥) = {∅})
74		oveq12 7406	. . . . . . . . . 10 ⊢ ((𝑥 = ∅ ∧ 𝑥 = ∅) → (𝑥𝐽𝑥) = (∅𝐽∅))
75	74	anidms 574	. . . . . . . . 9 ⊢ (𝑥 = ∅ → (𝑥𝐽𝑥) = (∅𝐽∅))
76	75, 24	eqtrdi 2814	. . . . . . . 8 ⊢ (𝑥 = ∅ → (𝑥𝐽𝑥) = {∅})
77	73, 76	eleq12d 2857	. . . . . . 7 ⊢ (𝑥 = ∅ → (( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ {∅} ∈ {∅}))
78	77	notbid 320	. . . . . 6 ⊢ (𝑥 = ∅ → (¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ¬ {∅} ∈ {∅}))
79	30, 78	rexsn 4642	. . . . 5 ⊢ (∃𝑥 ∈ {∅} ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ¬ {∅} ∈ {∅})
80	64, 65, 79	3bitr3ri 304	. . . 4 ⊢ (¬ {∅} ∈ {∅} ↔ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥))
81	61, 80	mpbi 232	. . 3 ⊢ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥)
82		setc1oterm 50113	. . . . . . . 8 ⊢ (SetCat‘1o) ∈ TermCat
83	82	a1i 11	. . . . . . 7 ⊢ (⊤ → (SetCat‘1o) ∈ TermCat)
84	83	termccd 50101	. . . . . 6 ⊢ (⊤ → (SetCat‘1o) ∈ Cat)
85	84	mptru 1568	. . . . 5 ⊢ (SetCat‘1o) ∈ Cat
86	11, 85	eqeltri 2859	. . . 4 ⊢ 𝐸 ∈ Cat
87		setc1onsubc.d	. . . . . 6 ⊢ 𝐷 = (𝐶 ↾cat 𝐽)
88		snex 5397	. . . . . . 7 ⊢ {⟨⟨∅, ∅⟩, ∅, · ⟩} ∈ V
89	3, 88	catcofval 49850	. . . . . 6 ⊢ {⟨⟨∅, ∅⟩, ∅, · ⟩} = (comp‘𝐶)
90	11	setc1ocofval 50116	. . . . . 6 ⊢ {⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩} = (comp‘𝐸)
91		velsn 4599	. . . . . . . . . . 11 ⊢ (𝑎 ∈ {∅} ↔ 𝑎 = ∅)
92		velsn 4599	. . . . . . . . . . 11 ⊢ (𝑏 ∈ {∅} ↔ 𝑏 = ∅)
93		velsn 4599	. . . . . . . . . . 11 ⊢ (𝑐 ∈ {∅} ↔ 𝑐 = ∅)
94	91, 92, 93	3anbi123i 1169	. . . . . . . . . 10 ⊢ ((𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅}) ↔ (𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅))
95	94	anbi1i 633	. . . . . . . . 9 ⊢ (((𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅}) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) ↔ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))))
96		simp1 1150	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → 𝑎 = ∅)
97		simp2 1151	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → 𝑏 = ∅)
98	96, 97	oveq12d 7415	. . . . . . . . . . . . . 14 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑎𝐽𝑏) = (∅𝐽∅))
99	98, 24	eqtrdi 2814	. . . . . . . . . . . . 13 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑎𝐽𝑏) = {∅})
100	99	eleq2d 2849	. . . . . . . . . . . 12 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑚 ∈ (𝑎𝐽𝑏) ↔ 𝑚 ∈ {∅}))
101		velsn 4599	. . . . . . . . . . . 12 ⊢ (𝑚 ∈ {∅} ↔ 𝑚 = ∅)
102	100, 101	bitrdi 289	. . . . . . . . . . 11 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑚 ∈ (𝑎𝐽𝑏) ↔ 𝑚 = ∅))
103		simp3 1152	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → 𝑐 = ∅)
104	97, 103	oveq12d 7415	. . . . . . . . . . . . . 14 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑏𝐽𝑐) = (∅𝐽∅))
105	104, 24	eqtrdi 2814	. . . . . . . . . . . . 13 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑏𝐽𝑐) = {∅})
106	105	eleq2d 2849	. . . . . . . . . . . 12 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑛 ∈ (𝑏𝐽𝑐) ↔ 𝑛 ∈ {∅}))
107		velsn 4599	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ {∅} ↔ 𝑛 = ∅)
108	106, 107	bitrdi 289	. . . . . . . . . . 11 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑛 ∈ (𝑏𝐽𝑐) ↔ 𝑛 = ∅))
109	102, 108	anbi12d 641	. . . . . . . . . 10 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → ((𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐)) ↔ (𝑚 = ∅ ∧ 𝑛 = ∅)))
110	109	pm5.32i 582	. . . . . . . . 9 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) ↔ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)))
111	95, 110	bitri 277	. . . . . . . 8 ⊢ (((𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅}) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) ↔ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)))
112	30	prid1 4722	. . . . . . . . . . . 12 ⊢ ∅ ∈ {∅, 1o}
113	112, 4	eleqtrri 2862	. . . . . . . . . . 11 ⊢ ∅ ∈ 2o
114		ineq12 4168	. . . . . . . . . . . . 13 ⊢ ((𝑓 = ∅ ∧ 𝑔 = ∅) → (𝑓 ∩ 𝑔) = (∅ ∩ ∅))
115		0in 4352	. . . . . . . . . . . . 13 ⊢ (∅ ∩ ∅) = ∅
116	114, 115	eqtrdi 2814	. . . . . . . . . . . 12 ⊢ ((𝑓 = ∅ ∧ 𝑔 = ∅) → (𝑓 ∩ 𝑔) = ∅)
117	116, 5, 30	ovmpoa 7552	. . . . . . . . . . 11 ⊢ ((∅ ∈ 2o ∧ ∅ ∈ 2o) → (∅ · ∅) = ∅)
118	113, 113, 117	mp2an 702	. . . . . . . . . 10 ⊢ (∅ · ∅) = ∅
119	30	ovsn2 49483	. . . . . . . . . 10 ⊢ (∅{⟨∅, ∅, ∅⟩}∅) = ∅
120	118, 119	eqtr4i 2789	. . . . . . . . 9 ⊢ (∅ · ∅) = (∅{⟨∅, ∅, ∅⟩}∅)
121		simpl1 1206	. . . . . . . . . . . . 13 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑎 = ∅)
122		simpl2 1207	. . . . . . . . . . . . 13 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑏 = ∅)
123	121, 122	opeq12d 4840	. . . . . . . . . . . 12 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → ⟨𝑎, 𝑏⟩ = ⟨∅, ∅⟩)
124		simpl3 1208	. . . . . . . . . . . 12 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑐 = ∅)
125	123, 124	oveq12d 7415	. . . . . . . . . . 11 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐) = (⟨∅, ∅⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}∅))
126	35, 35	mpoex 8061	. . . . . . . . . . . . 13 ⊢ (𝑓 ∈ 2o, 𝑔 ∈ 2o ↦ (𝑓 ∩ 𝑔)) ∈ V
127	5, 126	eqeltri 2859	. . . . . . . . . . . 12 ⊢ · ∈ V
128	127	ovsn2 49483	. . . . . . . . . . 11 ⊢ (⟨∅, ∅⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}∅) = ·
129	125, 128	eqtrdi 2814	. . . . . . . . . 10 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐) = · )
130		simprr 782	. . . . . . . . . 10 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑛 = ∅)
131		simprl 780	. . . . . . . . . 10 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑚 = ∅)
132	129, 130, 131	oveq123d 7418	. . . . . . . . 9 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐)𝑚) = (∅ · ∅))
133	123, 124	oveq12d 7415	. . . . . . . . . . 11 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐) = (⟨∅, ∅⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}∅))
134		snex 5397	. . . . . . . . . . . 12 ⊢ {⟨∅, ∅, ∅⟩} ∈ V
135	134	ovsn2 49483	. . . . . . . . . . 11 ⊢ (⟨∅, ∅⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}∅) = {⟨∅, ∅, ∅⟩}
136	133, 135	eqtrdi 2814	. . . . . . . . . 10 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐) = {⟨∅, ∅, ∅⟩})
137	136, 130, 131	oveq123d 7418	. . . . . . . . 9 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐)𝑚) = (∅{⟨∅, ∅, ∅⟩}∅))
138	120, 132, 137	3eqtr4a 2824	. . . . . . . 8 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐)𝑚) = (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐)𝑚))
139	111, 138	sylbi 219	. . . . . . 7 ⊢ (((𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅}) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐)𝑚) = (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐)𝑚))
140	139	adantll 724	. . . . . 6 ⊢ (((⊤ ∧ (𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅})) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐)𝑚) = (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐)𝑚))
141	86	a1i 11	. . . . . 6 ⊢ (⊤ → 𝐸 ∈ Cat)
142	15	a1i 11	. . . . . 6 ⊢ (⊤ → {∅} ⊆ {∅})
143	87, 27, 50, 9, 89, 90, 140, 141, 142	resccat 49696	. . . . 5 ⊢ (⊤ → (𝐷 ∈ Cat ↔ 𝐸 ∈ Cat))
144	143	mptru 1568	. . . 4 ⊢ (𝐷 ∈ Cat ↔ 𝐸 ∈ Cat)
145	86, 144	mpbir 233	. . 3 ⊢ 𝐷 ∈ Cat
146	58, 81, 145	3pm3.2i 1354	. 2 ⊢ (𝐽 ⊆cat 𝐻 ∧ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ∧ 𝐷 ∈ Cat)
147	8, 14, 146	3pm3.2i 1354	1 ⊢ (𝐶 ∈ Cat ∧ 𝐽 Fn (𝑆 × 𝑆) ∧ (𝐽 ⊆cat 𝐻 ∧ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ∧ 𝐷 ∈ Cat))

Syntax hints:  ¬ wn 3   ↔ wb 208   ∧ wa 399   ∧ w3a 1099   = wceq 1561  ⊤wtru 1562   ∈ wcel 2143  ∀wral 3077  ∃wrex 3087  Vcvv 3455   ∩ cin 3904   ⊆ wss 3905  ∅c0 4286  {csn 4583  {cpr 4585  {ctp 4587  ⟨cop 4589  ⟨cotp 4591   class class class wbr 5101   ↦ cmpt 5182   × cxp 5646  Oncon0 6347   Fn wfn 6517  ‘cfv 6522  (class class class)co 7397   ∈ cmpo 7399  1_oc1o 8431  2_oc2o 8432  ndxcnx 17230  Basecbs 17246  Hom chom 17298  compcco 17299  Catccat 17697  Idccid 17698  Hom_f chomf 17699   ⊆_cat cssc 17841   ↾_cat cresc 17842  SetCatcsetc 18109  TermCatctermc 50094

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1816  ax-4 1830  ax-5 1931  ax-6 1988  ax-7 2029  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5228  ax-sep 5247  ax-nul 5257  ax-pow 5323  ax-pr 5391  ax-un 7719  ax-cnex 11130  ax-resscn 11131  ax-1cn 11132  ax-icn 11133  ax-addcl 11134  ax-addrcl 11135  ax-mulcl 11136  ax-mulrcl 11137  ax-mulcom 11138  ax-addass 11139  ax-mulass 11140  ax-distr 11141  ax-i2m1 11142  ax-1ne0 11143  ax-1rid 11144  ax-rnegex 11145  ax-rrecex 11146  ax-cnre 11147  ax-pre-lttri 11148  ax-pre-lttrn 11149  ax-pre-ltadd 11150  ax-pre-mulgt0 11151

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1100  df-3an 1101  df-tru 1564  df-fal 1574  df-ex 1801  df-nf 1805  df-sb 2092  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3368  df-reu 3369  df-rab 3416  df-v 3457  df-sbc 3746  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-tp 4588  df-op 4590  df-ot 4592  df-uni 4867  df-iun 4952  df-br 5102  df-opab 5164  df-mpt 5183  df-tr 5209  df-id 5543  df-eprel 5548  df-po 5556  df-so 5557  df-fr 5601  df-we 5603  df-xp 5654  df-rel 5655  df-cnv 5656  df-co 5657  df-dm 5658  df-rn 5659  df-res 5660  df-ima 5661  df-pred 6289  df-ord 6350  df-on 6351  df-lim 6352  df-suc 6353  df-iota 6478  df-fun 6524  df-fn 6525  df-f 6526  df-f1 6527  df-fo 6528  df-f1o 6529  df-fv 6530  df-riota 7354  df-ov 7400  df-oprab 7401  df-mpo 7402  df-om 7848  df-1st 7971  df-2nd 7972  df-frecs 8263  df-wrecs 8294  df-recs 8343  df-rdg 8382  df-1o 8438  df-2o 8439  df-er 8679  df-map 8811  df-ixp 8881  df-en 8929  df-dom 8930  df-sdom 8931  df-fin 8932  df-pnf 11219  df-mnf 11220  df-xr 11221  df-ltxr 11222  df-le 11223  df-sub 11417  df-neg 11418  df-nn 12212  df-2 12281  df-3 12282  df-4 12283  df-5 12284  df-6 12285  df-7 12286  df-8 12287  df-9 12288  df-n0 12483  df-z 12570  df-dec 12690  df-uz 12841  df-fz 13514  df-struct 17184  df-sets 17201  df-slot 17219  df-ndx 17231  df-base 17247  df-ress 17268  df-hom 17311  df-cco 17312  df-cat 17701  df-cid 17702  df-homf 17703  df-comf 17704  df-ssc 17844  df-resc 17845  df-setc 18110  df-thinc 50040  df-termc 50095

This theorem is referenced by:  cnelsubc  50226