Theorem setc1onsubc 49965

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 4354	. . . 4 ⊢ ∅ ⊆ 1o
2		1oex 8417	. . . 4 ⊢ 1o ∈ V
3		setc1onsubc.c	. . . . 5 ⊢ 𝐶 = {⟨(Base‘ndx), {∅}⟩, ⟨(Hom ‘ndx), {⟨∅, ∅, 2o⟩}⟩, ⟨(comp‘ndx), {⟨⟨∅, ∅⟩, ∅, · ⟩}⟩}
4		df2o3 8415	. . . . 5 ⊢ 2o = {∅, 1o}
5		setc1onsubc.x	. . . . 5 ⊢ · = (𝑓 ∈ 2o, 𝑔 ∈ 2o ↦ (𝑓 ∩ 𝑔))
6	3, 4, 5	incat 49964	. . . 4 ⊢ ((∅ ⊆ 1o ∧ 1o ∈ V) → (𝐶 ∈ Cat ∧ (Id‘𝐶) = (𝑦 ∈ {∅} ↦ 1o)))
7	1, 2, 6	mp2an 693	. . 3 ⊢ (𝐶 ∈ Cat ∧ (Id‘𝐶) = (𝑦 ∈ {∅} ↦ 1o))
8	7	simpli 483	. 2 ⊢ 𝐶 ∈ Cat
9		setc1onsubc.j	. . 3 ⊢ 𝐽 = (Homf ‘𝐸)
10		setc1onsubc.s	. . . 4 ⊢ 𝑆 = 1o
11		setc1onsubc.e	. . . . 5 ⊢ 𝐸 = (SetCat‘1o)
12	11	setc1obas 49855	. . . 4 ⊢ 1o = (Base‘𝐸)
13	10, 12	eqtri 2760	. . 3 ⊢ 𝑆 = (Base‘𝐸)
14	9, 13	homffn 17628	. 2 ⊢ 𝐽 Fn (𝑆 × 𝑆)
15		ssid 3958	. . . 4 ⊢ {∅} ⊆ {∅}
16		snsspr1 4772	. . . . . 6 ⊢ {∅} ⊆ {∅, 1o}
17	11	setc1ohomfval 49856	. . . . . . . . 9 ⊢ {⟨∅, ∅, 1o⟩} = (Hom ‘𝐸)
18		0lt1o 8441	. . . . . . . . . 10 ⊢ ∅ ∈ 1o
19	18	a1i 11	. . . . . . . . 9 ⊢ (⊤ → ∅ ∈ 1o)
20	9, 12, 17, 19, 19	homfval 17627	. . . . . . . 8 ⊢ (⊤ → (∅𝐽∅) = (∅{⟨∅, ∅, 1o⟩}∅))
21	20	mptru 1549	. . . . . . 7 ⊢ (∅𝐽∅) = (∅{⟨∅, ∅, 1o⟩}∅)
22	2	ovsn2 49224	. . . . . . 7 ⊢ (∅{⟨∅, ∅, 1o⟩}∅) = 1o
23		df1o2 8414	. . . . . . 7 ⊢ 1o = {∅}
24	21, 22, 23	3eqtri 2764	. . . . . 6 ⊢ (∅𝐽∅) = {∅}
25		setc1onsubc.h	. . . . . . . . 9 ⊢ 𝐻 = (Homf ‘𝐶)
26		snex 5385	. . . . . . . . . 10 ⊢ {∅} ∈ V
27	3, 26	catbas 49589	. . . . . . . . 9 ⊢ {∅} = (Base‘𝐶)
28		snex 5385	. . . . . . . . . 10 ⊢ {⟨∅, ∅, 2o⟩} ∈ V
29	3, 28	cathomfval 49590	. . . . . . . . 9 ⊢ {⟨∅, ∅, 2o⟩} = (Hom ‘𝐶)
30		0ex 5254	. . . . . . . . . . 11 ⊢ ∅ ∈ V
31	30	snid 4621	. . . . . . . . . 10 ⊢ ∅ ∈ {∅}
32	31	a1i 11	. . . . . . . . 9 ⊢ (⊤ → ∅ ∈ {∅})
33	25, 27, 29, 32, 32	homfval 17627	. . . . . . . 8 ⊢ (⊤ → (∅𝐻∅) = (∅{⟨∅, ∅, 2o⟩}∅))
34	33	mptru 1549	. . . . . . 7 ⊢ (∅𝐻∅) = (∅{⟨∅, ∅, 2o⟩}∅)
35		2oex 8418	. . . . . . . 8 ⊢ 2o ∈ V
36	35	ovsn2 49224	. . . . . . 7 ⊢ (∅{⟨∅, ∅, 2o⟩}∅) = 2o
37	34, 36, 4	3eqtri 2764	. . . . . 6 ⊢ (∅𝐻∅) = {∅, 1o}
38	16, 24, 37	3sstr4i 3987	. . . . 5 ⊢ (∅𝐽∅) ⊆ (∅𝐻∅)
39		oveq1 7375	. . . . . . . . 9 ⊢ (𝑝 = ∅ → (𝑝𝐽𝑞) = (∅𝐽𝑞))
40		oveq1 7375	. . . . . . . . 9 ⊢ (𝑝 = ∅ → (𝑝𝐻𝑞) = (∅𝐻𝑞))
41	39, 40	sseq12d 3969	. . . . . . . 8 ⊢ (𝑝 = ∅ → ((𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞) ↔ (∅𝐽𝑞) ⊆ (∅𝐻𝑞)))
42	41	ralbidv 3161	. . . . . . 7 ⊢ (𝑝 = ∅ → (∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞) ↔ ∀𝑞 ∈ {∅} (∅𝐽𝑞) ⊆ (∅𝐻𝑞)))
43	30, 42	ralsn 4640	. . . . . 6 ⊢ (∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞) ↔ ∀𝑞 ∈ {∅} (∅𝐽𝑞) ⊆ (∅𝐻𝑞))
44		oveq2 7376	. . . . . . . 8 ⊢ (𝑞 = ∅ → (∅𝐽𝑞) = (∅𝐽∅))
45		oveq2 7376	. . . . . . . 8 ⊢ (𝑞 = ∅ → (∅𝐻𝑞) = (∅𝐻∅))
46	44, 45	sseq12d 3969	. . . . . . 7 ⊢ (𝑞 = ∅ → ((∅𝐽𝑞) ⊆ (∅𝐻𝑞) ↔ (∅𝐽∅) ⊆ (∅𝐻∅)))
47	30, 46	ralsn 4640	. . . . . 6 ⊢ (∀𝑞 ∈ {∅} (∅𝐽𝑞) ⊆ (∅𝐻𝑞) ↔ (∅𝐽∅) ⊆ (∅𝐻∅))
48	43, 47	bitri 275	. . . . 5 ⊢ (∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞) ↔ (∅𝐽∅) ⊆ (∅𝐻∅))
49	38, 48	mpbir 231	. . . 4 ⊢ ∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞)
50	23, 12	eqtr3i 2762	. . . . . . . 8 ⊢ {∅} = (Base‘𝐸)
51	9, 50	homffn 17628	. . . . . . 7 ⊢ 𝐽 Fn ({∅} × {∅})
52	51	a1i 11	. . . . . 6 ⊢ (⊤ → 𝐽 Fn ({∅} × {∅}))
53	25, 27	homffn 17628	. . . . . . 7 ⊢ 𝐻 Fn ({∅} × {∅})
54	53	a1i 11	. . . . . 6 ⊢ (⊤ → 𝐻 Fn ({∅} × {∅}))
55	26	a1i 11	. . . . . 6 ⊢ (⊤ → {∅} ∈ V)
56	52, 54, 55	isssc 17756	. . . . 5 ⊢ (⊤ → (𝐽 ⊆cat 𝐻 ↔ ({∅} ⊆ {∅} ∧ ∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞))))
57	56	mptru 1549	. . . 4 ⊢ (𝐽 ⊆cat 𝐻 ↔ ({∅} ⊆ {∅} ∧ ∀𝑝 ∈ {∅}∀𝑞 ∈ {∅} (𝑝𝐽𝑞) ⊆ (𝑝𝐻𝑞)))
58	15, 49, 57	mpbir2an 712	. . 3 ⊢ 𝐽 ⊆cat 𝐻
59		elirr 9516	. . . 4 ⊢ ¬ {∅} ∈ {∅}
60	10, 23	eqtri 2760	. . . . . 6 ⊢ 𝑆 = {∅}
61		biid 261	. . . . . 6 ⊢ (¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥))
62	60, 61	rexeqbii 3317	. . . . 5 ⊢ (∃𝑥 ∈ 𝑆 ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ∃𝑥 ∈ {∅} ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥))
63		rexnal 3090	. . . . 5 ⊢ (∃𝑥 ∈ 𝑆 ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥))
64		fveq2 6842	. . . . . . . . 9 ⊢ (𝑥 = ∅ → ( 1 ‘𝑥) = ( 1 ‘∅))
65	23	a1i 11	. . . . . . . . . . 11 ⊢ (𝑦 = ∅ → 1o = {∅})
66		setc1onsubc.i	. . . . . . . . . . . 12 ⊢ 1 = (Id‘𝐶)
67	7	simpri 485	. . . . . . . . . . . 12 ⊢ (Id‘𝐶) = (𝑦 ∈ {∅} ↦ 1o)
68	66, 67	eqtri 2760	. . . . . . . . . . 11 ⊢ 1 = (𝑦 ∈ {∅} ↦ 1o)
69	65, 68, 26	fvmpt 6949	. . . . . . . . . 10 ⊢ (∅ ∈ {∅} → ( 1 ‘∅) = {∅})
70	31, 69	ax-mp 5	. . . . . . . . 9 ⊢ ( 1 ‘∅) = {∅}
71	64, 70	eqtrdi 2788	. . . . . . . 8 ⊢ (𝑥 = ∅ → ( 1 ‘𝑥) = {∅})
72		oveq12 7377	. . . . . . . . . 10 ⊢ ((𝑥 = ∅ ∧ 𝑥 = ∅) → (𝑥𝐽𝑥) = (∅𝐽∅))
73	72	anidms 566	. . . . . . . . 9 ⊢ (𝑥 = ∅ → (𝑥𝐽𝑥) = (∅𝐽∅))
74	73, 24	eqtrdi 2788	. . . . . . . 8 ⊢ (𝑥 = ∅ → (𝑥𝐽𝑥) = {∅})
75	71, 74	eleq12d 2831	. . . . . . 7 ⊢ (𝑥 = ∅ → (( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ {∅} ∈ {∅}))
76	75	notbid 318	. . . . . 6 ⊢ (𝑥 = ∅ → (¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ¬ {∅} ∈ {∅}))
77	30, 76	rexsn 4641	. . . . 5 ⊢ (∃𝑥 ∈ {∅} ¬ ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ↔ ¬ {∅} ∈ {∅})
78	62, 63, 77	3bitr3ri 302	. . . 4 ⊢ (¬ {∅} ∈ {∅} ↔ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥))
79	59, 78	mpbi 230	. . 3 ⊢ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥)
80		setc1oterm 49854	. . . . . . . 8 ⊢ (SetCat‘1o) ∈ TermCat
81	80	a1i 11	. . . . . . 7 ⊢ (⊤ → (SetCat‘1o) ∈ TermCat)
82	81	termccd 49842	. . . . . 6 ⊢ (⊤ → (SetCat‘1o) ∈ Cat)
83	82	mptru 1549	. . . . 5 ⊢ (SetCat‘1o) ∈ Cat
84	11, 83	eqeltri 2833	. . . 4 ⊢ 𝐸 ∈ Cat
85		setc1onsubc.d	. . . . . 6 ⊢ 𝐷 = (𝐶 ↾cat 𝐽)
86		snex 5385	. . . . . . 7 ⊢ {⟨⟨∅, ∅⟩, ∅, · ⟩} ∈ V
87	3, 86	catcofval 49591	. . . . . 6 ⊢ {⟨⟨∅, ∅⟩, ∅, · ⟩} = (comp‘𝐶)
88	11	setc1ocofval 49857	. . . . . 6 ⊢ {⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩} = (comp‘𝐸)
89		velsn 4598	. . . . . . . . . . 11 ⊢ (𝑎 ∈ {∅} ↔ 𝑎 = ∅)
90		velsn 4598	. . . . . . . . . . 11 ⊢ (𝑏 ∈ {∅} ↔ 𝑏 = ∅)
91		velsn 4598	. . . . . . . . . . 11 ⊢ (𝑐 ∈ {∅} ↔ 𝑐 = ∅)
92	89, 90, 91	3anbi123i 1156	. . . . . . . . . 10 ⊢ ((𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅}) ↔ (𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅))
93	92	anbi1i 625	. . . . . . . . 9 ⊢ (((𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅}) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) ↔ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))))
94		simp1 1137	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → 𝑎 = ∅)
95		simp2 1138	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → 𝑏 = ∅)
96	94, 95	oveq12d 7386	. . . . . . . . . . . . . 14 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑎𝐽𝑏) = (∅𝐽∅))
97	96, 24	eqtrdi 2788	. . . . . . . . . . . . 13 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑎𝐽𝑏) = {∅})
98	97	eleq2d 2823	. . . . . . . . . . . 12 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑚 ∈ (𝑎𝐽𝑏) ↔ 𝑚 ∈ {∅}))
99		velsn 4598	. . . . . . . . . . . 12 ⊢ (𝑚 ∈ {∅} ↔ 𝑚 = ∅)
100	98, 99	bitrdi 287	. . . . . . . . . . 11 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑚 ∈ (𝑎𝐽𝑏) ↔ 𝑚 = ∅))
101		simp3 1139	. . . . . . . . . . . . . . 15 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → 𝑐 = ∅)
102	95, 101	oveq12d 7386	. . . . . . . . . . . . . 14 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑏𝐽𝑐) = (∅𝐽∅))
103	102, 24	eqtrdi 2788	. . . . . . . . . . . . 13 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑏𝐽𝑐) = {∅})
104	103	eleq2d 2823	. . . . . . . . . . . 12 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑛 ∈ (𝑏𝐽𝑐) ↔ 𝑛 ∈ {∅}))
105		velsn 4598	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ {∅} ↔ 𝑛 = ∅)
106	104, 105	bitrdi 287	. . . . . . . . . . 11 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → (𝑛 ∈ (𝑏𝐽𝑐) ↔ 𝑛 = ∅))
107	100, 106	anbi12d 633	. . . . . . . . . 10 ⊢ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) → ((𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐)) ↔ (𝑚 = ∅ ∧ 𝑛 = ∅)))
108	107	pm5.32i 574	. . . . . . . . 9 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) ↔ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)))
109	93, 108	bitri 275	. . . . . . . 8 ⊢ (((𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅}) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) ↔ ((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)))
110	30	prid1 4721	. . . . . . . . . . . 12 ⊢ ∅ ∈ {∅, 1o}
111	110, 4	eleqtrri 2836	. . . . . . . . . . 11 ⊢ ∅ ∈ 2o
112		ineq12 4169	. . . . . . . . . . . . 13 ⊢ ((𝑓 = ∅ ∧ 𝑔 = ∅) → (𝑓 ∩ 𝑔) = (∅ ∩ ∅))
113		0in 4351	. . . . . . . . . . . . 13 ⊢ (∅ ∩ ∅) = ∅
114	112, 113	eqtrdi 2788	. . . . . . . . . . . 12 ⊢ ((𝑓 = ∅ ∧ 𝑔 = ∅) → (𝑓 ∩ 𝑔) = ∅)
115	114, 5, 30	ovmpoa 7523	. . . . . . . . . . 11 ⊢ ((∅ ∈ 2o ∧ ∅ ∈ 2o) → (∅ · ∅) = ∅)
116	111, 111, 115	mp2an 693	. . . . . . . . . 10 ⊢ (∅ · ∅) = ∅
117	30	ovsn2 49224	. . . . . . . . . 10 ⊢ (∅{⟨∅, ∅, ∅⟩}∅) = ∅
118	116, 117	eqtr4i 2763	. . . . . . . . 9 ⊢ (∅ · ∅) = (∅{⟨∅, ∅, ∅⟩}∅)
119		simpl1 1193	. . . . . . . . . . . . 13 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑎 = ∅)
120		simpl2 1194	. . . . . . . . . . . . 13 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑏 = ∅)
121	119, 120	opeq12d 4839	. . . . . . . . . . . 12 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → ⟨𝑎, 𝑏⟩ = ⟨∅, ∅⟩)
122		simpl3 1195	. . . . . . . . . . . 12 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑐 = ∅)
123	121, 122	oveq12d 7386	. . . . . . . . . . 11 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐) = (⟨∅, ∅⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}∅))
124	35, 35	mpoex 8033	. . . . . . . . . . . . 13 ⊢ (𝑓 ∈ 2o, 𝑔 ∈ 2o ↦ (𝑓 ∩ 𝑔)) ∈ V
125	5, 124	eqeltri 2833	. . . . . . . . . . . 12 ⊢ · ∈ V
126	125	ovsn2 49224	. . . . . . . . . . 11 ⊢ (⟨∅, ∅⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}∅) = ·
127	123, 126	eqtrdi 2788	. . . . . . . . . 10 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐) = · )
128		simprr 773	. . . . . . . . . 10 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑛 = ∅)
129		simprl 771	. . . . . . . . . 10 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → 𝑚 = ∅)
130	127, 128, 129	oveq123d 7389	. . . . . . . . 9 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐)𝑚) = (∅ · ∅))
131	121, 122	oveq12d 7386	. . . . . . . . . . 11 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐) = (⟨∅, ∅⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}∅))
132		snex 5385	. . . . . . . . . . . 12 ⊢ {⟨∅, ∅, ∅⟩} ∈ V
133	132	ovsn2 49224	. . . . . . . . . . 11 ⊢ (⟨∅, ∅⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}∅) = {⟨∅, ∅, ∅⟩}
134	131, 133	eqtrdi 2788	. . . . . . . . . 10 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐) = {⟨∅, ∅, ∅⟩})
135	134, 128, 129	oveq123d 7389	. . . . . . . . 9 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐)𝑚) = (∅{⟨∅, ∅, ∅⟩}∅))
136	118, 130, 135	3eqtr4a 2798	. . . . . . . 8 ⊢ (((𝑎 = ∅ ∧ 𝑏 = ∅ ∧ 𝑐 = ∅) ∧ (𝑚 = ∅ ∧ 𝑛 = ∅)) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐)𝑚) = (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐)𝑚))
137	109, 136	sylbi 217	. . . . . . 7 ⊢ (((𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅}) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐)𝑚) = (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐)𝑚))
138	137	adantll 715	. . . . . 6 ⊢ (((⊤ ∧ (𝑎 ∈ {∅} ∧ 𝑏 ∈ {∅} ∧ 𝑐 ∈ {∅})) ∧ (𝑚 ∈ (𝑎𝐽𝑏) ∧ 𝑛 ∈ (𝑏𝐽𝑐))) → (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, · ⟩}𝑐)𝑚) = (𝑛(⟨𝑎, 𝑏⟩{⟨⟨∅, ∅⟩, ∅, {⟨∅, ∅, ∅⟩}⟩}𝑐)𝑚))
139	84	a1i 11	. . . . . 6 ⊢ (⊤ → 𝐸 ∈ Cat)
140	15	a1i 11	. . . . . 6 ⊢ (⊤ → {∅} ⊆ {∅})
141	85, 27, 50, 9, 87, 88, 138, 139, 140	resccat 49437	. . . . 5 ⊢ (⊤ → (𝐷 ∈ Cat ↔ 𝐸 ∈ Cat))
142	141	mptru 1549	. . . 4 ⊢ (𝐷 ∈ Cat ↔ 𝐸 ∈ Cat)
143	84, 142	mpbir 231	. . 3 ⊢ 𝐷 ∈ Cat
144	58, 79, 143	3pm3.2i 1341	. 2 ⊢ (𝐽 ⊆cat 𝐻 ∧ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ∧ 𝐷 ∈ Cat)
145	8, 14, 144	3pm3.2i 1341	1 ⊢ (𝐶 ∈ Cat ∧ 𝐽 Fn (𝑆 × 𝑆) ∧ (𝐽 ⊆cat 𝐻 ∧ ¬ ∀𝑥 ∈ 𝑆 ( 1 ‘𝑥) ∈ (𝑥𝐽𝑥) ∧ 𝐷 ∈ Cat))

Syntax hints:  ¬ wn 3   ↔ wb 206   ∧ wa 395   ∧ w3a 1087   = wceq 1542  ⊤wtru 1543   ∈ wcel 2114  ∀wral 3052  ∃wrex 3062  Vcvv 3442   ∩ cin 3902   ⊆ wss 3903  ∅c0 4287  {csn 4582  {cpr 4584  {ctp 4586  ⟨cop 4588  ⟨cotp 4590   class class class wbr 5100   ↦ cmpt 5181   × cxp 5630   Fn wfn 6495  ‘cfv 6500  (class class class)co 7368   ∈ cmpo 7370  1_oc1o 8400  2_oc2o 8401  ndxcnx 17132  Basecbs 17148  Hom chom 17200  compcco 17201  Catccat 17599  Idccid 17600  Hom_f chomf 17601   ⊆_cat cssc 17743   ↾_cat cresc 17744  SetCatcsetc 18011  TermCatctermc 49835

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-rep 5226  ax-sep 5243  ax-nul 5253  ax-pow 5312  ax-pr 5379  ax-un 7690  ax-reg 9509  ax-cnex 11094  ax-resscn 11095  ax-1cn 11096  ax-icn 11097  ax-addcl 11098  ax-addrcl 11099  ax-mulcl 11100  ax-mulrcl 11101  ax-mulcom 11102  ax-addass 11103  ax-mulass 11104  ax-distr 11105  ax-i2m1 11106  ax-1ne0 11107  ax-1rid 11108  ax-rnegex 11109  ax-rrecex 11110  ax-cnre 11111  ax-pre-lttri 11112  ax-pre-lttrn 11113  ax-pre-ltadd 11114  ax-pre-mulgt0 11115

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  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-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3352  df-reu 3353  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-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-tp 4587  df-op 4589  df-ot 4591  df-uni 4866  df-iun 4950  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-pred 6267  df-ord 6328  df-on 6329  df-lim 6330  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-riota 7325  df-ov 7371  df-oprab 7372  df-mpo 7373  df-om 7819  df-1st 7943  df-2nd 7944  df-frecs 8233  df-wrecs 8264  df-recs 8313  df-rdg 8351  df-1o 8407  df-2o 8408  df-er 8645  df-map 8777  df-ixp 8848  df-en 8896  df-dom 8897  df-sdom 8898  df-fin 8899  df-pnf 11180  df-mnf 11181  df-xr 11182  df-ltxr 11183  df-le 11184  df-sub 11378  df-neg 11379  df-nn 12158  df-2 12220  df-3 12221  df-4 12222  df-5 12223  df-6 12224  df-7 12225  df-8 12226  df-9 12227  df-n0 12414  df-z 12501  df-dec 12620  df-uz 12764  df-fz 13436  df-struct 17086  df-sets 17103  df-slot 17121  df-ndx 17133  df-base 17149  df-ress 17170  df-hom 17213  df-cco 17214  df-cat 17603  df-cid 17604  df-homf 17605  df-comf 17606  df-ssc 17746  df-resc 17747  df-setc 18012  df-thinc 49781  df-termc 49836

This theorem is referenced by:  cnelsubc  49967