Theorem noresle 27616

Description: Restriction law for surreals. Lemma 2.1.4 of [Lipparini] p. 3. (Contributed by Scott Fenton, 5-Dec-2021.)

Assertion

Ref	Expression
noresle	⊢ (((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ (dom 𝑈 ⊆ 𝐴 ∧ dom 𝑆 ⊆ 𝐴 ∧ ∀𝑔 ∈ 𝐴 ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ¬ 𝑆 <s 𝑈)

Distinct variable groups:   𝑆,𝑔   𝑈,𝑔   𝐴,𝑔

Proof of Theorem noresle

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		unss 4156	. . . 4 ⊢ ((dom 𝑈 ⊆ 𝐴 ∧ dom 𝑆 ⊆ 𝐴) ↔ (dom 𝑈 ∪ dom 𝑆) ⊆ 𝐴)
2		ssralv 4018	. . . 4 ⊢ ((dom 𝑈 ∪ dom 𝑆) ⊆ 𝐴 → (∀𝑔 ∈ 𝐴 ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔) → ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔)))
3	1, 2	sylbi 217	. . 3 ⊢ ((dom 𝑈 ⊆ 𝐴 ∧ dom 𝑆 ⊆ 𝐴) → (∀𝑔 ∈ 𝐴 ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔) → ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔)))
4	3	3impia 1117	. 2 ⊢ ((dom 𝑈 ⊆ 𝐴 ∧ dom 𝑆 ⊆ 𝐴 ∧ ∀𝑔 ∈ 𝐴 ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔)) → ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))
5		breq1 5113	. . . . . . . 8 ⊢ (𝑈 = 𝑆 → (𝑈 <s 𝑈 ↔ 𝑆 <s 𝑈))
6	5	notbid 318	. . . . . . 7 ⊢ (𝑈 = 𝑆 → (¬ 𝑈 <s 𝑈 ↔ ¬ 𝑆 <s 𝑈))
7	6	biimpd 229	. . . . . 6 ⊢ (𝑈 = 𝑆 → (¬ 𝑈 <s 𝑈 → ¬ 𝑆 <s 𝑈))
8		sltso 27595	. . . . . . . 8 ⊢ <s Or No
9		sonr 5573	. . . . . . . 8 ⊢ (( <s Or No ∧ 𝑈 ∈ No ) → ¬ 𝑈 <s 𝑈)
10	8, 9	mpan 690	. . . . . . 7 ⊢ (𝑈 ∈ No → ¬ 𝑈 <s 𝑈)
11	10	adantr 480	. . . . . 6 ⊢ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) → ¬ 𝑈 <s 𝑈)
12	7, 11	impel 505	. . . . 5 ⊢ ((𝑈 = 𝑆 ∧ (𝑈 ∈ No ∧ 𝑆 ∈ No )) → ¬ 𝑆 <s 𝑈)
13	12	adantrr 717	. . . 4 ⊢ ((𝑈 = 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ¬ 𝑆 <s 𝑈)
14	13	ex 412	. . 3 ⊢ (𝑈 = 𝑆 → (((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔)) → ¬ 𝑆 <s 𝑈))
15		simprl 770	. . . . 5 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → (𝑈 ∈ No ∧ 𝑆 ∈ No ))
16		simprll 778	. . . . . . . . . . 11 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → 𝑈 ∈ No )
17		simprlr 779	. . . . . . . . . . 11 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → 𝑆 ∈ No )
18		simpl 482	. . . . . . . . . . 11 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → 𝑈 ≠ 𝑆)
19		nosepne 27599	. . . . . . . . . . 11 ⊢ ((𝑈 ∈ No ∧ 𝑆 ∈ No ∧ 𝑈 ≠ 𝑆) → (𝑈‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ≠ (𝑆‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
20	16, 17, 18, 19	syl3anc 1373	. . . . . . . . . 10 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → (𝑈‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ≠ (𝑆‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
21		nosepon 27584	. . . . . . . . . . . . 13 ⊢ ((𝑈 ∈ No ∧ 𝑆 ∈ No ∧ 𝑈 ≠ 𝑆) → ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On)
22	16, 17, 18, 21	syl3anc 1373	. . . . . . . . . . . 12 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On)
23		sucidg 6418	. . . . . . . . . . . 12 ⊢ (∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On → ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})
24	22, 23	syl 17	. . . . . . . . . . 11 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})
25	24	fvresd 6881	. . . . . . . . . 10 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) = (𝑈‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
26	24	fvresd 6881	. . . . . . . . . 10 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ((𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) = (𝑆‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
27	20, 25, 26	3netr4d 3003	. . . . . . . . 9 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ≠ ((𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
28	27	neneqd 2931	. . . . . . . 8 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ¬ ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) = ((𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
29		fveq1 6860	. . . . . . . 8 ⊢ ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) = (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) → ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) = ((𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
30	28, 29	nsyl 140	. . . . . . 7 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ¬ (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) = (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
31		nosepdm 27603	. . . . . . . . 9 ⊢ ((𝑈 ∈ No ∧ 𝑆 ∈ No ∧ 𝑈 ≠ 𝑆) → ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ (dom 𝑈 ∪ dom 𝑆))
32	16, 17, 18, 31	syl3anc 1373	. . . . . . . 8 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ (dom 𝑈 ∪ dom 𝑆))
33		simprr 772	. . . . . . . 8 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))
34		suceq 6403	. . . . . . . . . . . 12 ⊢ (𝑔 = ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} → suc 𝑔 = suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})
35	34	reseq2d 5953	. . . . . . . . . . 11 ⊢ (𝑔 = ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} → (𝑆 ↾ suc 𝑔) = (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
36	34	reseq2d 5953	. . . . . . . . . . 11 ⊢ (𝑔 = ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} → (𝑈 ↾ suc 𝑔) = (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
37	35, 36	breq12d 5123	. . . . . . . . . 10 ⊢ (𝑔 = ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} → ((𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔) ↔ (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})))
38	37	notbid 318	. . . . . . . . 9 ⊢ (𝑔 = ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} → (¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔) ↔ ¬ (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})))
39	38	rspcv 3587	. . . . . . . 8 ⊢ (∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ (dom 𝑈 ∪ dom 𝑆) → (∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔) → ¬ (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})))
40	32, 33, 39	sylc 65	. . . . . . 7 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ¬ (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
41		onsuc 7790	. . . . . . . . . 10 ⊢ (∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On → suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On)
42	22, 41	syl 17	. . . . . . . . 9 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On)
43		noreson 27579	. . . . . . . . 9 ⊢ ((𝑈 ∈ No ∧ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On) → (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∈ No )
44	16, 42, 43	syl2anc 584	. . . . . . . 8 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∈ No )
45		noreson 27579	. . . . . . . . 9 ⊢ ((𝑆 ∈ No ∧ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On) → (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∈ No )
46	17, 42, 45	syl2anc 584	. . . . . . . 8 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∈ No )
47		solin 5576	. . . . . . . . 9 ⊢ (( <s Or No ∧ ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∈ No ∧ (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∈ No )) → ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∨ (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) = (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∨ (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})))
48	8, 47	mpan 690	. . . . . . . 8 ⊢ (((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∈ No ∧ (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∈ No ) → ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∨ (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) = (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∨ (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})))
49	44, 46, 48	syl2anc 584	. . . . . . 7 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∨ (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) = (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∨ (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})))
50	30, 40, 49	ecase23d 1475	. . . . . 6 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
51		sltres 27581	. . . . . . 7 ⊢ ((𝑈 ∈ No ∧ 𝑆 ∈ No ∧ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On) → ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) → 𝑈 <s 𝑆))
52	16, 17, 42, 51	syl3anc 1373	. . . . . 6 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) → 𝑈 <s 𝑆))
53	50, 52	mpd 15	. . . . 5 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → 𝑈 <s 𝑆)
54		soasym 5582	. . . . . 6 ⊢ (( <s Or No ∧ (𝑈 ∈ No ∧ 𝑆 ∈ No )) → (𝑈 <s 𝑆 → ¬ 𝑆 <s 𝑈))
55	8, 54	mpan 690	. . . . 5 ⊢ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) → (𝑈 <s 𝑆 → ¬ 𝑆 <s 𝑈))
56	15, 53, 55	sylc 65	. . . 4 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ¬ 𝑆 <s 𝑈)
57	56	ex 412	. . 3 ⊢ (𝑈 ≠ 𝑆 → (((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔)) → ¬ 𝑆 <s 𝑈))
58	14, 57	pm2.61ine 3009	. 2 ⊢ (((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔)) → ¬ 𝑆 <s 𝑈)
59	4, 58	sylan2 593	1 ⊢ (((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ (dom 𝑈 ⊆ 𝐴 ∧ dom 𝑆 ⊆ 𝐴 ∧ ∀𝑔 ∈ 𝐴 ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ¬ 𝑆 <s 𝑈)

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   ∨ w3o 1085   ∧ w3a 1086   = wceq 1540   ∈ wcel 2109   ≠ wne 2926  ∀wral 3045  {crab 3408   ∪ cun 3915   ⊆ wss 3917  ∩ cint 4913   class class class wbr 5110   Or wor 5548  dom cdm 5641   ↾ cres 5643  Oncon0 6335  suc csuc 6337  ‘cfv 6514   No csur 27558   <s cslt 27559

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 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2702  ax-sep 5254  ax-nul 5264  ax-pow 5323  ax-pr 5390  ax-un 7714

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-ral 3046  df-rex 3055  df-rab 3409  df-v 3452  df-sbc 3757  df-csb 3866  df-dif 3920  df-un 3922  df-in 3924  df-ss 3934  df-pss 3937  df-nul 4300  df-if 4492  df-pw 4568  df-sn 4593  df-pr 4595  df-tp 4597  df-op 4599  df-uni 4875  df-int 4914  df-br 5111  df-opab 5173  df-mpt 5192  df-tr 5218  df-id 5536  df-eprel 5541  df-po 5549  df-so 5550  df-fr 5594  df-we 5596  df-xp 5647  df-rel 5648  df-cnv 5649  df-co 5650  df-dm 5651  df-rn 5652  df-res 5653  df-ima 5654  df-ord 6338  df-on 6339  df-suc 6341  df-iota 6467  df-fun 6516  df-fn 6517  df-f 6518  df-fv 6522  df-1o 8437  df-2o 8438  df-no 27561  df-slt 27562

This theorem is referenced by:  nosupbnd1lem1  27627  nosupbnd2  27635  noinfbnd1lem1  27642  noinfbnd2  27650