Theorem slerec 27158

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 27141	. . . . . . . 8 ⊢ (𝐴 <<s 𝐵 → (𝐴 |s 𝐵) ∈ No )
2	1	ad3antrrr 728	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐴 |s 𝐵) ∈ No )
3		scutcl 27141	. . . . . . . 8 ⊢ (𝐶 <<s 𝐷 → (𝐶 |s 𝐷) ∈ No )
4	3	ad3antlr 729	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐶 |s 𝐷) ∈ No )
5		ssltss2 27129	. . . . . . . . 9 ⊢ (𝐶 <<s 𝐷 → 𝐷 ⊆ No )
6	5	ad2antlr 725	. . . . . . . 8 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐷 ⊆ No )
7	6	sselda 3944	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → 𝑑 ∈ No )
8		simplr 767	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
9		scutcut 27140	. . . . . . . . . . . 12 ⊢ (𝐶 <<s 𝐷 → ((𝐶 |s 𝐷) ∈ No ∧ 𝐶 <<s {(𝐶 |s 𝐷)} ∧ {(𝐶 |s 𝐷)} <<s 𝐷))
10	9	simp3d 1144	. . . . . . . . . . 11 ⊢ (𝐶 <<s 𝐷 → {(𝐶 |s 𝐷)} <<s 𝐷)
11	10	ad2antlr 725	. . . . . . . . . 10 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → {(𝐶 |s 𝐷)} <<s 𝐷)
12		ssltsep 27130	. . . . . . . . . 10 ⊢ ({(𝐶 |s 𝐷)} <<s 𝐷 → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑)
13	11, 12	syl 17	. . . . . . . . 9 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑)
14		ovex 7390	. . . . . . . . . 10 ⊢ (𝐶 |s 𝐷) ∈ V
15		breq1 5108	. . . . . . . . . . 11 ⊢ (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑 ↔ (𝐶 |s 𝐷) <s 𝑑))
16	15	ralbidv 3174	. . . . . . . . . 10 ⊢ (𝑎 = (𝐶 |s 𝐷) → (∀𝑑 ∈ 𝐷 𝑎 <s 𝑑 ↔ ∀𝑑 ∈ 𝐷 (𝐶 |s 𝐷) <s 𝑑))
17	14, 16	ralsn 4642	. . . . . . . . 9 ⊢ (∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑 ↔ ∀𝑑 ∈ 𝐷 (𝐶 |s 𝐷) <s 𝑑)
18	13, 17	sylib 217	. . . . . . . 8 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑 ∈ 𝐷 (𝐶 |s 𝐷) <s 𝑑)
19	18	r19.21bi 3234	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐶 |s 𝐷) <s 𝑑)
20	2, 4, 7, 8, 19	slelttrd 27109	. . . . . 6 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑑 ∈ 𝐷) → (𝐴 |s 𝐵) <s 𝑑)
21	20	ralrimiva 3143	. . . . 5 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑)
22		ssltss1 27128	. . . . . . . . . 10 ⊢ (𝐴 <<s 𝐵 → 𝐴 ⊆ No )
23	22	adantr 481	. . . . . . . . 9 ⊢ ((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) → 𝐴 ⊆ No )
24	23	adantr 481	. . . . . . . 8 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐴 ⊆ No )
25	24	sselda 3944	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → 𝑎 ∈ No )
26	1	ad3antrrr 728	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → (𝐴 |s 𝐵) ∈ No )
27	3	ad3antlr 729	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → (𝐶 |s 𝐷) ∈ No )
28		scutcut 27140	. . . . . . . . . . . . 13 ⊢ (𝐴 <<s 𝐵 → ((𝐴 |s 𝐵) ∈ No ∧ 𝐴 <<s {(𝐴 |s 𝐵)} ∧ {(𝐴 |s 𝐵)} <<s 𝐵))
29	28	simp2d 1143	. . . . . . . . . . . 12 ⊢ (𝐴 <<s 𝐵 → 𝐴 <<s {(𝐴 |s 𝐵)})
30	29	adantr 481	. . . . . . . . . . 11 ⊢ ((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) → 𝐴 <<s {(𝐴 |s 𝐵)})
31	30	adantr 481	. . . . . . . . . 10 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → 𝐴 <<s {(𝐴 |s 𝐵)})
32		ssltsep 27130	. . . . . . . . . 10 ⊢ (𝐴 <<s {(𝐴 |s 𝐵)} → ∀𝑎 ∈ 𝐴 ∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
33	31, 32	syl 17	. . . . . . . . 9 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎 ∈ 𝐴 ∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
34	33	r19.21bi 3234	. . . . . . . 8 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → ∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑)
35		ovex 7390	. . . . . . . . 9 ⊢ (𝐴 |s 𝐵) ∈ V
36		breq2 5109	. . . . . . . . 9 ⊢ (𝑑 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑 ↔ 𝑎 <s (𝐴 |s 𝐵)))
37	35, 36	ralsn 4642	. . . . . . . 8 ⊢ (∀𝑑 ∈ {(𝐴 |s 𝐵)}𝑎 <s 𝑑 ↔ 𝑎 <s (𝐴 |s 𝐵))
38	34, 37	sylib 217	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → 𝑎 <s (𝐴 |s 𝐵))
39		simplr 767	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷))
40	25, 26, 27, 38, 39	sltletrd 27108	. . . . . 6 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) ∧ 𝑎 ∈ 𝐴) → 𝑎 <s (𝐶 |s 𝐷))
41	40	ralrimiva 3143	. . . . 5 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))
42	21, 41	jca 512	. . . 4 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)) → (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷)))
43		bdayelon 27116	. . . . . . 7 ⊢ ( bday ‘(𝐴 |s 𝐵)) ∈ On
44	43	onordi 6428	. . . . . 6 ⊢ Ord ( bday ‘(𝐴 |s 𝐵))
45		ordn2lp 6337	. . . . . 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 725	. . . . . . 7 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐶 |s 𝐷) ∈ No )
48	1	adantr 481	. . . . . . . 8 ⊢ ((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) → (𝐴 |s 𝐵) ∈ No )
49	48	adantr 481	. . . . . . 7 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → (𝐴 |s 𝐵) ∈ No )
50		sltnle 27101	. . . . . . 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 729	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ∈ No )
53		ssltex1 27126	. . . . . . . . . . . 12 ⊢ (𝐴 <<s 𝐵 → 𝐴 ∈ V)
54	53	ad3antrrr 728	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 ∈ V)
55		snex 5388	. . . . . . . . . . 11 ⊢ {(𝐶 |s 𝐷)} ∈ V
56	54, 55	jctir 521	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 ∈ V ∧ {(𝐶 |s 𝐷)} ∈ V))
57	22	ad3antrrr 728	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐴 ⊆ No )
58	52	snssd 4769	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐶 |s 𝐷)} ⊆ No )
59		simplrr 776	. . . . . . . . . . . 12 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))
60		breq2 5109	. . . . . . . . . . . . . 14 ⊢ (𝑑 = (𝐶 |s 𝐷) → (𝑎 <s 𝑑 ↔ 𝑎 <s (𝐶 |s 𝐷)))
61	14, 60	ralsn 4642	. . . . . . . . . . . . 13 ⊢ (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑 ↔ 𝑎 <s (𝐶 |s 𝐷))
62	61	ralbii 3096	. . . . . . . . . . . 12 ⊢ (∀𝑎 ∈ 𝐴 ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑎 <s 𝑑 ↔ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))
63	59, 62	sylibr 233	. . . . . . . . . . 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 27125	. . . . . . . . . 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 27127	. . . . . . . . . . . 12 ⊢ (𝐴 <<s 𝐵 → 𝐵 ∈ V)
68	67	ad3antrrr 728	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐵 ∈ V)
69	68, 55	jctil 520	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐶 |s 𝐷)} ∈ V ∧ 𝐵 ∈ V))
70		ssltss2 27129	. . . . . . . . . . . 12 ⊢ (𝐴 <<s 𝐵 → 𝐵 ⊆ No )
71	70	ad3antrrr 728	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐵 ⊆ No )
72	52	adantr 481	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → (𝐶 |s 𝐷) ∈ No )
73	48	ad3antrrr 728	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → (𝐴 |s 𝐵) ∈ No )
74	71	sselda 3944	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → 𝑏 ∈ No )
75		simplr 767	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → (𝐶 |s 𝐷) <s (𝐴 |s 𝐵))
76	28	simp3d 1144	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐴 <<s 𝐵 → {(𝐴 |s 𝐵)} <<s 𝐵)
77	76	ad3antrrr 728	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} <<s 𝐵)
78		ssltsep 27130	. . . . . . . . . . . . . . . . 17 ⊢ ({(𝐴 |s 𝐵)} <<s 𝐵 → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏)
79	77, 78	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏)
80		breq1 5108	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑏 ↔ (𝐴 |s 𝐵) <s 𝑏))
81	80	ralbidv 3174	. . . . . . . . . . . . . . . . 17 ⊢ (𝑎 = (𝐴 |s 𝐵) → (∀𝑏 ∈ 𝐵 𝑎 <s 𝑏 ↔ ∀𝑏 ∈ 𝐵 (𝐴 |s 𝐵) <s 𝑏))
82	35, 81	ralsn 4642	. . . . . . . . . . . . . . . 16 ⊢ (∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏 ↔ ∀𝑏 ∈ 𝐵 (𝐴 |s 𝐵) <s 𝑏)
83	79, 82	sylib 217	. . . . . . . . . . . . . . 15 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏 ∈ 𝐵 (𝐴 |s 𝐵) <s 𝑏)
84	83	r19.21bi 3234	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → (𝐴 |s 𝐵) <s 𝑏)
85	72, 73, 74, 75, 84	slttrd 27107	. . . . . . . . . . . . 13 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑏 ∈ 𝐵) → (𝐶 |s 𝐷) <s 𝑏)
86	85	ralrimiva 3143	. . . . . . . . . . . 12 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑏 ∈ 𝐵 (𝐶 |s 𝐷) <s 𝑏)
87		breq1 5108	. . . . . . . . . . . . . 14 ⊢ (𝑎 = (𝐶 |s 𝐷) → (𝑎 <s 𝑏 ↔ (𝐶 |s 𝐷) <s 𝑏))
88	87	ralbidv 3174	. . . . . . . . . . . . 13 ⊢ (𝑎 = (𝐶 |s 𝐷) → (∀𝑏 ∈ 𝐵 𝑎 <s 𝑏 ↔ ∀𝑏 ∈ 𝐵 (𝐶 |s 𝐷) <s 𝑏))
89	14, 88	ralsn 4642	. . . . . . . . . . . 12 ⊢ (∀𝑎 ∈ {(𝐶 |s 𝐷)}∀𝑏 ∈ 𝐵 𝑎 <s 𝑏 ↔ ∀𝑏 ∈ 𝐵 (𝐶 |s 𝐷) <s 𝑏)
90	86, 89	sylibr 233	. . . . . . . . . . 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 27125	. . . . . . . . . 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 27094	. . . . . . . . . . . . . 14 ⊢ ((𝐴 |s 𝐵) ∈ No → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
95	49, 94	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → ¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵))
96		breq1 5108	. . . . . . . . . . . . . 14 ⊢ ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → ((𝐴 |s 𝐵) <s (𝐴 |s 𝐵) ↔ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
97	96	notbid 317	. . . . . . . . . . . . 13 ⊢ ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → (¬ (𝐴 |s 𝐵) <s (𝐴 |s 𝐵) ↔ ¬ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
98	95, 97	syl5ibcom 244	. . . . . . . . . . . 12 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐴 |s 𝐵) = (𝐶 |s 𝐷) → ¬ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)))
99	98	necon2ad 2958	. . . . . . . . . . 11 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) → (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷)))
100	99	imp 407	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 |s 𝐵) ≠ (𝐶 |s 𝐷))
101	100	necomd 2999	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 |s 𝐷) ≠ (𝐴 |s 𝐵))
102		scutbdaylt 27157	. . . . . . . . 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 728	. . . . . . . . 9 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐴 |s 𝐵) ∈ No )
105		ssltex1 27126	. . . . . . . . . . . 12 ⊢ (𝐶 <<s 𝐷 → 𝐶 ∈ V)
106	105	ad3antlr 729	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 ∈ V)
107		snex 5388	. . . . . . . . . . 11 ⊢ {(𝐴 |s 𝐵)} ∈ V
108	106, 107	jctir 521	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (𝐶 ∈ V ∧ {(𝐴 |s 𝐵)} ∈ V))
109		ssltss1 27128	. . . . . . . . . . . 12 ⊢ (𝐶 <<s 𝐷 → 𝐶 ⊆ No )
110	109	ad3antlr 729	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 ⊆ No )
111	104	snssd 4769	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → {(𝐴 |s 𝐵)} ⊆ No )
112	110	sselda 3944	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → 𝑐 ∈ No )
113	52	adantr 481	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → (𝐶 |s 𝐷) ∈ No )
114	48	ad3antrrr 728	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → (𝐴 |s 𝐵) ∈ No )
115	9	simp2d 1143	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐶 <<s 𝐷 → 𝐶 <<s {(𝐶 |s 𝐷)})
116	115	ad3antlr 729	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐶 <<s {(𝐶 |s 𝐷)})
117		ssltsep 27130	. . . . . . . . . . . . . . . . 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 3234	. . . . . . . . . . . . . . 15 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → ∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑)
120		breq2 5109	. . . . . . . . . . . . . . . 16 ⊢ (𝑑 = (𝐶 |s 𝐷) → (𝑐 <s 𝑑 ↔ 𝑐 <s (𝐶 |s 𝐷)))
121	14, 120	ralsn 4642	. . . . . . . . . . . . . . 15 ⊢ (∀𝑑 ∈ {(𝐶 |s 𝐷)}𝑐 <s 𝑑 ↔ 𝑐 <s (𝐶 |s 𝐷))
122	119, 121	sylib 217	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → 𝑐 <s (𝐶 |s 𝐷))
123		simplr 767	. . . . . . . . . . . . . 14 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → (𝐶 |s 𝐷) <s (𝐴 |s 𝐵))
124	112, 113, 114, 122, 123	slttrd 27107	. . . . . . . . . . . . 13 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → 𝑐 <s (𝐴 |s 𝐵))
125		breq2 5109	. . . . . . . . . . . . . 14 ⊢ (𝑎 = (𝐴 |s 𝐵) → (𝑐 <s 𝑎 ↔ 𝑐 <s (𝐴 |s 𝐵)))
126	35, 125	ralsn 4642	. . . . . . . . . . . . 13 ⊢ (∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎 ↔ 𝑐 <s (𝐴 |s 𝐵))
127	124, 126	sylibr 233	. . . . . . . . . . . 12 ⊢ (((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) ∧ 𝑐 ∈ 𝐶) → ∀𝑎 ∈ {(𝐴 |s 𝐵)}𝑐 <s 𝑎)
128	127	ralrimiva 3143	. . . . . . . . . . 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 27125	. . . . . . . . . 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 27127	. . . . . . . . . . . 12 ⊢ (𝐶 <<s 𝐷 → 𝐷 ∈ V)
133	132	ad3antlr 729	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐷 ∈ V)
134	133, 107	jctil 520	. . . . . . . . . 10 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ({(𝐴 |s 𝐵)} ∈ V ∧ 𝐷 ∈ V))
135	5	ad3antlr 729	. . . . . . . . . . 11 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → 𝐷 ⊆ No )
136		simplrl 775	. . . . . . . . . . . 12 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → ∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑)
137		breq1 5108	. . . . . . . . . . . . . 14 ⊢ (𝑎 = (𝐴 |s 𝐵) → (𝑎 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
138	137	ralbidv 3174	. . . . . . . . . . . . 13 ⊢ (𝑎 = (𝐴 |s 𝐵) → (∀𝑑 ∈ 𝐷 𝑎 <s 𝑑 ↔ ∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑))
139	35, 138	ralsn 4642	. . . . . . . . . . . 12 ⊢ (∀𝑎 ∈ {(𝐴 |s 𝐵)}∀𝑑 ∈ 𝐷 𝑎 <s 𝑑 ↔ ∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑)
140	136, 139	sylibr 233	. . . . . . . . . . 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 27125	. . . . . . . . . 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 27157	. . . . . . . . 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 512	. . . . . . 7 ⊢ ((((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) ∧ (𝐶 |s 𝐷) <s (𝐴 |s 𝐵)) → (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵))))
147	146	ex 413	. . . . . 6 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))) → ((𝐶 |s 𝐷) <s (𝐴 |s 𝐵) → (( bday ‘(𝐴 |s 𝐵)) ∈ ( bday ‘(𝐶 |s 𝐷)) ∧ ( bday ‘(𝐶 |s 𝐷)) ∈ ( bday ‘(𝐴 |s 𝐵)))))
148	51, 147	sylbird 259	. . . . 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 799	. . 3 ⊢ ((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) → ((𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷) ↔ (∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s (𝐶 |s 𝐷))))
151		breq12 5110	. . . 4 ⊢ ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → (𝑋 ≤s 𝑌 ↔ (𝐴 |s 𝐵) ≤s (𝐶 |s 𝐷)))
152		breq1 5108	. . . . . 6 ⊢ (𝑋 = (𝐴 |s 𝐵) → (𝑋 <s 𝑑 ↔ (𝐴 |s 𝐵) <s 𝑑))
153	152	ralbidv 3174	. . . . 5 ⊢ (𝑋 = (𝐴 |s 𝐵) → (∀𝑑 ∈ 𝐷 𝑋 <s 𝑑 ↔ ∀𝑑 ∈ 𝐷 (𝐴 |s 𝐵) <s 𝑑))
154		breq2 5109	. . . . . 6 ⊢ (𝑌 = (𝐶 |s 𝐷) → (𝑎 <s 𝑌 ↔ 𝑎 <s (𝐶 |s 𝐷)))
155	154	ralbidv 3174	. . . . 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	syl5ibr 245	. 2 ⊢ ((𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷)) → ((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) → (𝑋 ≤s 𝑌 ↔ (∀𝑑 ∈ 𝐷 𝑋 <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑌))))
159	158	impcom 408	1 ⊢ (((𝐴 <<s 𝐵 ∧ 𝐶 <<s 𝐷) ∧ (𝑋 = (𝐴 |s 𝐵) ∧ 𝑌 = (𝐶 |s 𝐷))) → (𝑋 ≤s 𝑌 ↔ (∀𝑑 ∈ 𝐷 𝑋 <s 𝑑 ∧ ∀𝑎 ∈ 𝐴 𝑎 <s 𝑌)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 396   ∧ w3a 1087   = wceq 1541   ∈ wcel 2106   ≠ wne 2943  ∀wral 3064  Vcvv 3445   ⊆ wss 3910  {csn 4586   class class class wbr 5105  Ord word 6316  ‘cfv 6496  (class class class)co 7357   No csur 26988   <s cslt 26989   bday cbday 26990   ≤s csle 27092   <<s csslt 27120   |s cscut 27122

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 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-rep 5242  ax-sep 5256  ax-nul 5263  ax-pr 5384  ax-un 7672

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2889  df-ne 2944  df-ral 3065  df-rex 3074  df-rmo 3353  df-reu 3354  df-rab 3408  df-v 3447  df-sbc 3740  df-csb 3856  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-pss 3929  df-nul 4283  df-if 4487  df-pw 4562  df-sn 4587  df-pr 4589  df-tp 4591  df-op 4593  df-uni 4866  df-int 4908  df-iun 4956  df-br 5106  df-opab 5168  df-mpt 5189  df-tr 5223  df-id 5531  df-eprel 5537  df-po 5545  df-so 5546  df-fr 5588  df-we 5590  df-xp 5639  df-rel 5640  df-cnv 5641  df-co 5642  df-dm 5643  df-rn 5644  df-res 5645  df-ima 5646  df-ord 6320  df-on 6321  df-suc 6323  df-iota 6448  df-fun 6498  df-fn 6499  df-f 6500  df-f1 6501  df-fo 6502  df-f1o 6503  df-fv 6504  df-riota 7313  df-ov 7360  df-oprab 7361  df-mpo 7362  df-1o 8412  df-2o 8413  df-no 26991  df-slt 26992  df-bday 26993  df-sle 27093  df-sslt 27121  df-scut 27123

This theorem is referenced by:  sltrec  27159