Theorem slerec 27864

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 27847	. . . . . . . 8 ⊢ (𝐴 <<s 𝐵 → (𝐴 |s 𝐵) ∈ No )
2	1	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐴 |s 𝐵) ∈ No )
3		scutcl 27847	. . . . . . . 8 ⊢ (𝐶 <<s 𝐷 → (𝐶 |s 𝐷) ∈ No )
4	3	ad3antlr 731	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐶 |s 𝐷) ∈ No )
5		ssltss2 27834	. . . . . . . . 9 ⊢ (𝐶 <<s 𝐷 → 𝐷 ⊆ No )
6	5	ad2antlr 727	. . . . . . . 8 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐷 ⊆ No )
7	6	sselda 3983	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → 𝑑 ∈ No )
8		simplr 769	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
9		scutcut 27846	. . . . . . . . . . . 12 ⊢ (𝐶 <<s 𝐷 → ((𝐶 |s 𝐷) ∈ No ∧ 𝐶 <<s {(𝐶 |s 𝐷)} ∧ {(𝐶 |s 𝐷)} <<s 𝐷))
10	9	simp3d 1145	. . . . . . . . . . 11 ⊢ (𝐶 <<s 𝐷 → {(𝐶 |s 𝐷)} <<s 𝐷)
11	10	ad2antlr 727	. . . . . . . . . 10 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → {(𝐶 |s 𝐷)} <<s 𝐷)
12		ssltsep 27835	. . . . . . . . . 10 ⊢ ({(𝐶 |s 𝐷)} <<s 𝐷 → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑)
13	11, 12	syl 17	. . . . . . . . 9 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑)
14		ovex 7464	. . . . . . . . . 10 ⊢ (𝐶 |s 𝐷) ∈ V
15		breq1 5146	. . . . . . . . . . 11 ⊢ (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑 ↔ (𝐶 |s 𝐷) <s 𝑑))
16	15	ralbidv 3178	. . . . . . . . . 10 ⊢ (𝑎 = (𝐶 |s 𝐷) → (∀𝑑 ∈ 𝐷 𝑎 <s 𝑑 ↔ ∀𝑑 ∈ 𝐷 (𝐶 |s 𝐷) <s 𝑑))
17	14, 16	ralsn 4681	. . . . . . . . 9 ⊢ (∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑 ↔ ∀𝑑 ∈ 𝐷 (𝐶 |s 𝐷) <s 𝑑)
18	13, 17	sylib 218	. . . . . . . 8 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑 ∈ 𝐷 (𝐶 |s 𝐷) <s 𝑑)
19	18	r19.21bi 3251	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐶 |s 𝐷) <s 𝑑)
20	2, 4, 7, 8, 19	slelttrd 27806	. . . . . 6 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐴 |s 𝐵) <s 𝑑)
21	20	ralrimiva 3146	. . . . 5 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑)
22		ssltss1 27833	. . . . . . . . . 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 3983	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → 𝑎 ∈ No )
26	1	ad3antrrr 730	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → (𝐴 |s 𝐵) ∈ No )
27	3	ad3antlr 731	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → (𝐶 |s 𝐷) ∈ No )
28		scutcut 27846	. . . . . . . . . . . . 13 ⊢ (𝐴 <<s 𝐵 → ((𝐴 |s 𝐵) ∈ No ∧ 𝐴 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐵))
29	28	simp2d 1144	. . . . . . . . . . . 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 27835	. . . . . . . . . 10 ⊢ (𝐴 <<s {(𝐴 |s 𝐵)} → ∀𝑎 ∈ 𝐴 ∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
33	31, 32	syl 17	. . . . . . . . 9 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎 ∈ 𝐴 ∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
34	33	r19.21bi 3251	. . . . . . . 8 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → ∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
35		ovex 7464	. . . . . . . . 9 ⊢ (𝐴 |s 𝐵) ∈ V
36		breq2 5147	. . . . . . . . 9 ⊢ (𝑑 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑 ↔ 𝑎 <s (𝐴 |s 𝐵)))
37	35, 36	ralsn 4681	. . . . . . . 8 ⊢ (∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑 ↔ 𝑎 <s (𝐴 |s 𝐵))
38	34, 37	sylib 218	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → 𝑎 <s (𝐴 |s 𝐵))
39		simplr 769	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
40	25, 26, 27, 38, 39	sltletrd 27805	. . . . . 6 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → 𝑎 <s (𝐶 |s 𝐷))
41	40	ralrimiva 3146	. . . . 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 27821	. . . . . . 7 ⊢ ( bday ‘(𝐴 |s 𝐵)) ∈ On
44	43	onordi 6495	. . . . . 6 ⊢ Ord ( bday ‘(𝐴 |s 𝐵))
45		ordn2lp 6404	. . . . . 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 727	. . . . . . 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 27798	. . . . . . 7 ⊢ (((𝐶 |s 𝐷) ∈ No ∧ (𝐴 |s 𝐵) ∈ No ) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) ↔ ¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
51	47, 49, 50	syl2anc 584	. . . . . 6 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) ↔ ¬ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
52	3	ad3antlr 731	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ∈ No )
53		ssltex1 27831	. . . . . . . . . . . 12 ⊢ (𝐴 <<s 𝐵 → 𝐴 ∈ V)
54	53	ad3antrrr 730	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 ∈ V)
55		snex 5436	. . . . . . . . . . 11 ⊢ {(𝐶 |s 𝐷)} ∈ V
56	54, 55	jctir 520	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 ∈ V ∧ {(𝐶 |s 𝐷)} ∈ V))
57	22	ad3antrrr 730	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 ⊆ No )
58	52	snssd 4809	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐶 |s 𝐷)} ⊆ No )
59		simplrr 778	. . . . . . . . . . . 12 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))
60		breq2 5147	. . . . . . . . . . . . . 14 ⊢ (𝑑 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑 ↔ 𝑎 <s (𝐶 |s 𝐷)))
61	14, 60	ralsn 4681	. . . . . . . . . . . . 13 ⊢ (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑 ↔ 𝑎 <s (𝐶 |s 𝐷))
62	61	ralbii 3093	. . . . . . . . . . . 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 1129	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 ⊆ No ∧ {(𝐶 |s 𝐷)} ⊆ No ∧ ∀𝑎 ∈ 𝐴 ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑))
65		brsslt 27830	. . . . . . . . . 10 ⊢ (𝐴 <<s {(𝐶 |s 𝐷)} ↔ ((𝐴 ∈ V ∧ {(𝐶 |s 𝐷)} ∈ V) ∧ (𝐴 ⊆ No ∧ {(𝐶 |s 𝐷)} ⊆ No ∧ ∀𝑎 ∈ 𝐴 ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑)))
66	56, 64, 65	sylanbrc 583	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 <<s {(𝐶 |s 𝐷)})
67		ssltex2 27832	. . . . . . . . . . . 12 ⊢ (𝐴 <<s 𝐵 → 𝐵 ∈ V)
68	67	ad3antrrr 730	. . . . . . . . . . 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 27834	. . . . . . . . . . . 12 ⊢ (𝐴 <<s 𝐵 → 𝐵 ⊆ No )
71	70	ad3antrrr 730	. . . . . . . . . . 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 730	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → (𝐴 |s 𝐵) ∈ No )
74	71	sselda 3983	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → 𝑏 ∈ No )
75		simplr 769	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → (𝐶 |s 𝐷) <s (𝐴 |s 𝐵))
76	28	simp3d 1145	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐴 <<s 𝐵 → {(𝐴 |s 𝐵)} <<s 𝐵)
77	76	ad3antrrr 730	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} <<s 𝐵)
78		ssltsep 27835	. . . . . . . . . . . . . . . . 17 ⊢ ({(𝐴 |s 𝐵)} <<s 𝐵 → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏)
79	77, 78	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏)
80		breq1 5146	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑏 ↔ (𝐴 |s 𝐵) <s 𝑏))
81	80	ralbidv 3178	. . . . . . . . . . . . . . . . 17 ⊢ (𝑎 = (𝐴 |s 𝐵) → (∀𝑏 ∈ 𝐵 𝑎 <s 𝑏 ↔ ∀𝑏 ∈ 𝐵 (𝐴 |s 𝐵) <s 𝑏))
82	35, 81	ralsn 4681	. . . . . . . . . . . . . . . 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 3251	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → (𝐴 |s 𝐵) <s 𝑏)
85	72, 73, 74, 75, 84	slttrd 27804	. . . . . . . . . . . . 13 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → (𝐶 |s 𝐷) <s 𝑏)
86	85	ralrimiva 3146	. . . . . . . . . . . 12 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏 ∈ 𝐵 (𝐶 |s 𝐷) <s 𝑏)
87		breq1 5146	. . . . . . . . . . . . . 14 ⊢ (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑏 ↔ (𝐶 |s 𝐷) <s 𝑏))
88	87	ralbidv 3178	. . . . . . . . . . . . 13 ⊢ (𝑎 = (𝐶 |s 𝐷) → (∀𝑏 ∈ 𝐵 𝑎 <s 𝑏 ↔ ∀𝑏 ∈ 𝐵 (𝐶 |s 𝐷) <s 𝑏))
89	14, 88	ralsn 4681	. . . . . . . . . . . 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 1129	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐶 |s 𝐷)} ⊆ No ∧ 𝐵 ⊆ No ∧ ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏))
92		brsslt 27830	. . . . . . . . . 10 ⊢ ({(𝐶 |s 𝐷)} <<s 𝐵 ↔ (({(𝐶 |s 𝐷)} ∈ V ∧ 𝐵 ∈ V) ∧ ({(𝐶 |s 𝐷)} ⊆ No ∧ 𝐵 ⊆ No ∧ ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏)))
93	69, 91, 92	sylanbrc 583	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐶 |s 𝐷)} <<s 𝐵)
94		sltirr 27791	. . . . . . . . . . . . . 14 ⊢ ((𝐴 |s 𝐵) ∈ No → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
95	49, 94	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
96		breq1 5146	. . . . . . . . . . . . . 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 2955	. . . . . . . . . . 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 2996	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ≠ (𝐴 |s 𝐵))
102		scutbdaylt 27863	. . . . . . . . 9 ⊢ (((𝐶 |s 𝐷) ∈ No ∧ (𝐴 <<s {(𝐶 |s 𝐷)} ∧ {(𝐶 |s 𝐷)} <<s 𝐵) ∧ (𝐶 |s 𝐷) ≠ (𝐴 |s 𝐵)) → ( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)))
103	52, 66, 93, 101, 102	syl121anc 1377	. . . . . . . 8 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)))
104	1	ad3antrrr 730	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 |s 𝐵) ∈ No )
105		ssltex1 27831	. . . . . . . . . . . 12 ⊢ (𝐶 <<s 𝐷 → 𝐶 ∈ V)
106	105	ad3antlr 731	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 ∈ V)
107		snex 5436	. . . . . . . . . . 11 ⊢ {(𝐴 |s 𝐵)} ∈ V
108	106, 107	jctir 520	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 ∈ V ∧ {(𝐴 |s 𝐵)} ∈ V))
109		ssltss1 27833	. . . . . . . . . . . 12 ⊢ (𝐶 <<s 𝐷 → 𝐶 ⊆ No )
110	109	ad3antlr 731	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 ⊆ No )
111	104	snssd 4809	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} ⊆ No )
112	110	sselda 3983	. . . . . . . . . . . . . 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 730	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → (𝐴 |s 𝐵) ∈ No )
115	9	simp2d 1144	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐶 <<s 𝐷 → 𝐶 <<s {(𝐶 |s 𝐷)})
116	115	ad3antlr 731	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 <<s {(𝐶 |s 𝐷)})
117		ssltsep 27835	. . . . . . . . . . . . . . . . 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 3251	. . . . . . . . . . . . . . 15 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
120		breq2 5147	. . . . . . . . . . . . . . . 16 ⊢ (𝑑 = (𝐶 |s 𝐷) → (𝑐 <s 𝑑 ↔ 𝑐 <s (𝐶 |s 𝐷)))
121	14, 120	ralsn 4681	. . . . . . . . . . . . . . 15 ⊢ (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑 ↔ 𝑐 <s (𝐶 |s 𝐷))
122	119, 121	sylib 218	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → 𝑐 <s (𝐶 |s 𝐷))
123		simplr 769	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → (𝐶 |s 𝐷) <s (𝐴 |s 𝐵))
124	112, 113, 114, 122, 123	slttrd 27804	. . . . . . . . . . . . 13 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → 𝑐 <s (𝐴 |s 𝐵))
125		breq2 5147	. . . . . . . . . . . . . 14 ⊢ (𝑎 = (𝐴 |s 𝐵) → (𝑐 <s 𝑎 ↔ 𝑐 <s (𝐴 |s 𝐵)))
126	35, 125	ralsn 4681	. . . . . . . . . . . . 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 3146	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑐 ∈ 𝐶 ∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)
129	110, 111, 128	3jca 1129	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 ⊆ No ∧ {(𝐴 |s 𝐵)} ⊆ No ∧ ∀𝑐 ∈ 𝐶 ∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎))
130		brsslt 27830	. . . . . . . . . 10 ⊢ (𝐶 <<s {(𝐴 |s 𝐵)} ↔ ((𝐶 ∈ V ∧ {(𝐴 |s 𝐵)} ∈ V) ∧ (𝐶 ⊆ No ∧ {(𝐴 |s 𝐵)} ⊆ No ∧ ∀𝑐 ∈ 𝐶 ∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)))
131	108, 129, 130	sylanbrc 583	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 <<s {(𝐴 |s 𝐵)})
132		ssltex2 27832	. . . . . . . . . . . 12 ⊢ (𝐶 <<s 𝐷 → 𝐷 ∈ V)
133	132	ad3antlr 731	. . . . . . . . . . 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 731	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐷 ⊆ No )
136		simplrl 777	. . . . . . . . . . . 12 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑)
137		breq1 5146	. . . . . . . . . . . . . 14 ⊢ (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
138	137	ralbidv 3178	. . . . . . . . . . . . 13 ⊢ (𝑎 = (𝐴 |s 𝐵) → (∀𝑑 ∈ 𝐷 𝑎 <s 𝑑 ↔ ∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑))
139	35, 138	ralsn 4681	. . . . . . . . . . . 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 1129	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐴 |s 𝐵)} ⊆ No ∧ 𝐷 ⊆ No ∧ ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑))
142		brsslt 27830	. . . . . . . . . 10 ⊢ ({(𝐴 |s 𝐵)} <<s 𝐷 ↔ (({(𝐴 |s 𝐵)} ∈ V ∧ 𝐷 ∈ V) ∧ ({(𝐴 |s 𝐵)} ⊆ No ∧ 𝐷 ⊆ No ∧ ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑)))
143	134, 141, 142	sylanbrc 583	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} <<s 𝐷)
144		scutbdaylt 27863	. . . . . . . . 9 ⊢ (((𝐴 |s 𝐵) ∈ No ∧ (𝐶 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐷) ∧ (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷)) → ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))
145	104, 131, 143, 100, 144	syl121anc 1377	. . . . . . . 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 801	. . 3 ⊢ ((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) → ((𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷) ↔ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))))
151		breq12 5148	. . . 4 ⊢ ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → (𝑋 ≤s 𝑌 ↔ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
152		breq1 5146	. . . . . 6 ⊢ (𝑋 = (𝐴 |s 𝐵) → (𝑋 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
153	152	ralbidv 3178	. . . . 5 ⊢ (𝑋 = (𝐴 |s 𝐵) → (∀𝑑 ∈ 𝐷 𝑋 <s 𝑑 ↔ ∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑))
154		breq2 5147	. . . . . 6 ⊢ (𝑌 = (𝐶 |s 𝐷) → (𝑎 <s 𝑌 ↔ 𝑎 <s (𝐶 |s 𝐷)))
155	154	ralbidv 3178	. . . . 5 ⊢ (𝑌 = (𝐶 |s 𝐷) → (∀𝑎 ∈ 𝐴 𝑎 <s 𝑌 ↔ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷)))
156	153, 155	bi2anan9 638	. . . 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 1540   ∈ wcel 2108   ≠ wne 2940  ∀wral 3061  Vcvv 3480   ⊆ wss 3951  {csn 4626   class class class wbr 5143  Ord word 6383  ‘cfv 6561  (class class class)co 7431   No csur 27684   <s cslt 27685   bday cbday 27686   ≤s csle 27789   <<s csslt 27825   |s cscut 27827

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2708  ax-rep 5279  ax-sep 5296  ax-nul 5306  ax-pow 5365  ax-pr 5432  ax-un 7755

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2892  df-ne 2941  df-ral 3062  df-rex 3071  df-rmo 3380  df-reu 3381  df-rab 3437  df-v 3482  df-sbc 3789  df-csb 3900  df-dif 3954  df-un 3956  df-in 3958  df-ss 3968  df-pss 3971  df-nul 4334  df-if 4526  df-pw 4602  df-sn 4627  df-pr 4629  df-tp 4631  df-op 4633  df-uni 4908  df-int 4947  df-br 5144  df-opab 5206  df-mpt 5226  df-tr 5260  df-id 5578  df-eprel 5584  df-po 5592  df-so 5593  df-fr 5637  df-we 5639  df-xp 5691  df-rel 5692  df-cnv 5693  df-co 5694  df-dm 5695  df-rn 5696  df-res 5697  df-ima 5698  df-ord 6387  df-on 6388  df-suc 6390  df-iota 6514  df-fun 6563  df-fn 6564  df-f 6565  df-f1 6566  df-fo 6567  df-f1o 6568  df-fv 6569  df-riota 7388  df-ov 7434  df-oprab 7435  df-mpo 7436  df-1o 8506  df-2o 8507  df-no 27687  df-slt 27688  df-bday 27689  df-sle 27790  df-sslt 27826  df-scut 27828

This theorem is referenced by:  sltrec  27865  nohalf  28407