Theorem negsproplem2 28038

Description: Lemma for surreal negation. Show that the cut that defines negation is legitimate. (Contributed by Scott Fenton, 2-Feb-2025.)

Hypotheses

Ref	Expression
negsproplem.1	⊢ (𝜑 → ∀𝑥 ∈ No ∀𝑦 ∈ No ((( bday ‘𝑥) ∪ ( bday ‘𝑦)) ∈ (( bday ‘𝐴) ∪ ( bday ‘𝐵)) → (( -us ‘𝑥) ∈ No ∧ (𝑥 <s 𝑦 → ( -us ‘𝑦) <s ( -us ‘𝑥)))))
negsproplem2.1	⊢ (𝜑 → 𝐴 ∈ No )

Assertion

Ref	Expression
negsproplem2	⊢ (𝜑 → ( -us “ ( R ‘𝐴)) <<s ( -us “ ( L ‘𝐴)))

Distinct variable groups:   𝑥,𝐴,𝑦   𝑥,𝐵,𝑦

Allowed substitution hints:   𝜑(𝑥,𝑦)

Proof of Theorem negsproplem2

Dummy variables 𝑎 𝑏 𝑥_𝐿 𝑥_𝑅 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		negsfn 28033	. . . 4 ⊢ -us Fn No
2		fnfun 6660	. . . 4 ⊢ ( -us Fn No → Fun -us )
3	1, 2	ax-mp 5	. . 3 ⊢ Fun -us
4		fvex 6914	. . . 4 ⊢ ( R ‘𝐴) ∈ V
5	4	funimaex 6647	. . 3 ⊢ (Fun -us → ( -us “ ( R ‘𝐴)) ∈ V)
6	3, 5	mp1i 13	. 2 ⊢ (𝜑 → ( -us “ ( R ‘𝐴)) ∈ V)
7		fvex 6914	. . . 4 ⊢ ( L ‘𝐴) ∈ V
8	7	funimaex 6647	. . 3 ⊢ (Fun -us → ( -us “ ( L ‘𝐴)) ∈ V)
9	3, 8	mp1i 13	. 2 ⊢ (𝜑 → ( -us “ ( L ‘𝐴)) ∈ V)
10		rightssold 27903	. . . 4 ⊢ ( R ‘𝐴) ⊆ ( O ‘( bday ‘𝐴))
11		imass2 6112	. . . 4 ⊢ (( R ‘𝐴) ⊆ ( O ‘( bday ‘𝐴)) → ( -us “ ( R ‘𝐴)) ⊆ ( -us “ ( O ‘( bday ‘𝐴))))
12	10, 11	ax-mp 5	. . 3 ⊢ ( -us “ ( R ‘𝐴)) ⊆ ( -us “ ( O ‘( bday ‘𝐴)))
13		negsproplem.1	. . . . . . . 8 ⊢ (𝜑 → ∀𝑥 ∈ No ∀𝑦 ∈ No ((( bday ‘𝑥) ∪ ( bday ‘𝑦)) ∈ (( bday ‘𝐴) ∪ ( bday ‘𝐵)) → (( -us ‘𝑥) ∈ No ∧ (𝑥 <s 𝑦 → ( -us ‘𝑦) <s ( -us ‘𝑥)))))
14	13	adantr 479	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑎 ∈ ( O ‘( bday ‘𝐴))) → ∀𝑥 ∈ No ∀𝑦 ∈ No ((( bday ‘𝑥) ∪ ( bday ‘𝑦)) ∈ (( bday ‘𝐴) ∪ ( bday ‘𝐵)) → (( -us ‘𝑥) ∈ No ∧ (𝑥 <s 𝑦 → ( -us ‘𝑦) <s ( -us ‘𝑥)))))
15		oldssno 27885	. . . . . . . . 9 ⊢ ( O ‘( bday ‘𝐴)) ⊆ No
16	15	sseli 3975	. . . . . . . 8 ⊢ (𝑎 ∈ ( O ‘( bday ‘𝐴)) → 𝑎 ∈ No )
17	16	adantl 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑎 ∈ ( O ‘( bday ‘𝐴))) → 𝑎 ∈ No )
18		0sno 27856	. . . . . . . 8 ⊢ 0s ∈ No
19	18	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑎 ∈ ( O ‘( bday ‘𝐴))) → 0s ∈ No )
20		bday0s 27858	. . . . . . . . . 10 ⊢ ( bday ‘ 0s ) = ∅
21	20	uneq2i 4160	. . . . . . . . 9 ⊢ (( bday ‘𝑎) ∪ ( bday ‘ 0s )) = (( bday ‘𝑎) ∪ ∅)
22		un0 4395	. . . . . . . . 9 ⊢ (( bday ‘𝑎) ∪ ∅) = ( bday ‘𝑎)
23	21, 22	eqtri 2754	. . . . . . . 8 ⊢ (( bday ‘𝑎) ∪ ( bday ‘ 0s )) = ( bday ‘𝑎)
24		oldbdayim 27912	. . . . . . . . . 10 ⊢ (𝑎 ∈ ( O ‘( bday ‘𝐴)) → ( bday ‘𝑎) ∈ ( bday ‘𝐴))
25	24	adantl 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑎 ∈ ( O ‘( bday ‘𝐴))) → ( bday ‘𝑎) ∈ ( bday ‘𝐴))
26		elun1 4177	. . . . . . . . 9 ⊢ (( bday ‘𝑎) ∈ ( bday ‘𝐴) → ( bday ‘𝑎) ∈ (( bday ‘𝐴) ∪ ( bday ‘𝐵)))
27	25, 26	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑎 ∈ ( O ‘( bday ‘𝐴))) → ( bday ‘𝑎) ∈ (( bday ‘𝐴) ∪ ( bday ‘𝐵)))
28	23, 27	eqeltrid 2830	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑎 ∈ ( O ‘( bday ‘𝐴))) → (( bday ‘𝑎) ∪ ( bday ‘ 0s )) ∈ (( bday ‘𝐴) ∪ ( bday ‘𝐵)))
29	14, 17, 19, 28	negsproplem1 28037	. . . . . 6 ⊢ ((𝜑 ∧ 𝑎 ∈ ( O ‘( bday ‘𝐴))) → (( -us ‘𝑎) ∈ No ∧ (𝑎 <s 0s → ( -us ‘ 0s ) <s ( -us ‘𝑎))))
30	29	simpld 493	. . . . 5 ⊢ ((𝜑 ∧ 𝑎 ∈ ( O ‘( bday ‘𝐴))) → ( -us ‘𝑎) ∈ No )
31	30	ralrimiva 3136	. . . 4 ⊢ (𝜑 → ∀𝑎 ∈ ( O ‘( bday ‘𝐴))( -us ‘𝑎) ∈ No )
32	1	fndmi 6664	. . . . . 6 ⊢ dom -us = No
33	15, 32	sseqtrri 4017	. . . . 5 ⊢ ( O ‘( bday ‘𝐴)) ⊆ dom -us
34		funimass4 6967	. . . . 5 ⊢ ((Fun -us ∧ ( O ‘( bday ‘𝐴)) ⊆ dom -us ) → (( -us “ ( O ‘( bday ‘𝐴))) ⊆ No ↔ ∀𝑎 ∈ ( O ‘( bday ‘𝐴))( -us ‘𝑎) ∈ No ))
35	3, 33, 34	mp2an 690	. . . 4 ⊢ (( -us “ ( O ‘( bday ‘𝐴))) ⊆ No ↔ ∀𝑎 ∈ ( O ‘( bday ‘𝐴))( -us ‘𝑎) ∈ No )
36	31, 35	sylibr 233	. . 3 ⊢ (𝜑 → ( -us “ ( O ‘( bday ‘𝐴))) ⊆ No )
37	12, 36	sstrid 3991	. 2 ⊢ (𝜑 → ( -us “ ( R ‘𝐴)) ⊆ No )
38		leftssold 27902	. . . 4 ⊢ ( L ‘𝐴) ⊆ ( O ‘( bday ‘𝐴))
39		imass2 6112	. . . 4 ⊢ (( L ‘𝐴) ⊆ ( O ‘( bday ‘𝐴)) → ( -us “ ( L ‘𝐴)) ⊆ ( -us “ ( O ‘( bday ‘𝐴))))
40	38, 39	ax-mp 5	. . 3 ⊢ ( -us “ ( L ‘𝐴)) ⊆ ( -us “ ( O ‘( bday ‘𝐴)))
41	40, 36	sstrid 3991	. 2 ⊢ (𝜑 → ( -us “ ( L ‘𝐴)) ⊆ No )
42		rightssno 27905	. . . . . . 7 ⊢ ( R ‘𝐴) ⊆ No
43		fvelimab 6975	. . . . . . 7 ⊢ (( -us Fn No ∧ ( R ‘𝐴) ⊆ No ) → (𝑎 ∈ ( -us “ ( R ‘𝐴)) ↔ ∃𝑥𝑅 ∈ ( R ‘𝐴)( -us ‘𝑥𝑅) = 𝑎))
44	1, 42, 43	mp2an 690	. . . . . 6 ⊢ (𝑎 ∈ ( -us “ ( R ‘𝐴)) ↔ ∃𝑥𝑅 ∈ ( R ‘𝐴)( -us ‘𝑥𝑅) = 𝑎)
45		leftssno 27904	. . . . . . 7 ⊢ ( L ‘𝐴) ⊆ No
46		fvelimab 6975	. . . . . . 7 ⊢ (( -us Fn No ∧ ( L ‘𝐴) ⊆ No ) → (𝑏 ∈ ( -us “ ( L ‘𝐴)) ↔ ∃𝑥𝐿 ∈ ( L ‘𝐴)( -us ‘𝑥𝐿) = 𝑏))
47	1, 45, 46	mp2an 690	. . . . . 6 ⊢ (𝑏 ∈ ( -us “ ( L ‘𝐴)) ↔ ∃𝑥𝐿 ∈ ( L ‘𝐴)( -us ‘𝑥𝐿) = 𝑏)
48	44, 47	anbi12i 626	. . . . 5 ⊢ ((𝑎 ∈ ( -us “ ( R ‘𝐴)) ∧ 𝑏 ∈ ( -us “ ( L ‘𝐴))) ↔ (∃𝑥𝑅 ∈ ( R ‘𝐴)( -us ‘𝑥𝑅) = 𝑎 ∧ ∃𝑥𝐿 ∈ ( L ‘𝐴)( -us ‘𝑥𝐿) = 𝑏))
49		reeanv 3217	. . . . 5 ⊢ (∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑥𝐿 ∈ ( L ‘𝐴)(( -us ‘𝑥𝑅) = 𝑎 ∧ ( -us ‘𝑥𝐿) = 𝑏) ↔ (∃𝑥𝑅 ∈ ( R ‘𝐴)( -us ‘𝑥𝑅) = 𝑎 ∧ ∃𝑥𝐿 ∈ ( L ‘𝐴)( -us ‘𝑥𝐿) = 𝑏))
50	48, 49	bitr4i 277	. . . 4 ⊢ ((𝑎 ∈ ( -us “ ( R ‘𝐴)) ∧ 𝑏 ∈ ( -us “ ( L ‘𝐴))) ↔ ∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑥𝐿 ∈ ( L ‘𝐴)(( -us ‘𝑥𝑅) = 𝑎 ∧ ( -us ‘𝑥𝐿) = 𝑏))
51		lltropt 27896	. . . . . . . . 9 ⊢ ( L ‘𝐴) <<s ( R ‘𝐴)
52	51	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → ( L ‘𝐴) <<s ( R ‘𝐴))
53		simprr 771	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → 𝑥𝐿 ∈ ( L ‘𝐴))
54		simprl 769	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → 𝑥𝑅 ∈ ( R ‘𝐴))
55	52, 53, 54	ssltsepcd 27824	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → 𝑥𝐿 <s 𝑥𝑅)
56	13	adantr 479	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → ∀𝑥 ∈ No ∀𝑦 ∈ No ((( bday ‘𝑥) ∪ ( bday ‘𝑦)) ∈ (( bday ‘𝐴) ∪ ( bday ‘𝐵)) → (( -us ‘𝑥) ∈ No ∧ (𝑥 <s 𝑦 → ( -us ‘𝑦) <s ( -us ‘𝑥)))))
57	45	sseli 3975	. . . . . . . . . 10 ⊢ (𝑥𝐿 ∈ ( L ‘𝐴) → 𝑥𝐿 ∈ No )
58	57	ad2antll 727	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → 𝑥𝐿 ∈ No )
59	42	sseli 3975	. . . . . . . . . . 11 ⊢ (𝑥𝑅 ∈ ( R ‘𝐴) → 𝑥𝑅 ∈ No )
60	59	adantr 479	. . . . . . . . . 10 ⊢ ((𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴)) → 𝑥𝑅 ∈ No )
61	60	adantl 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → 𝑥𝑅 ∈ No )
62	38	sseli 3975	. . . . . . . . . . . . 13 ⊢ (𝑥𝐿 ∈ ( L ‘𝐴) → 𝑥𝐿 ∈ ( O ‘( bday ‘𝐴)))
63	62	ad2antll 727	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → 𝑥𝐿 ∈ ( O ‘( bday ‘𝐴)))
64		oldbdayim 27912	. . . . . . . . . . . 12 ⊢ (𝑥𝐿 ∈ ( O ‘( bday ‘𝐴)) → ( bday ‘𝑥𝐿) ∈ ( bday ‘𝐴))
65	63, 64	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → ( bday ‘𝑥𝐿) ∈ ( bday ‘𝐴))
66	10	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ( R ‘𝐴) ⊆ ( O ‘( bday ‘𝐴)))
67	66	sselda 3979	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥𝑅 ∈ ( R ‘𝐴)) → 𝑥𝑅 ∈ ( O ‘( bday ‘𝐴)))
68	67	adantrr 715	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → 𝑥𝑅 ∈ ( O ‘( bday ‘𝐴)))
69		oldbdayim 27912	. . . . . . . . . . . 12 ⊢ (𝑥𝑅 ∈ ( O ‘( bday ‘𝐴)) → ( bday ‘𝑥𝑅) ∈ ( bday ‘𝐴))
70	68, 69	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → ( bday ‘𝑥𝑅) ∈ ( bday ‘𝐴))
71		bdayelon 27806	. . . . . . . . . . . 12 ⊢ ( bday ‘𝑥𝐿) ∈ On
72		bdayelon 27806	. . . . . . . . . . . 12 ⊢ ( bday ‘𝑥𝑅) ∈ On
73		bdayelon 27806	. . . . . . . . . . . 12 ⊢ ( bday ‘𝐴) ∈ On
74		onunel 6481	. . . . . . . . . . . 12 ⊢ ((( bday ‘𝑥𝐿) ∈ On ∧ ( bday ‘𝑥𝑅) ∈ On ∧ ( bday ‘𝐴) ∈ On) → ((( bday ‘𝑥𝐿) ∪ ( bday ‘𝑥𝑅)) ∈ ( bday ‘𝐴) ↔ (( bday ‘𝑥𝐿) ∈ ( bday ‘𝐴) ∧ ( bday ‘𝑥𝑅) ∈ ( bday ‘𝐴))))
75	71, 72, 73, 74	mp3an 1458	. . . . . . . . . . 11 ⊢ ((( bday ‘𝑥𝐿) ∪ ( bday ‘𝑥𝑅)) ∈ ( bday ‘𝐴) ↔ (( bday ‘𝑥𝐿) ∈ ( bday ‘𝐴) ∧ ( bday ‘𝑥𝑅) ∈ ( bday ‘𝐴)))
76	65, 70, 75	sylanbrc 581	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → (( bday ‘𝑥𝐿) ∪ ( bday ‘𝑥𝑅)) ∈ ( bday ‘𝐴))
77		elun1 4177	. . . . . . . . . 10 ⊢ ((( bday ‘𝑥𝐿) ∪ ( bday ‘𝑥𝑅)) ∈ ( bday ‘𝐴) → (( bday ‘𝑥𝐿) ∪ ( bday ‘𝑥𝑅)) ∈ (( bday ‘𝐴) ∪ ( bday ‘𝐵)))
78	76, 77	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → (( bday ‘𝑥𝐿) ∪ ( bday ‘𝑥𝑅)) ∈ (( bday ‘𝐴) ∪ ( bday ‘𝐵)))
79	56, 58, 61, 78	negsproplem1 28037	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → (( -us ‘𝑥𝐿) ∈ No ∧ (𝑥𝐿 <s 𝑥𝑅 → ( -us ‘𝑥𝑅) <s ( -us ‘𝑥𝐿))))
80	79	simprd 494	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → (𝑥𝐿 <s 𝑥𝑅 → ( -us ‘𝑥𝑅) <s ( -us ‘𝑥𝐿)))
81	55, 80	mpd 15	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → ( -us ‘𝑥𝑅) <s ( -us ‘𝑥𝐿))
82		breq12 5158	. . . . . 6 ⊢ ((( -us ‘𝑥𝑅) = 𝑎 ∧ ( -us ‘𝑥𝐿) = 𝑏) → (( -us ‘𝑥𝑅) <s ( -us ‘𝑥𝐿) ↔ 𝑎 <s 𝑏))
83	81, 82	syl5ibcom 244	. . . . 5 ⊢ ((𝜑 ∧ (𝑥𝑅 ∈ ( R ‘𝐴) ∧ 𝑥𝐿 ∈ ( L ‘𝐴))) → ((( -us ‘𝑥𝑅) = 𝑎 ∧ ( -us ‘𝑥𝐿) = 𝑏) → 𝑎 <s 𝑏))
84	83	rexlimdvva 3202	. . . 4 ⊢ (𝜑 → (∃𝑥𝑅 ∈ ( R ‘𝐴)∃𝑥𝐿 ∈ ( L ‘𝐴)(( -us ‘𝑥𝑅) = 𝑎 ∧ ( -us ‘𝑥𝐿) = 𝑏) → 𝑎 <s 𝑏))
85	50, 84	biimtrid 241	. . 3 ⊢ (𝜑 → ((𝑎 ∈ ( -us “ ( R ‘𝐴)) ∧ 𝑏 ∈ ( -us “ ( L ‘𝐴))) → 𝑎 <s 𝑏))
86	85	3impib 1113	. 2 ⊢ ((𝜑 ∧ 𝑎 ∈ ( -us “ ( R ‘𝐴)) ∧ 𝑏 ∈ ( -us “ ( L ‘𝐴))) → 𝑎 <s 𝑏)
87	6, 9, 37, 41, 86	ssltd 27821	1 ⊢ (𝜑 → ( -us “ ( R ‘𝐴)) <<s ( -us “ ( L ‘𝐴)))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 394   = wceq 1534   ∈ wcel 2099  ∀wral 3051  ∃wrex 3060  Vcvv 3462   ∪ cun 3945   ⊆ wss 3947  ∅c0 4325   class class class wbr 5153  dom cdm 5682   “ cima 5685  Oncon0 6376  Fun wfun 6548   Fn wfn 6549  ‘cfv 6554   No csur 27669   <s cslt 27670   bday cbday 27671   <<s csslt 27810   0_s c0s 27852   O cold 27867   L cleft 27869   R cright 27870   -u_s cnegs 28029

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-10 2130  ax-11 2147  ax-12 2167  ax-ext 2697  ax-rep 5290  ax-sep 5304  ax-nul 5311  ax-pow 5369  ax-pr 5433  ax-un 7746

This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3or 1085  df-3an 1086  df-tru 1537  df-fal 1547  df-ex 1775  df-nf 1779  df-sb 2061  df-mo 2529  df-eu 2558  df-clab 2704  df-cleq 2718  df-clel 2803  df-nfc 2878  df-ne 2931  df-ral 3052  df-rex 3061  df-rmo 3364  df-reu 3365  df-rab 3420  df-v 3464  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3967  df-nul 4326  df-if 4534  df-pw 4609  df-sn 4634  df-pr 4636  df-tp 4638  df-op 4640  df-uni 4914  df-int 4955  df-iun 5003  df-br 5154  df-opab 5216  df-mpt 5237  df-tr 5271  df-id 5580  df-eprel 5586  df-po 5594  df-so 5595  df-fr 5637  df-se 5638  df-we 5639  df-xp 5688  df-rel 5689  df-cnv 5690  df-co 5691  df-dm 5692  df-rn 5693  df-res 5694  df-ima 5695  df-pred 6312  df-ord 6379  df-on 6380  df-suc 6382  df-iota 6506  df-fun 6556  df-fn 6557  df-f 6558  df-f1 6559  df-fo 6560  df-f1o 6561  df-fv 6562  df-riota 7380  df-ov 7427  df-oprab 7428  df-mpo 7429  df-2nd 8004  df-frecs 8296  df-wrecs 8327  df-recs 8401  df-1o 8496  df-2o 8497  df-no 27672  df-slt 27673  df-bday 27674  df-sslt 27811  df-scut 27813  df-0s 27854  df-made 27871  df-old 27872  df-left 27874  df-right 27875  df-norec 27952  df-negs 28031

This theorem is referenced by:  negsproplem3  28039