Theorem noresle 27761

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 4142	. . . 4 ⊢ ((dom 𝑈 ⊆ 𝐴 ∧ dom 𝑆 ⊆ 𝐴) ↔ (dom 𝑈 ∪ dom 𝑆) ⊆ 𝐴)
2		ssralv 4005	. . . 4 ⊢ ((dom 𝑈 ∪ dom 𝑆) ⊆ 𝐴 → (∀𝑔 ∈ 𝐴 ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔) → ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔)))
3	1, 2	sylbi 219	. . 3 ⊢ ((dom 𝑈 ⊆ 𝐴 ∧ dom 𝑆 ⊆ 𝐴) → (∀𝑔 ∈ 𝐴 ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔) → ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔)))
4	3	3impia 1130	. 2 ⊢ ((dom 𝑈 ⊆ 𝐴 ∧ dom 𝑆 ⊆ 𝐴 ∧ ∀𝑔 ∈ 𝐴 ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔)) → ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))
5		breq1 5103	. . . . . . . 8 ⊢ (𝑈 = 𝑆 → (𝑈 <s 𝑈 ↔ 𝑆 <s 𝑈))
6	5	notbid 320	. . . . . . 7 ⊢ (𝑈 = 𝑆 → (¬ 𝑈 <s 𝑈 ↔ ¬ 𝑆 <s 𝑈))
7	6	biimpd 231	. . . . . 6 ⊢ (𝑈 = 𝑆 → (¬ 𝑈 <s 𝑈 → ¬ 𝑆 <s 𝑈))
8		ltsso 27740	. . . . . . . 8 ⊢ <s Or No
9		sonr 5579	. . . . . . . 8 ⊢ (( <s Or No ∧ 𝑈 ∈ No ) → ¬ 𝑈 <s 𝑈)
10	8, 9	mpan 700	. . . . . . 7 ⊢ (𝑈 ∈ No → ¬ 𝑈 <s 𝑈)
11	10	adantr 484	. . . . . 6 ⊢ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) → ¬ 𝑈 <s 𝑈)
12	7, 11	impel 513	. . . . 5 ⊢ ((𝑈 = 𝑆 ∧ (𝑈 ∈ No ∧ 𝑆 ∈ No )) → ¬ 𝑆 <s 𝑈)
13	12	adantrr 727	. . . 4 ⊢ ((𝑈 = 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ¬ 𝑆 <s 𝑈)
14	13	ex 416	. . 3 ⊢ (𝑈 = 𝑆 → (((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔)) → ¬ 𝑆 <s 𝑈))
15		simprl 780	. . . . 5 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → (𝑈 ∈ No ∧ 𝑆 ∈ No ))
16		simprll 788	. . . . . . . . . . 11 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → 𝑈 ∈ No )
17		simprlr 789	. . . . . . . . . . 11 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → 𝑆 ∈ No )
18		simpl 486	. . . . . . . . . . 11 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → 𝑈 ≠ 𝑆)
19		nosepne 27744	. . . . . . . . . . 11 ⊢ ((𝑈 ∈ No ∧ 𝑆 ∈ No ∧ 𝑈 ≠ 𝑆) → (𝑈‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ≠ (𝑆‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
20	16, 17, 18, 19	syl3anc 1390	. . . . . . . . . 10 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → (𝑈‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ≠ (𝑆‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
21		nosepon 27729	. . . . . . . . . . . . 13 ⊢ ((𝑈 ∈ No ∧ 𝑆 ∈ No ∧ 𝑈 ≠ 𝑆) → ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On)
22	16, 17, 18, 21	syl3anc 1390	. . . . . . . . . . . 12 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On)
23		sucidg 6429	. . . . . . . . . . . 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 6887	. . . . . . . . . 10 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) = (𝑈‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
26	24	fvresd 6887	. . . . . . . . . 10 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ((𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) = (𝑆‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
27	20, 25, 26	3netr4d 3034	. . . . . . . . 9 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ≠ ((𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
28	27	neneqd 2962	. . . . . . . 8 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ¬ ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) = ((𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})‘∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
29		fveq1 6866	. . . . . . . 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 27748	. . . . . . . . 9 ⊢ ((𝑈 ∈ No ∧ 𝑆 ∈ No ∧ 𝑈 ≠ 𝑆) → ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ (dom 𝑈 ∪ dom 𝑆))
32	16, 17, 18, 31	syl3anc 1390	. . . . . . . 8 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ (dom 𝑈 ∪ dom 𝑆))
33		simprr 782	. . . . . . . 8 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))
34		suceq 6414	. . . . . . . . . . . 12 ⊢ (𝑔 = ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} → suc 𝑔 = suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})
35	34	reseq2d 5965	. . . . . . . . . . 11 ⊢ (𝑔 = ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} → (𝑆 ↾ suc 𝑔) = (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
36	34	reseq2d 5965	. . . . . . . . . . 11 ⊢ (𝑔 = ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} → (𝑈 ↾ suc 𝑔) = (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
37	35, 36	breq12d 5113	. . . . . . . . . 10 ⊢ (𝑔 = ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} → ((𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔) ↔ (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})))
38	37	notbid 320	. . . . . . . . 9 ⊢ (𝑔 = ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} → (¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔) ↔ ¬ (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)})))
39	38	rspcv 3577	. . . . . . . 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 7793	. . . . . . . . . 10 ⊢ (∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On → suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On)
42	22, 41	syl 17	. . . . . . . . 9 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On)
43		noreson 27724	. . . . . . . . 9 ⊢ ((𝑈 ∈ No ∧ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On) → (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∈ No )
44	16, 42, 43	syl2anc 593	. . . . . . . 8 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∈ No )
45		noreson 27724	. . . . . . . . 9 ⊢ ((𝑆 ∈ No ∧ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On) → (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∈ No )
46	17, 42, 45	syl2anc 593	. . . . . . . 8 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) ∈ No )
47		solin 5582	. . . . . . . . 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 700	. . . . . . . 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 593	. . . . . . 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 1494	. . . . . 6 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → (𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}))
51		ltsres 27726	. . . . . . 7 ⊢ ((𝑈 ∈ No ∧ 𝑆 ∈ No ∧ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)} ∈ On) → ((𝑈 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) <s (𝑆 ↾ suc ∩ {𝑥 ∈ On ∣ (𝑈‘𝑥) ≠ (𝑆‘𝑥)}) → 𝑈 <s 𝑆))
52	16, 17, 42, 51	syl3anc 1390	. . . . . 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 5588	. . . . . 6 ⊢ (( <s Or No ∧ (𝑈 ∈ No ∧ 𝑆 ∈ No )) → (𝑈 <s 𝑆 → ¬ 𝑆 <s 𝑈))
55	8, 54	mpan 700	. . . . 5 ⊢ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) → (𝑈 <s 𝑆 → ¬ 𝑆 <s 𝑈))
56	15, 53, 55	sylc 65	. . . 4 ⊢ ((𝑈 ≠ 𝑆 ∧ ((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ¬ 𝑆 <s 𝑈)
57	56	ex 416	. . 3 ⊢ (𝑈 ≠ 𝑆 → (((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔)) → ¬ 𝑆 <s 𝑈))
58	14, 57	pm2.61ine 3040	. 2 ⊢ (((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ ∀𝑔 ∈ (dom 𝑈 ∪ dom 𝑆) ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔)) → ¬ 𝑆 <s 𝑈)
59	4, 58	sylan2 602	1 ⊢ (((𝑈 ∈ No ∧ 𝑆 ∈ No ) ∧ (dom 𝑈 ⊆ 𝐴 ∧ dom 𝑆 ⊆ 𝐴 ∧ ∀𝑔 ∈ 𝐴 ¬ (𝑆 ↾ suc 𝑔) <s (𝑈 ↾ suc 𝑔))) → ¬ 𝑆 <s 𝑈)

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 399   ∨ w3o 1097   ∧ w3a 1098   = wceq 1560   ∈ wcel 2142   ≠ wne 2957  ∀wral 3076  {crab 3414   ∪ cun 3902   ⊆ wss 3904  ∩ cint 4905   class class class wbr 5100   Or wor 5554  dom cdm 5647   ↾ cres 5649  Oncon0 6346  suc csuc 6348  ‘cfv 6521   No csur 27704   <s clts 27705

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-sep 5246  ax-nul 5256  ax-pow 5322  ax-pr 5390  ax-un 7718

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1099  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3077  df-rex 3087  df-rab 3415  df-v 3456  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4481  df-pw 4557  df-sn 4583  df-pr 4585  df-tp 4587  df-op 4589  df-uni 4866  df-int 4906  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5542  df-eprel 5547  df-po 5555  df-so 5556  df-fr 5600  df-we 5602  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-ord 6349  df-on 6350  df-suc 6352  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-fv 6529  df-1o 8437  df-2o 8438  df-no 27707  df-lts 27708

This theorem is referenced by:  nosupbnd1lem1  27772  nosupbnd2  27780  noinfbnd1lem1  27787  noinfbnd2  27795