Theorem slerec 27882

Description: A comparison law for surreals considered as cuts of sets of surreals. Definition from [Conway] p. 4. Theorem 4 of [Alling] p. 186. Theorem 2.5 of [Gonshor] p. 9. (Contributed by Scott Fenton, 11-Dec-2021.)

Assertion

Ref	Expression
slerec	⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷))) → (𝑋 ≤s 𝑌 ↔ (∀𝑑 ∈ 𝐷 𝑋 <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑌)))

Distinct variable groups:   𝐴,𝑎,𝑑   𝐵,𝑎,𝑑   𝐶,𝑎,𝑑   𝐷,𝑎,𝑑   𝑋,𝑎,𝑑   𝑌,𝑎,𝑑

Proof of Theorem slerec

Dummy variables 𝑏 𝑐 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		scutcl 27865	. . . . . . . 8 ⊢ (𝐴 <<s 𝐵 → (𝐴 |s 𝐵) ∈ No )
2	1	ad3antrrr 729	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐴 |s 𝐵) ∈ No )
3		scutcl 27865	. . . . . . . 8 ⊢ (𝐶 <<s 𝐷 → (𝐶 |s 𝐷) ∈ No )
4	3	ad3antlr 730	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐶 |s 𝐷) ∈ No )
5		ssltss2 27852	. . . . . . . . 9 ⊢ (𝐶 <<s 𝐷 → 𝐷 ⊆ No )
6	5	ad2antlr 726	. . . . . . . 8 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐷 ⊆ No )
7	6	sselda 4008	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → 𝑑 ∈ No )
8		simplr 768	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
9		scutcut 27864	. . . . . . . . . . . 12 ⊢ (𝐶 <<s 𝐷 → ((𝐶 |s 𝐷) ∈ No ∧ 𝐶 <<s {(𝐶 |s 𝐷)} ∧ {(𝐶 |s 𝐷)} <<s 𝐷))
10	9	simp3d 1144	. . . . . . . . . . 11 ⊢ (𝐶 <<s 𝐷 → {(𝐶 |s 𝐷)} <<s 𝐷)
11	10	ad2antlr 726	. . . . . . . . . 10 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → {(𝐶 |s 𝐷)} <<s 𝐷)
12		ssltsep 27853	. . . . . . . . . 10 ⊢ ({(𝐶 |s 𝐷)} <<s 𝐷 → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑)
13	11, 12	syl 17	. . . . . . . . 9 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑)
14		ovex 7481	. . . . . . . . . 10 ⊢ (𝐶 |s 𝐷) ∈ V
15		breq1 5169	. . . . . . . . . . 11 ⊢ (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑 ↔ (𝐶 |s 𝐷) <s 𝑑))
16	15	ralbidv 3184	. . . . . . . . . 10 ⊢ (𝑎 = (𝐶 |s 𝐷) → (∀𝑑 ∈ 𝐷 𝑎 <s 𝑑 ↔ ∀𝑑 ∈ 𝐷 (𝐶 |s 𝐷) <s 𝑑))
17	14, 16	ralsn 4705	. . . . . . . . 9 ⊢ (∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑 ↔ ∀𝑑 ∈ 𝐷 (𝐶 |s 𝐷) <s 𝑑)
18	13, 17	sylib 218	. . . . . . . 8 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑 ∈ 𝐷 (𝐶 |s 𝐷) <s 𝑑)
19	18	r19.21bi 3257	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐶 |s 𝐷) <s 𝑑)
20	2, 4, 7, 8, 19	slelttrd 27824	. . . . . 6 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐴 |s 𝐵) <s 𝑑)
21	20	ralrimiva 3152	. . . . 5 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑)
22		ssltss1 27851	. . . . . . . . . 10 ⊢ (𝐴 <<s 𝐵 → 𝐴 ⊆ No )
23	22	adantr 480	. . . . . . . . 9 ⊢ ((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) → 𝐴 ⊆ No )
24	23	adantr 480	. . . . . . . 8 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐴 ⊆ No )
25	24	sselda 4008	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → 𝑎 ∈ No )
26	1	ad3antrrr 729	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → (𝐴 |s 𝐵) ∈ No )
27	3	ad3antlr 730	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → (𝐶 |s 𝐷) ∈ No )
28		scutcut 27864	. . . . . . . . . . . . 13 ⊢ (𝐴 <<s 𝐵 → ((𝐴 |s 𝐵) ∈ No ∧ 𝐴 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐵))
29	28	simp2d 1143	. . . . . . . . . . . 12 ⊢ (𝐴 <<s 𝐵 → 𝐴 <<s {(𝐴 |s 𝐵)})
30	29	adantr 480	. . . . . . . . . . 11 ⊢ ((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) → 𝐴 <<s {(𝐴 |s 𝐵)})
31	30	adantr 480	. . . . . . . . . 10 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐴 <<s {(𝐴 |s 𝐵)})
32		ssltsep 27853	. . . . . . . . . 10 ⊢ (𝐴 <<s {(𝐴 |s 𝐵)} → ∀𝑎 ∈ 𝐴 ∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
33	31, 32	syl 17	. . . . . . . . 9 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎 ∈ 𝐴 ∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
34	33	r19.21bi 3257	. . . . . . . 8 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → ∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
35		ovex 7481	. . . . . . . . 9 ⊢ (𝐴 |s 𝐵) ∈ V
36		breq2 5170	. . . . . . . . 9 ⊢ (𝑑 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑 ↔ 𝑎 <s (𝐴 |s 𝐵)))
37	35, 36	ralsn 4705	. . . . . . . 8 ⊢ (∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑 ↔ 𝑎 <s (𝐴 |s 𝐵))
38	34, 37	sylib 218	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → 𝑎 <s (𝐴 |s 𝐵))
39		simplr 768	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
40	25, 26, 27, 38, 39	sltletrd 27823	. . . . . 6 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → 𝑎 <s (𝐶 |s 𝐷))
41	40	ralrimiva 3152	. . . . 5 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))
42	21, 41	jca 511	. . . 4 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷)))
43		bdayelon 27839	. . . . . . 7 ⊢ ( bday ‘(𝐴 |s 𝐵)) ∈ On
44	43	onordi 6506	. . . . . 6 ⊢ Ord ( bday ‘(𝐴 |s 𝐵))
45		ordn2lp 6415	. . . . . 6 ⊢ (Ord ( bday ‘(𝐴 |s 𝐵)) → ¬ (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵))))
46	44, 45	ax-mp 5	. . . . 5 ⊢ ¬ (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))
47	3	ad2antlr 726	. . . . . . 7 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐶 |s 𝐷) ∈ No )
48	1	adantr 480	. . . . . . . 8 ⊢ ((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) → (𝐴 |s 𝐵) ∈ No )
49	48	adantr 480	. . . . . . 7 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐴 |s 𝐵) ∈ No )
50		sltnle 27816	. . . . . . 7 ⊢ (((𝐶 |s 𝐷) ∈ No ∧ (𝐴 |s 𝐵) ∈ No ) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) ↔ ¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
51	47, 49, 50	syl2anc 583	. . . . . 6 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) ↔ ¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
52	3	ad3antlr 730	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ∈ No )
53		ssltex1 27849	. . . . . . . . . . . 12 ⊢ (𝐴 <<s 𝐵 → 𝐴 ∈ V)
54	53	ad3antrrr 729	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 ∈ V)
55		snex 5451	. . . . . . . . . . 11 ⊢ {(𝐶 |s 𝐷)} ∈ V
56	54, 55	jctir 520	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 ∈ V ∧ {(𝐶 |s 𝐷)} ∈ V))
57	22	ad3antrrr 729	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 ⊆ No )
58	52	snssd 4834	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐶 |s 𝐷)} ⊆ No )
59		simplrr 777	. . . . . . . . . . . 12 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))
60		breq2 5170	. . . . . . . . . . . . . 14 ⊢ (𝑑 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑 ↔ 𝑎 <s (𝐶 |s 𝐷)))
61	14, 60	ralsn 4705	. . . . . . . . . . . . 13 ⊢ (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑 ↔ 𝑎 <s (𝐶 |s 𝐷))
62	61	ralbii 3099	. . . . . . . . . . . 12 ⊢ (∀𝑎 ∈ 𝐴 ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑 ↔ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))
63	59, 62	sylibr 234	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ 𝐴 ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑)
64	57, 58, 63	3jca 1128	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 ⊆ No ∧ {(𝐶 |s 𝐷)} ⊆ No ∧ ∀𝑎 ∈ 𝐴 ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑))
65		brsslt 27848	. . . . . . . . . 10 ⊢ (𝐴 <<s {(𝐶 |s 𝐷)} ↔ ((𝐴 ∈ V ∧ {(𝐶 |s 𝐷)} ∈ V) ∧ (𝐴 ⊆ No ∧ {(𝐶 |s 𝐷)} ⊆ No ∧ ∀𝑎 ∈ 𝐴 ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑)))
66	56, 64, 65	sylanbrc 582	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 <<s {(𝐶 |s 𝐷)})
67		ssltex2 27850	. . . . . . . . . . . 12 ⊢ (𝐴 <<s 𝐵 → 𝐵 ∈ V)
68	67	ad3antrrr 729	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐵 ∈ V)
69	68, 55	jctil 519	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐶 |s 𝐷)} ∈ V ∧ 𝐵 ∈ V))
70		ssltss2 27852	. . . . . . . . . . . 12 ⊢ (𝐴 <<s 𝐵 → 𝐵 ⊆ No )
71	70	ad3antrrr 729	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐵 ⊆ No )
72	52	adantr 480	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → (𝐶 |s 𝐷) ∈ No )
73	48	ad3antrrr 729	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → (𝐴 |s 𝐵) ∈ No )
74	71	sselda 4008	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → 𝑏 ∈ No )
75		simplr 768	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → (𝐶 |s 𝐷) <s (𝐴 |s 𝐵))
76	28	simp3d 1144	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐴 <<s 𝐵 → {(𝐴 |s 𝐵)} <<s 𝐵)
77	76	ad3antrrr 729	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} <<s 𝐵)
78		ssltsep 27853	. . . . . . . . . . . . . . . . 17 ⊢ ({(𝐴 |s 𝐵)} <<s 𝐵 → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏)
79	77, 78	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏)
80		breq1 5169	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑏 ↔ (𝐴 |s 𝐵) <s 𝑏))
81	80	ralbidv 3184	. . . . . . . . . . . . . . . . 17 ⊢ (𝑎 = (𝐴 |s 𝐵) → (∀𝑏 ∈ 𝐵 𝑎 <s 𝑏 ↔ ∀𝑏 ∈ 𝐵 (𝐴 |s 𝐵) <s 𝑏))
82	35, 81	ralsn 4705	. . . . . . . . . . . . . . . 16 ⊢ (∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏 ↔ ∀𝑏 ∈ 𝐵 (𝐴 |s 𝐵) <s 𝑏)
83	79, 82	sylib 218	. . . . . . . . . . . . . . 15 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏 ∈ 𝐵 (𝐴 |s 𝐵) <s 𝑏)
84	83	r19.21bi 3257	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → (𝐴 |s 𝐵) <s 𝑏)
85	72, 73, 74, 75, 84	slttrd 27822	. . . . . . . . . . . . 13 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → (𝐶 |s 𝐷) <s 𝑏)
86	85	ralrimiva 3152	. . . . . . . . . . . 12 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏 ∈ 𝐵 (𝐶 |s 𝐷) <s 𝑏)
87		breq1 5169	. . . . . . . . . . . . . 14 ⊢ (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑏 ↔ (𝐶 |s 𝐷) <s 𝑏))
88	87	ralbidv 3184	. . . . . . . . . . . . 13 ⊢ (𝑎 = (𝐶 |s 𝐷) → (∀𝑏 ∈ 𝐵 𝑎 <s 𝑏 ↔ ∀𝑏 ∈ 𝐵 (𝐶 |s 𝐷) <s 𝑏))
89	14, 88	ralsn 4705	. . . . . . . . . . . 12 ⊢ (∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏 ↔ ∀𝑏 ∈ 𝐵 (𝐶 |s 𝐷) <s 𝑏)
90	86, 89	sylibr 234	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏)
91	58, 71, 90	3jca 1128	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐶 |s 𝐷)} ⊆ No ∧ 𝐵 ⊆ No ∧ ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏))
92		brsslt 27848	. . . . . . . . . 10 ⊢ ({(𝐶 |s 𝐷)} <<s 𝐵 ↔ (({(𝐶 |s 𝐷)} ∈ V ∧ 𝐵 ∈ V) ∧ ({(𝐶 |s 𝐷)} ⊆ No ∧ 𝐵 ⊆ No ∧ ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏)))
93	69, 91, 92	sylanbrc 582	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐶 |s 𝐷)} <<s 𝐵)
94		sltirr 27809	. . . . . . . . . . . . . 14 ⊢ ((𝐴 |s 𝐵) ∈ No → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
95	49, 94	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
96		breq1 5169	. . . . . . . . . . . . . 14 ⊢ ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → ((𝐴 |s 𝐵) <s (𝐴 |s 𝐵) ↔ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
97	96	notbid 318	. . . . . . . . . . . . 13 ⊢ ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → (¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵) ↔ ¬ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
98	95, 97	syl5ibcom 245	. . . . . . . . . . . 12 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → ¬ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
99	98	necon2ad 2961	. . . . . . . . . . 11 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) → (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷)))
100	99	imp 406	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷))
101	100	necomd 3002	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ≠ (𝐴 |s 𝐵))
102		scutbdaylt 27881	. . . . . . . . 9 ⊢ (((𝐶 |s 𝐷) ∈ No ∧ (𝐴 <<s {(𝐶 |s 𝐷)} ∧ {(𝐶 |s 𝐷)} <<s 𝐵) ∧ (𝐶 |s 𝐷) ≠ (𝐴 |s 𝐵)) → ( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)))
103	52, 66, 93, 101, 102	syl121anc 1375	. . . . . . . 8 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)))
104	1	ad3antrrr 729	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 |s 𝐵) ∈ No )
105		ssltex1 27849	. . . . . . . . . . . 12 ⊢ (𝐶 <<s 𝐷 → 𝐶 ∈ V)
106	105	ad3antlr 730	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 ∈ V)
107		snex 5451	. . . . . . . . . . 11 ⊢ {(𝐴 |s 𝐵)} ∈ V
108	106, 107	jctir 520	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 ∈ V ∧ {(𝐴 |s 𝐵)} ∈ V))
109		ssltss1 27851	. . . . . . . . . . . 12 ⊢ (𝐶 <<s 𝐷 → 𝐶 ⊆ No )
110	109	ad3antlr 730	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 ⊆ No )
111	104	snssd 4834	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} ⊆ No )
112	110	sselda 4008	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → 𝑐 ∈ No )
113	52	adantr 480	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → (𝐶 |s 𝐷) ∈ No )
114	48	ad3antrrr 729	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → (𝐴 |s 𝐵) ∈ No )
115	9	simp2d 1143	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐶 <<s 𝐷 → 𝐶 <<s {(𝐶 |s 𝐷)})
116	115	ad3antlr 730	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 <<s {(𝐶 |s 𝐷)})
117		ssltsep 27853	. . . . . . . . . . . . . . . . 17 ⊢ (𝐶 <<s {(𝐶 |s 𝐷)} → ∀𝑐 ∈ 𝐶 ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
118	116, 117	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑐 ∈ 𝐶 ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
119	118	r19.21bi 3257	. . . . . . . . . . . . . . 15 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
120		breq2 5170	. . . . . . . . . . . . . . . 16 ⊢ (𝑑 = (𝐶 |s 𝐷) → (𝑐 <s 𝑑 ↔ 𝑐 <s (𝐶 |s 𝐷)))
121	14, 120	ralsn 4705	. . . . . . . . . . . . . . 15 ⊢ (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑 ↔ 𝑐 <s (𝐶 |s 𝐷))
122	119, 121	sylib 218	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → 𝑐 <s (𝐶 |s 𝐷))
123		simplr 768	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → (𝐶 |s 𝐷) <s (𝐴 |s 𝐵))
124	112, 113, 114, 122, 123	slttrd 27822	. . . . . . . . . . . . 13 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → 𝑐 <s (𝐴 |s 𝐵))
125		breq2 5170	. . . . . . . . . . . . . 14 ⊢ (𝑎 = (𝐴 |s 𝐵) → (𝑐 <s 𝑎 ↔ 𝑐 <s (𝐴 |s 𝐵)))
126	35, 125	ralsn 4705	. . . . . . . . . . . . 13 ⊢ (∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎 ↔ 𝑐 <s (𝐴 |s 𝐵))
127	124, 126	sylibr 234	. . . . . . . . . . . 12 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)
128	127	ralrimiva 3152	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑐 ∈ 𝐶 ∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)
129	110, 111, 128	3jca 1128	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 ⊆ No ∧ {(𝐴 |s 𝐵)} ⊆ No ∧ ∀𝑐 ∈ 𝐶 ∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎))
130		brsslt 27848	. . . . . . . . . 10 ⊢ (𝐶 <<s {(𝐴 |s 𝐵)} ↔ ((𝐶 ∈ V ∧ {(𝐴 |s 𝐵)} ∈ V) ∧ (𝐶 ⊆ No ∧ {(𝐴 |s 𝐵)} ⊆ No ∧ ∀𝑐 ∈ 𝐶 ∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)))
131	108, 129, 130	sylanbrc 582	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 <<s {(𝐴 |s 𝐵)})
132		ssltex2 27850	. . . . . . . . . . . 12 ⊢ (𝐶 <<s 𝐷 → 𝐷 ∈ V)
133	132	ad3antlr 730	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐷 ∈ V)
134	133, 107	jctil 519	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐴 |s 𝐵)} ∈ V ∧ 𝐷 ∈ V))
135	5	ad3antlr 730	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐷 ⊆ No )
136		simplrl 776	. . . . . . . . . . . 12 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑)
137		breq1 5169	. . . . . . . . . . . . . 14 ⊢ (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
138	137	ralbidv 3184	. . . . . . . . . . . . 13 ⊢ (𝑎 = (𝐴 |s 𝐵) → (∀𝑑 ∈ 𝐷 𝑎 <s 𝑑 ↔ ∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑))
139	35, 138	ralsn 4705	. . . . . . . . . . . 12 ⊢ (∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑 ↔ ∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑)
140	136, 139	sylibr 234	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑)
141	111, 135, 140	3jca 1128	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐴 |s 𝐵)} ⊆ No ∧ 𝐷 ⊆ No ∧ ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑))
142		brsslt 27848	. . . . . . . . . 10 ⊢ ({(𝐴 |s 𝐵)} <<s 𝐷 ↔ (({(𝐴 |s 𝐵)} ∈ V ∧ 𝐷 ∈ V) ∧ ({(𝐴 |s 𝐵)} ⊆ No ∧ 𝐷 ⊆ No ∧ ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑)))
143	134, 141, 142	sylanbrc 582	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} <<s 𝐷)
144		scutbdaylt 27881	. . . . . . . . 9 ⊢ (((𝐴 |s 𝐵) ∈ No ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷) ∧ (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷)) → ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))
145	104, 131, 143, 100, 144	syl121anc 1375	. . . . . . . 8 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))
146	103, 145	jca 511	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵))))
147	146	ex 412	. . . . . 6 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) → (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))))
148	51, 147	sylbird 260	. . . . 5 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → (¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷) → (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))))
149	46, 148	mt3i 149	. . . 4 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
150	42, 149	impbida 800	. . 3 ⊢ ((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) → ((𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷) ↔ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))))
151		breq12 5171	. . . 4 ⊢ ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → (𝑋 ≤s 𝑌 ↔ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
152		breq1 5169	. . . . . 6 ⊢ (𝑋 = (𝐴 |s 𝐵) → (𝑋 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
153	152	ralbidv 3184	. . . . 5 ⊢ (𝑋 = (𝐴 |s 𝐵) → (∀𝑑 ∈ 𝐷 𝑋 <s 𝑑 ↔ ∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑))
154		breq2 5170	. . . . . 6 ⊢ (𝑌 = (𝐶 |s 𝐷) → (𝑎 <s 𝑌 ↔ 𝑎 <s (𝐶 |s 𝐷)))
155	154	ralbidv 3184	. . . . 5 ⊢ (𝑌 = (𝐶 |s 𝐷) → (∀𝑎 ∈ 𝐴 𝑎 <s 𝑌 ↔ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷)))
156	153, 155	bi2anan9 637	. . . 4 ⊢ ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → ((∀𝑑 ∈ 𝐷 𝑋 <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑌) ↔ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))))
157	151, 156	bibi12d 345	. . 3 ⊢ ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → ((𝑋 ≤s 𝑌 ↔ (∀𝑑 ∈ 𝐷 𝑋 <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑌)) ↔ ((𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷) ↔ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷)))))
158	150, 157	imbitrrid 246	. 2 ⊢ ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → ((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) → (𝑋 ≤s 𝑌 ↔ (∀𝑑 ∈ 𝐷 𝑋 <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑌))))
159	158	impcom 407	1 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷))) → (𝑋 ≤s 𝑌 ↔ (∀𝑑 ∈ 𝐷 𝑋 <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑌)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1087   = wceq 1537   ∈ wcel 2108   ≠ wne 2946  ∀wral 3067  Vcvv 3488   ⊆ wss 3976  {csn 4648   class class class wbr 5166  Ord word 6394  ‘cfv 6573  (class class class)co 7448   No csur 27702   <s cslt 27703   bday cbday 27704   ≤s csle 27807   <<s csslt 27843   |s cscut 27845

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-rep 5303  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447  ax-un 7770

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3or 1088  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-ral 3068  df-rex 3077  df-rmo 3388  df-reu 3389  df-rab 3444  df-v 3490  df-sbc 3805  df-csb 3922  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-pss 3996  df-nul 4353  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-tp 4653  df-op 4655  df-uni 4932  df-int 4971  df-br 5167  df-opab 5229  df-mpt 5250  df-tr 5284  df-id 5593  df-eprel 5599  df-po 5607  df-so 5608  df-fr 5652  df-we 5654  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-rn 5711  df-res 5712  df-ima 5713  df-ord 6398  df-on 6399  df-suc 6401  df-iota 6525  df-fun 6575  df-fn 6576  df-f 6577  df-f1 6578  df-fo 6579  df-f1o 6580  df-fv 6581  df-riota 7404  df-ov 7451  df-oprab 7452  df-mpo 7453  df-1o 8522  df-2o 8523  df-no 27705  df-slt 27706  df-bday 27707  df-sle 27808  df-sslt 27844  df-scut 27846

This theorem is referenced by:  sltrec  27883  nohalf  28425