Theorem sltlpss 27401

Description: If two surreals share a birthday, then 𝑋 <s 𝑌 iff the left set of 𝑋 is a proper subset of the left set of 𝑌. (Contributed by Scott Fenton, 17-Sep-2024.)

Assertion

Ref	Expression
sltlpss	⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → (𝑋 <s 𝑌 ↔ ( L ‘𝑋) ⊊ ( L ‘𝑌)))

Proof of Theorem sltlpss

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		oldssno 27356	. . . . . . . . . . . 12 ⊢ ( O ‘( bday ‘𝑋)) ⊆ No
2	1	sseli 3979	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ( O ‘( bday ‘𝑋)) → 𝑥 ∈ No )
3	2	3ad2ant2 1135	. . . . . . . . . 10 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ 𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑋) → 𝑥 ∈ No )
4		simp1l1 1267	. . . . . . . . . 10 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ 𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑋) → 𝑋 ∈ No )
5		simp1l2 1268	. . . . . . . . . 10 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ 𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑋) → 𝑌 ∈ No )
6		simp3 1139	. . . . . . . . . 10 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ 𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑋) → 𝑥 <s 𝑋)
7		simp1r 1199	. . . . . . . . . 10 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ 𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑋) → 𝑋 <s 𝑌)
8	3, 4, 5, 6, 7	slttrd 27262	. . . . . . . . 9 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ 𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑋) → 𝑥 <s 𝑌)
9	8	3exp 1120	. . . . . . . 8 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → (𝑥 ∈ ( O ‘( bday ‘𝑋)) → (𝑥 <s 𝑋 → 𝑥 <s 𝑌)))
10	9	imdistand 572	. . . . . . 7 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → ((𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑋) → (𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑌)))
11		fveq2 6892	. . . . . . . . . . 11 ⊢ (( bday ‘𝑋) = ( bday ‘𝑌) → ( O ‘( bday ‘𝑋)) = ( O ‘( bday ‘𝑌)))
12	11	3ad2ant3 1136	. . . . . . . . . 10 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → ( O ‘( bday ‘𝑋)) = ( O ‘( bday ‘𝑌)))
13	12	adantr 482	. . . . . . . . 9 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → ( O ‘( bday ‘𝑋)) = ( O ‘( bday ‘𝑌)))
14	13	eleq2d 2820	. . . . . . . 8 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → (𝑥 ∈ ( O ‘( bday ‘𝑋)) ↔ 𝑥 ∈ ( O ‘( bday ‘𝑌))))
15	14	anbi1d 631	. . . . . . 7 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → ((𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑌) ↔ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)))
16	10, 15	sylibd 238	. . . . . 6 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → ((𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑋) → (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)))
17		leftval 27358	. . . . . . . . 9 ⊢ ( L ‘𝑋) = {𝑥 ∈ ( O ‘( bday ‘𝑋)) ∣ 𝑥 <s 𝑋}
18	17	a1i 11	. . . . . . . 8 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → ( L ‘𝑋) = {𝑥 ∈ ( O ‘( bday ‘𝑋)) ∣ 𝑥 <s 𝑋})
19	18	eleq2d 2820	. . . . . . 7 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → (𝑥 ∈ ( L ‘𝑋) ↔ 𝑥 ∈ {𝑥 ∈ ( O ‘( bday ‘𝑋)) ∣ 𝑥 <s 𝑋}))
20		rabid 3453	. . . . . . 7 ⊢ (𝑥 ∈ {𝑥 ∈ ( O ‘( bday ‘𝑋)) ∣ 𝑥 <s 𝑋} ↔ (𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑋))
21	19, 20	bitrdi 287	. . . . . 6 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → (𝑥 ∈ ( L ‘𝑋) ↔ (𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑋)))
22		leftval 27358	. . . . . . . . 9 ⊢ ( L ‘𝑌) = {𝑥 ∈ ( O ‘( bday ‘𝑌)) ∣ 𝑥 <s 𝑌}
23	22	a1i 11	. . . . . . . 8 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → ( L ‘𝑌) = {𝑥 ∈ ( O ‘( bday ‘𝑌)) ∣ 𝑥 <s 𝑌})
24	23	eleq2d 2820	. . . . . . 7 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → (𝑥 ∈ ( L ‘𝑌) ↔ 𝑥 ∈ {𝑥 ∈ ( O ‘( bday ‘𝑌)) ∣ 𝑥 <s 𝑌}))
25		rabid 3453	. . . . . . 7 ⊢ (𝑥 ∈ {𝑥 ∈ ( O ‘( bday ‘𝑌)) ∣ 𝑥 <s 𝑌} ↔ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌))
26	24, 25	bitrdi 287	. . . . . 6 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → (𝑥 ∈ ( L ‘𝑌) ↔ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)))
27	16, 21, 26	3imtr4d 294	. . . . 5 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → (𝑥 ∈ ( L ‘𝑋) → 𝑥 ∈ ( L ‘𝑌)))
28	27	ssrdv 3989	. . . 4 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → ( L ‘𝑋) ⊆ ( L ‘𝑌))
29		sltirr 27249	. . . . . . . . 9 ⊢ (𝑌 ∈ No → ¬ 𝑌 <s 𝑌)
30	29	3ad2ant2 1135	. . . . . . . 8 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → ¬ 𝑌 <s 𝑌)
31		breq1 5152	. . . . . . . . 9 ⊢ (𝑋 = 𝑌 → (𝑋 <s 𝑌 ↔ 𝑌 <s 𝑌))
32	31	notbid 318	. . . . . . . 8 ⊢ (𝑋 = 𝑌 → (¬ 𝑋 <s 𝑌 ↔ ¬ 𝑌 <s 𝑌))
33	30, 32	syl5ibrcom 246	. . . . . . 7 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → (𝑋 = 𝑌 → ¬ 𝑋 <s 𝑌))
34	33	con2d 134	. . . . . 6 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → (𝑋 <s 𝑌 → ¬ 𝑋 = 𝑌))
35	34	imp 408	. . . . 5 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → ¬ 𝑋 = 𝑌)
36		simpr 486	. . . . . . 7 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → ( L ‘𝑋) = ( L ‘𝑌))
37		lruneq 27400	. . . . . . . . . . 11 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → (( L ‘𝑋) ∪ ( R ‘𝑋)) = (( L ‘𝑌) ∪ ( R ‘𝑌)))
38	37	adantr 482	. . . . . . . . . 10 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → (( L ‘𝑋) ∪ ( R ‘𝑋)) = (( L ‘𝑌) ∪ ( R ‘𝑌)))
39	38	adantr 482	. . . . . . . . 9 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → (( L ‘𝑋) ∪ ( R ‘𝑋)) = (( L ‘𝑌) ∪ ( R ‘𝑌)))
40	39, 36	difeq12d 4124	. . . . . . . 8 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → ((( L ‘𝑋) ∪ ( R ‘𝑋)) ∖ ( L ‘𝑋)) = ((( L ‘𝑌) ∪ ( R ‘𝑌)) ∖ ( L ‘𝑌)))
41		difundir 4281	. . . . . . . . . 10 ⊢ ((( L ‘𝑋) ∪ ( R ‘𝑋)) ∖ ( L ‘𝑋)) = ((( L ‘𝑋) ∖ ( L ‘𝑋)) ∪ (( R ‘𝑋) ∖ ( L ‘𝑋)))
42		difid 4371	. . . . . . . . . . 11 ⊢ (( L ‘𝑋) ∖ ( L ‘𝑋)) = ∅
43	42	uneq1i 4160	. . . . . . . . . 10 ⊢ ((( L ‘𝑋) ∖ ( L ‘𝑋)) ∪ (( R ‘𝑋) ∖ ( L ‘𝑋))) = (∅ ∪ (( R ‘𝑋) ∖ ( L ‘𝑋)))
44		0un 4393	. . . . . . . . . 10 ⊢ (∅ ∪ (( R ‘𝑋) ∖ ( L ‘𝑋))) = (( R ‘𝑋) ∖ ( L ‘𝑋))
45	41, 43, 44	3eqtri 2765	. . . . . . . . 9 ⊢ ((( L ‘𝑋) ∪ ( R ‘𝑋)) ∖ ( L ‘𝑋)) = (( R ‘𝑋) ∖ ( L ‘𝑋))
46		incom 4202	. . . . . . . . . . 11 ⊢ (( L ‘𝑋) ∩ ( R ‘𝑋)) = (( R ‘𝑋) ∩ ( L ‘𝑋))
47		lltropt 27367	. . . . . . . . . . . 12 ⊢ ( L ‘𝑋) <<s ( R ‘𝑋)
48		ssltdisj 27322	. . . . . . . . . . . 12 ⊢ (( L ‘𝑋) <<s ( R ‘𝑋) → (( L ‘𝑋) ∩ ( R ‘𝑋)) = ∅)
49	47, 48	mp1i 13	. . . . . . . . . . 11 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → (( L ‘𝑋) ∩ ( R ‘𝑋)) = ∅)
50	46, 49	eqtr3id 2787	. . . . . . . . . 10 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → (( R ‘𝑋) ∩ ( L ‘𝑋)) = ∅)
51		disjdif2 4480	. . . . . . . . . 10 ⊢ ((( R ‘𝑋) ∩ ( L ‘𝑋)) = ∅ → (( R ‘𝑋) ∖ ( L ‘𝑋)) = ( R ‘𝑋))
52	50, 51	syl 17	. . . . . . . . 9 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → (( R ‘𝑋) ∖ ( L ‘𝑋)) = ( R ‘𝑋))
53	45, 52	eqtrid 2785	. . . . . . . 8 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → ((( L ‘𝑋) ∪ ( R ‘𝑋)) ∖ ( L ‘𝑋)) = ( R ‘𝑋))
54		difundir 4281	. . . . . . . . . 10 ⊢ ((( L ‘𝑌) ∪ ( R ‘𝑌)) ∖ ( L ‘𝑌)) = ((( L ‘𝑌) ∖ ( L ‘𝑌)) ∪ (( R ‘𝑌) ∖ ( L ‘𝑌)))
55		difid 4371	. . . . . . . . . . 11 ⊢ (( L ‘𝑌) ∖ ( L ‘𝑌)) = ∅
56	55	uneq1i 4160	. . . . . . . . . 10 ⊢ ((( L ‘𝑌) ∖ ( L ‘𝑌)) ∪ (( R ‘𝑌) ∖ ( L ‘𝑌))) = (∅ ∪ (( R ‘𝑌) ∖ ( L ‘𝑌)))
57		0un 4393	. . . . . . . . . 10 ⊢ (∅ ∪ (( R ‘𝑌) ∖ ( L ‘𝑌))) = (( R ‘𝑌) ∖ ( L ‘𝑌))
58	54, 56, 57	3eqtri 2765	. . . . . . . . 9 ⊢ ((( L ‘𝑌) ∪ ( R ‘𝑌)) ∖ ( L ‘𝑌)) = (( R ‘𝑌) ∖ ( L ‘𝑌))
59		incom 4202	. . . . . . . . . . 11 ⊢ (( L ‘𝑌) ∩ ( R ‘𝑌)) = (( R ‘𝑌) ∩ ( L ‘𝑌))
60		lltropt 27367	. . . . . . . . . . . 12 ⊢ ( L ‘𝑌) <<s ( R ‘𝑌)
61		ssltdisj 27322	. . . . . . . . . . . 12 ⊢ (( L ‘𝑌) <<s ( R ‘𝑌) → (( L ‘𝑌) ∩ ( R ‘𝑌)) = ∅)
62	60, 61	mp1i 13	. . . . . . . . . . 11 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → (( L ‘𝑌) ∩ ( R ‘𝑌)) = ∅)
63	59, 62	eqtr3id 2787	. . . . . . . . . 10 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → (( R ‘𝑌) ∩ ( L ‘𝑌)) = ∅)
64		disjdif2 4480	. . . . . . . . . 10 ⊢ ((( R ‘𝑌) ∩ ( L ‘𝑌)) = ∅ → (( R ‘𝑌) ∖ ( L ‘𝑌)) = ( R ‘𝑌))
65	63, 64	syl 17	. . . . . . . . 9 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → (( R ‘𝑌) ∖ ( L ‘𝑌)) = ( R ‘𝑌))
66	58, 65	eqtrid 2785	. . . . . . . 8 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → ((( L ‘𝑌) ∪ ( R ‘𝑌)) ∖ ( L ‘𝑌)) = ( R ‘𝑌))
67	40, 53, 66	3eqtr3d 2781	. . . . . . 7 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → ( R ‘𝑋) = ( R ‘𝑌))
68	36, 67	oveq12d 7427	. . . . . 6 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → (( L ‘𝑋) |s ( R ‘𝑋)) = (( L ‘𝑌) |s ( R ‘𝑌)))
69		simpll1 1213	. . . . . . 7 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → 𝑋 ∈ No )
70		lrcut 27397	. . . . . . 7 ⊢ (𝑋 ∈ No → (( L ‘𝑋) |s ( R ‘𝑋)) = 𝑋)
71	69, 70	syl 17	. . . . . 6 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → (( L ‘𝑋) |s ( R ‘𝑋)) = 𝑋)
72		simpll2 1214	. . . . . . 7 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → 𝑌 ∈ No )
73		lrcut 27397	. . . . . . 7 ⊢ (𝑌 ∈ No → (( L ‘𝑌) |s ( R ‘𝑌)) = 𝑌)
74	72, 73	syl 17	. . . . . 6 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → (( L ‘𝑌) |s ( R ‘𝑌)) = 𝑌)
75	68, 71, 74	3eqtr3d 2781	. . . . 5 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) ∧ ( L ‘𝑋) = ( L ‘𝑌)) → 𝑋 = 𝑌)
76	35, 75	mtand 815	. . . 4 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → ¬ ( L ‘𝑋) = ( L ‘𝑌))
77		dfpss2 4086	. . . 4 ⊢ (( L ‘𝑋) ⊊ ( L ‘𝑌) ↔ (( L ‘𝑋) ⊆ ( L ‘𝑌) ∧ ¬ ( L ‘𝑋) = ( L ‘𝑌)))
78	28, 76, 77	sylanbrc 584	. . 3 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ 𝑋 <s 𝑌) → ( L ‘𝑋) ⊊ ( L ‘𝑌))
79	78	ex 414	. 2 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → (𝑋 <s 𝑌 → ( L ‘𝑋) ⊊ ( L ‘𝑌)))
80		dfpss3 4087	. . 3 ⊢ (( L ‘𝑋) ⊊ ( L ‘𝑌) ↔ (( L ‘𝑋) ⊆ ( L ‘𝑌) ∧ ¬ ( L ‘𝑌) ⊆ ( L ‘𝑋)))
81		ssdif0 4364	. . . . . . 7 ⊢ (( L ‘𝑌) ⊆ ( L ‘𝑋) ↔ (( L ‘𝑌) ∖ ( L ‘𝑋)) = ∅)
82	81	necon3bbii 2989	. . . . . 6 ⊢ (¬ ( L ‘𝑌) ⊆ ( L ‘𝑋) ↔ (( L ‘𝑌) ∖ ( L ‘𝑋)) ≠ ∅)
83		n0 4347	. . . . . 6 ⊢ ((( L ‘𝑌) ∖ ( L ‘𝑋)) ≠ ∅ ↔ ∃𝑥 𝑥 ∈ (( L ‘𝑌) ∖ ( L ‘𝑋)))
84	82, 83	bitri 275	. . . . 5 ⊢ (¬ ( L ‘𝑌) ⊆ ( L ‘𝑋) ↔ ∃𝑥 𝑥 ∈ (( L ‘𝑌) ∖ ( L ‘𝑋)))
85		eldif 3959	. . . . . . 7 ⊢ (𝑥 ∈ (( L ‘𝑌) ∖ ( L ‘𝑋)) ↔ (𝑥 ∈ ( L ‘𝑌) ∧ ¬ 𝑥 ∈ ( L ‘𝑋)))
86	22	a1i 11	. . . . . . . . . . . 12 ⊢ (𝑌 ∈ No → ( L ‘𝑌) = {𝑥 ∈ ( O ‘( bday ‘𝑌)) ∣ 𝑥 <s 𝑌})
87	86	eleq2d 2820	. . . . . . . . . . 11 ⊢ (𝑌 ∈ No → (𝑥 ∈ ( L ‘𝑌) ↔ 𝑥 ∈ {𝑥 ∈ ( O ‘( bday ‘𝑌)) ∣ 𝑥 <s 𝑌}))
88	87, 25	bitrdi 287	. . . . . . . . . 10 ⊢ (𝑌 ∈ No → (𝑥 ∈ ( L ‘𝑌) ↔ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)))
89	17	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝑋 ∈ No → ( L ‘𝑋) = {𝑥 ∈ ( O ‘( bday ‘𝑋)) ∣ 𝑥 <s 𝑋})
90	89	eleq2d 2820	. . . . . . . . . . . . 13 ⊢ (𝑋 ∈ No → (𝑥 ∈ ( L ‘𝑋) ↔ 𝑥 ∈ {𝑥 ∈ ( O ‘( bday ‘𝑋)) ∣ 𝑥 <s 𝑋}))
91	90, 20	bitrdi 287	. . . . . . . . . . . 12 ⊢ (𝑋 ∈ No → (𝑥 ∈ ( L ‘𝑋) ↔ (𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑋)))
92	91	notbid 318	. . . . . . . . . . 11 ⊢ (𝑋 ∈ No → (¬ 𝑥 ∈ ( L ‘𝑋) ↔ ¬ (𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑋)))
93		ianor 981	. . . . . . . . . . 11 ⊢ (¬ (𝑥 ∈ ( O ‘( bday ‘𝑋)) ∧ 𝑥 <s 𝑋) ↔ (¬ 𝑥 ∈ ( O ‘( bday ‘𝑋)) ∨ ¬ 𝑥 <s 𝑋))
94	92, 93	bitrdi 287	. . . . . . . . . 10 ⊢ (𝑋 ∈ No → (¬ 𝑥 ∈ ( L ‘𝑋) ↔ (¬ 𝑥 ∈ ( O ‘( bday ‘𝑋)) ∨ ¬ 𝑥 <s 𝑋)))
95	88, 94	bi2anan9r 639	. . . . . . . . 9 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ) → ((𝑥 ∈ ( L ‘𝑌) ∧ ¬ 𝑥 ∈ ( L ‘𝑋)) ↔ ((𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌) ∧ (¬ 𝑥 ∈ ( O ‘( bday ‘𝑋)) ∨ ¬ 𝑥 <s 𝑋))))
96	95	3adant3 1133	. . . . . . . 8 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → ((𝑥 ∈ ( L ‘𝑌) ∧ ¬ 𝑥 ∈ ( L ‘𝑋)) ↔ ((𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌) ∧ (¬ 𝑥 ∈ ( O ‘( bday ‘𝑋)) ∨ ¬ 𝑥 <s 𝑋))))
97		simprl 770	. . . . . . . . . . . 12 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) → 𝑥 ∈ ( O ‘( bday ‘𝑌)))
98		simpl3 1194	. . . . . . . . . . . . 13 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) → ( bday ‘𝑋) = ( bday ‘𝑌))
99	98	fveq2d 6896	. . . . . . . . . . . 12 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) → ( O ‘( bday ‘𝑋)) = ( O ‘( bday ‘𝑌)))
100	97, 99	eleqtrrd 2837	. . . . . . . . . . 11 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) → 𝑥 ∈ ( O ‘( bday ‘𝑋)))
101	100	pm2.24d 151	. . . . . . . . . 10 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) → (¬ 𝑥 ∈ ( O ‘( bday ‘𝑋)) → 𝑋 <s 𝑌))
102		simpll1 1213	. . . . . . . . . . . 12 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) ∧ ¬ 𝑥 <s 𝑋) → 𝑋 ∈ No )
103		oldssno 27356	. . . . . . . . . . . . . 14 ⊢ ( O ‘( bday ‘𝑌)) ⊆ No
104	103, 97	sselid 3981	. . . . . . . . . . . . 13 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) → 𝑥 ∈ No )
105	104	adantr 482	. . . . . . . . . . . 12 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) ∧ ¬ 𝑥 <s 𝑋) → 𝑥 ∈ No )
106		simpll2 1214	. . . . . . . . . . . 12 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) ∧ ¬ 𝑥 <s 𝑋) → 𝑌 ∈ No )
107		simpl1 1192	. . . . . . . . . . . . . 14 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) → 𝑋 ∈ No )
108		slenlt 27255	. . . . . . . . . . . . . 14 ⊢ ((𝑋 ∈ No ∧ 𝑥 ∈ No ) → (𝑋 ≤s 𝑥 ↔ ¬ 𝑥 <s 𝑋))
109	107, 104, 108	syl2anc 585	. . . . . . . . . . . . 13 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) → (𝑋 ≤s 𝑥 ↔ ¬ 𝑥 <s 𝑋))
110	109	biimpar 479	. . . . . . . . . . . 12 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) ∧ ¬ 𝑥 <s 𝑋) → 𝑋 ≤s 𝑥)
111		simplrr 777	. . . . . . . . . . . 12 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) ∧ ¬ 𝑥 <s 𝑋) → 𝑥 <s 𝑌)
112	102, 105, 106, 110, 111	slelttrd 27264	. . . . . . . . . . 11 ⊢ ((((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) ∧ ¬ 𝑥 <s 𝑋) → 𝑋 <s 𝑌)
113	112	ex 414	. . . . . . . . . 10 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) → (¬ 𝑥 <s 𝑋 → 𝑋 <s 𝑌))
114	101, 113	jaod 858	. . . . . . . . 9 ⊢ (((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) ∧ (𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌)) → ((¬ 𝑥 ∈ ( O ‘( bday ‘𝑋)) ∨ ¬ 𝑥 <s 𝑋) → 𝑋 <s 𝑌))
115	114	expimpd 455	. . . . . . . 8 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → (((𝑥 ∈ ( O ‘( bday ‘𝑌)) ∧ 𝑥 <s 𝑌) ∧ (¬ 𝑥 ∈ ( O ‘( bday ‘𝑋)) ∨ ¬ 𝑥 <s 𝑋)) → 𝑋 <s 𝑌))
116	96, 115	sylbid 239	. . . . . . 7 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → ((𝑥 ∈ ( L ‘𝑌) ∧ ¬ 𝑥 ∈ ( L ‘𝑋)) → 𝑋 <s 𝑌))
117	85, 116	biimtrid 241	. . . . . 6 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → (𝑥 ∈ (( L ‘𝑌) ∖ ( L ‘𝑋)) → 𝑋 <s 𝑌))
118	117	exlimdv 1937	. . . . 5 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → (∃𝑥 𝑥 ∈ (( L ‘𝑌) ∖ ( L ‘𝑋)) → 𝑋 <s 𝑌))
119	84, 118	biimtrid 241	. . . 4 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → (¬ ( L ‘𝑌) ⊆ ( L ‘𝑋) → 𝑋 <s 𝑌))
120	119	adantld 492	. . 3 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → ((( L ‘𝑋) ⊆ ( L ‘𝑌) ∧ ¬ ( L ‘𝑌) ⊆ ( L ‘𝑋)) → 𝑋 <s 𝑌))
121	80, 120	biimtrid 241	. 2 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → (( L ‘𝑋) ⊊ ( L ‘𝑌) → 𝑋 <s 𝑌))
122	79, 121	impbid 211	1 ⊢ ((𝑋 ∈ No ∧ 𝑌 ∈ No ∧ ( bday ‘𝑋) = ( bday ‘𝑌)) → (𝑋 <s 𝑌 ↔ ( L ‘𝑋) ⊊ ( L ‘𝑌)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 397   ∨ wo 846   ∧ w3a 1088   = wceq 1542  ∃wex 1782   ∈ wcel 2107   ≠ wne 2941  {crab 3433   ∖ cdif 3946   ∪ cun 3947   ∩ cin 3948   ⊆ wss 3949   ⊊ wpss 3950  ∅c0 4323   class class class wbr 5149  ‘cfv 6544  (class class class)co 7409   No csur 27143   <s cslt 27144   bday cbday 27145   ≤s csle 27247   <<s csslt 27282   |s cscut 27284   O cold 27338   L cleft 27340   R cright 27341

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5286  ax-sep 5300  ax-nul 5307  ax-pow 5364  ax-pr 5428  ax-un 7725

This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3779  df-csb 3895  df-dif 3952  df-un 3954  df-in 3956  df-ss 3966  df-pss 3968  df-nul 4324  df-if 4530  df-pw 4605  df-sn 4630  df-pr 4632  df-tp 4634  df-op 4636  df-uni 4910  df-int 4952  df-iun 5000  df-br 5150  df-opab 5212  df-mpt 5233  df-tr 5267  df-id 5575  df-eprel 5581  df-po 5589  df-so 5590  df-fr 5632  df-we 5634  df-xp 5683  df-rel 5684  df-cnv 5685  df-co 5686  df-dm 5687  df-rn 5688  df-res 5689  df-ima 5690  df-pred 6301  df-ord 6368  df-on 6369  df-suc 6371  df-iota 6496  df-fun 6546  df-fn 6547  df-f 6548  df-f1 6549  df-fo 6550  df-f1o 6551  df-fv 6552  df-riota 7365  df-ov 7412  df-oprab 7413  df-mpo 7414  df-2nd 7976  df-frecs 8266  df-wrecs 8297  df-recs 8371  df-1o 8466  df-2o 8467  df-no 27146  df-slt 27147  df-bday 27148  df-sle 27248  df-sslt 27283  df-scut 27285  df-made 27342  df-old 27343  df-left 27345  df-right 27346

This theorem is referenced by: (None)