Theorem elreno2 28688

Description: Alternate characterization of the surreal reals. Theorem 4.4(b) of [Gonshor] p. 39. (Contributed by Scott Fenton, 29-Jan-2026.)

Assertion

Ref	Expression
elreno2	⊢ (𝐴 ∈ ℝs ↔ (𝐴 ∈ No ∧ (∃𝑛 ∈ ℕs (( -us ‘𝑛) <s 𝐴 ∧ 𝐴 <s 𝑛) ∧ ∀𝑥𝑂 ∈ (( L ‘𝐴) ∪ ( R ‘𝐴))∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)))))

Distinct variable group:   𝐴,𝑛,𝑥_𝑂

Proof of Theorem elreno2

Dummy variables 𝑤 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		elreno 28684	. 2 ⊢ (𝐴 ∈ ℝs ↔ (𝐴 ∈ No ∧ (∃𝑛 ∈ ℕs (( -us ‘𝑛) <s 𝐴 ∧ 𝐴 <s 𝑛) ∧ 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}))))
2		recut 28687	. . . . . . . . . 10 ⊢ (𝐴 ∈ No → {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} <<s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})
3	2	adantr 485	. . . . . . . . 9 ⊢ ((𝐴 ∈ No ∧ 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})) → {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} <<s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})
4		simpr 489	. . . . . . . . 9 ⊢ ((𝐴 ∈ No ∧ 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})) → 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}))
5	3, 4	cofcutr1d 28118	. . . . . . . 8 ⊢ ((𝐴 ∈ No ∧ 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})) → ∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))}𝑥𝑂 ≤s 𝑦)
6		eqeq1 2767	. . . . . . . . . . . . 13 ⊢ (𝑤 = 𝑦 → (𝑤 = (𝐴 -s ( 1s /su 𝑛)) ↔ 𝑦 = (𝐴 -s ( 1s /su 𝑛))))
7	6	rexbidv 3189	. . . . . . . . . . . 12 ⊢ (𝑤 = 𝑦 → (∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛)) ↔ ∃𝑛 ∈ ℕs 𝑦 = (𝐴 -s ( 1s /su 𝑛))))
8	7	rexab 3658	. . . . . . . . . . 11 ⊢ (∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))}𝑥𝑂 ≤s 𝑦 ↔ ∃𝑦(∃𝑛 ∈ ℕs 𝑦 = (𝐴 -s ( 1s /su 𝑛)) ∧ 𝑥𝑂 ≤s 𝑦))
9		rexcom4 3292	. . . . . . . . . . . 12 ⊢ (∃𝑛 ∈ ℕs ∃𝑦(𝑦 = (𝐴 -s ( 1s /su 𝑛)) ∧ 𝑥𝑂 ≤s 𝑦) ↔ ∃𝑦∃𝑛 ∈ ℕs (𝑦 = (𝐴 -s ( 1s /su 𝑛)) ∧ 𝑥𝑂 ≤s 𝑦))
10		ovex 7443	. . . . . . . . . . . . . 14 ⊢ (𝐴 -s ( 1s /su 𝑛)) ∈ V
11		breq2 5113	. . . . . . . . . . . . . 14 ⊢ (𝑦 = (𝐴 -s ( 1s /su 𝑛)) → (𝑥𝑂 ≤s 𝑦 ↔ 𝑥𝑂 ≤s (𝐴 -s ( 1s /su 𝑛))))
12	10, 11	ceqsexv 3503	. . . . . . . . . . . . 13 ⊢ (∃𝑦(𝑦 = (𝐴 -s ( 1s /su 𝑛)) ∧ 𝑥𝑂 ≤s 𝑦) ↔ 𝑥𝑂 ≤s (𝐴 -s ( 1s /su 𝑛)))
13	12	rexbii 3112	. . . . . . . . . . . 12 ⊢ (∃𝑛 ∈ ℕs ∃𝑦(𝑦 = (𝐴 -s ( 1s /su 𝑛)) ∧ 𝑥𝑂 ≤s 𝑦) ↔ ∃𝑛 ∈ ℕs 𝑥𝑂 ≤s (𝐴 -s ( 1s /su 𝑛)))
14		r19.41v 3195	. . . . . . . . . . . . 13 ⊢ (∃𝑛 ∈ ℕs (𝑦 = (𝐴 -s ( 1s /su 𝑛)) ∧ 𝑥𝑂 ≤s 𝑦) ↔ (∃𝑛 ∈ ℕs 𝑦 = (𝐴 -s ( 1s /su 𝑛)) ∧ 𝑥𝑂 ≤s 𝑦))
15	14	exbii 1878	. . . . . . . . . . . 12 ⊢ (∃𝑦∃𝑛 ∈ ℕs (𝑦 = (𝐴 -s ( 1s /su 𝑛)) ∧ 𝑥𝑂 ≤s 𝑦) ↔ ∃𝑦(∃𝑛 ∈ ℕs 𝑦 = (𝐴 -s ( 1s /su 𝑛)) ∧ 𝑥𝑂 ≤s 𝑦))
16	9, 13, 15	3bitr3ri 305	. . . . . . . . . . 11 ⊢ (∃𝑦(∃𝑛 ∈ ℕs 𝑦 = (𝐴 -s ( 1s /su 𝑛)) ∧ 𝑥𝑂 ≤s 𝑦) ↔ ∃𝑛 ∈ ℕs 𝑥𝑂 ≤s (𝐴 -s ( 1s /su 𝑛)))
17	8, 16	bitri 278	. . . . . . . . . 10 ⊢ (∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))}𝑥𝑂 ≤s 𝑦 ↔ ∃𝑛 ∈ ℕs 𝑥𝑂 ≤s (𝐴 -s ( 1s /su 𝑛)))
18		leftno 28070	. . . . . . . . . . . . . . . 16 ⊢ (𝑥𝑂 ∈ ( L ‘𝐴) → 𝑥𝑂 ∈ No )
19	18	adantl 486	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → 𝑥𝑂 ∈ No )
20	19	adantr 485	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ 𝑛 ∈ ℕs) → 𝑥𝑂 ∈ No )
21		simpll 778	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ 𝑛 ∈ ℕs) → 𝐴 ∈ No )
22		1no 28003	. . . . . . . . . . . . . . . . . 18 ⊢ 1s ∈ No
23	22	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕs → 1s ∈ No )
24		nnno 28517	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕs → 𝑛 ∈ No )
25		nnne0s 28530	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕs → 𝑛 ≠ 0s )
26	23, 24, 25	divscld 28417	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕs → ( 1s /su 𝑛) ∈ No )
27	26	adantl 486	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ 𝑛 ∈ ℕs) → ( 1s /su 𝑛) ∈ No )
28	21, 27	subscld 28256	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (𝐴 -s ( 1s /su 𝑛)) ∈ No )
29	20, 28, 27	leadds1d 28188	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (𝑥𝑂 ≤s (𝐴 -s ( 1s /su 𝑛)) ↔ (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s ((𝐴 -s ( 1s /su 𝑛)) +s ( 1s /su 𝑛))))
30		npcans 28268	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ No ∧ ( 1s /su 𝑛) ∈ No ) → ((𝐴 -s ( 1s /su 𝑛)) +s ( 1s /su 𝑛)) = 𝐴)
31	21, 27, 30	syl2anc 595	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ 𝑛 ∈ ℕs) → ((𝐴 -s ( 1s /su 𝑛)) +s ( 1s /su 𝑛)) = 𝐴)
32	31	breq2d 5121	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ 𝑛 ∈ ℕs) → ((𝑥𝑂 +s ( 1s /su 𝑛)) ≤s ((𝐴 -s ( 1s /su 𝑛)) +s ( 1s /su 𝑛)) ↔ (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴))
33	29, 32	bitrd 282	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (𝑥𝑂 ≤s (𝐴 -s ( 1s /su 𝑛)) ↔ (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴))
34	33	rexbidva 3187	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → (∃𝑛 ∈ ℕs 𝑥𝑂 ≤s (𝐴 -s ( 1s /su 𝑛)) ↔ ∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴))
35	34	adantlr 727	. . . . . . . . . 10 ⊢ (((𝐴 ∈ No ∧ 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})) ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → (∃𝑛 ∈ ℕs 𝑥𝑂 ≤s (𝐴 -s ( 1s /su 𝑛)) ↔ ∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴))
36	17, 35	bitrid 286	. . . . . . . . 9 ⊢ (((𝐴 ∈ No ∧ 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})) ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → (∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))}𝑥𝑂 ≤s 𝑦 ↔ ∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴))
37	36	ralbidva 3186	. . . . . . . 8 ⊢ ((𝐴 ∈ No ∧ 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})) → (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))}𝑥𝑂 ≤s 𝑦 ↔ ∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴))
38	5, 37	mpbid 235	. . . . . . 7 ⊢ ((𝐴 ∈ No ∧ 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})) → ∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴)
39	3, 4	cofcutr2d 28119	. . . . . . . 8 ⊢ ((𝐴 ∈ No ∧ 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})) → ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}𝑦 ≤s 𝑥𝑂)
40		eqeq1 2767	. . . . . . . . . . . . . 14 ⊢ (𝑤 = 𝑦 → (𝑤 = (𝐴 +s ( 1s /su 𝑛)) ↔ 𝑦 = (𝐴 +s ( 1s /su 𝑛))))
41	40	rexbidv 3189	. . . . . . . . . . . . 13 ⊢ (𝑤 = 𝑦 → (∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛)) ↔ ∃𝑛 ∈ ℕs 𝑦 = (𝐴 +s ( 1s /su 𝑛))))
42	41	rexab 3658	. . . . . . . . . . . 12 ⊢ (∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}𝑦 ≤s 𝑥𝑂 ↔ ∃𝑦(∃𝑛 ∈ ℕs 𝑦 = (𝐴 +s ( 1s /su 𝑛)) ∧ 𝑦 ≤s 𝑥𝑂))
43		rexcom4 3292	. . . . . . . . . . . . 13 ⊢ (∃𝑛 ∈ ℕs ∃𝑦(𝑦 = (𝐴 +s ( 1s /su 𝑛)) ∧ 𝑦 ≤s 𝑥𝑂) ↔ ∃𝑦∃𝑛 ∈ ℕs (𝑦 = (𝐴 +s ( 1s /su 𝑛)) ∧ 𝑦 ≤s 𝑥𝑂))
44		ovex 7443	. . . . . . . . . . . . . . 15 ⊢ (𝐴 +s ( 1s /su 𝑛)) ∈ V
45		breq1 5112	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = (𝐴 +s ( 1s /su 𝑛)) → (𝑦 ≤s 𝑥𝑂 ↔ (𝐴 +s ( 1s /su 𝑛)) ≤s 𝑥𝑂))
46	44, 45	ceqsexv 3503	. . . . . . . . . . . . . 14 ⊢ (∃𝑦(𝑦 = (𝐴 +s ( 1s /su 𝑛)) ∧ 𝑦 ≤s 𝑥𝑂) ↔ (𝐴 +s ( 1s /su 𝑛)) ≤s 𝑥𝑂)
47	46	rexbii 3112	. . . . . . . . . . . . 13 ⊢ (∃𝑛 ∈ ℕs ∃𝑦(𝑦 = (𝐴 +s ( 1s /su 𝑛)) ∧ 𝑦 ≤s 𝑥𝑂) ↔ ∃𝑛 ∈ ℕs (𝐴 +s ( 1s /su 𝑛)) ≤s 𝑥𝑂)
48		r19.41v 3195	. . . . . . . . . . . . . 14 ⊢ (∃𝑛 ∈ ℕs (𝑦 = (𝐴 +s ( 1s /su 𝑛)) ∧ 𝑦 ≤s 𝑥𝑂) ↔ (∃𝑛 ∈ ℕs 𝑦 = (𝐴 +s ( 1s /su 𝑛)) ∧ 𝑦 ≤s 𝑥𝑂))
49	48	exbii 1878	. . . . . . . . . . . . 13 ⊢ (∃𝑦∃𝑛 ∈ ℕs (𝑦 = (𝐴 +s ( 1s /su 𝑛)) ∧ 𝑦 ≤s 𝑥𝑂) ↔ ∃𝑦(∃𝑛 ∈ ℕs 𝑦 = (𝐴 +s ( 1s /su 𝑛)) ∧ 𝑦 ≤s 𝑥𝑂))
50	43, 47, 49	3bitr3ri 305	. . . . . . . . . . . 12 ⊢ (∃𝑦(∃𝑛 ∈ ℕs 𝑦 = (𝐴 +s ( 1s /su 𝑛)) ∧ 𝑦 ≤s 𝑥𝑂) ↔ ∃𝑛 ∈ ℕs (𝐴 +s ( 1s /su 𝑛)) ≤s 𝑥𝑂)
51	42, 50	bitri 278	. . . . . . . . . . 11 ⊢ (∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}𝑦 ≤s 𝑥𝑂 ↔ ∃𝑛 ∈ ℕs (𝐴 +s ( 1s /su 𝑛)) ≤s 𝑥𝑂)
52		simpll 778	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ 𝑛 ∈ ℕs) → 𝐴 ∈ No )
53		rightno 28071	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥𝑂 ∈ ( R ‘𝐴) → 𝑥𝑂 ∈ No )
54	53	adantl 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) → 𝑥𝑂 ∈ No )
55	54	adantr 485	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ 𝑛 ∈ ℕs) → 𝑥𝑂 ∈ No )
56	26	adantl 486	. . . . . . . . . . . . . . 15 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ 𝑛 ∈ ℕs) → ( 1s /su 𝑛) ∈ No )
57	55, 56	subscld 28256	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (𝑥𝑂 -s ( 1s /su 𝑛)) ∈ No )
58	52, 57, 56	leadds1d 28188	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)) ↔ (𝐴 +s ( 1s /su 𝑛)) ≤s ((𝑥𝑂 -s ( 1s /su 𝑛)) +s ( 1s /su 𝑛))))
59		npcans 28268	. . . . . . . . . . . . . . 15 ⊢ ((𝑥𝑂 ∈ No ∧ ( 1s /su 𝑛) ∈ No ) → ((𝑥𝑂 -s ( 1s /su 𝑛)) +s ( 1s /su 𝑛)) = 𝑥𝑂)
60	55, 56, 59	syl2anc 595	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ 𝑛 ∈ ℕs) → ((𝑥𝑂 -s ( 1s /su 𝑛)) +s ( 1s /su 𝑛)) = 𝑥𝑂)
61	60	breq2d 5121	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ 𝑛 ∈ ℕs) → ((𝐴 +s ( 1s /su 𝑛)) ≤s ((𝑥𝑂 -s ( 1s /su 𝑛)) +s ( 1s /su 𝑛)) ↔ (𝐴 +s ( 1s /su 𝑛)) ≤s 𝑥𝑂))
62	58, 61	bitr2d 283	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ 𝑛 ∈ ℕs) → ((𝐴 +s ( 1s /su 𝑛)) ≤s 𝑥𝑂 ↔ 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛))))
63	62	rexbidva 3187	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) → (∃𝑛 ∈ ℕs (𝐴 +s ( 1s /su 𝑛)) ≤s 𝑥𝑂 ↔ ∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛))))
64	51, 63	bitrid 286	. . . . . . . . . 10 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) → (∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}𝑦 ≤s 𝑥𝑂 ↔ ∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛))))
65	64	ralbidva 3186	. . . . . . . . 9 ⊢ (𝐴 ∈ No → (∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}𝑦 ≤s 𝑥𝑂 ↔ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛))))
66	65	adantr 485	. . . . . . . 8 ⊢ ((𝐴 ∈ No ∧ 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})) → (∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}𝑦 ≤s 𝑥𝑂 ↔ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛))))
67	39, 66	mpbid 235	. . . . . . 7 ⊢ ((𝐴 ∈ No ∧ 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})) → ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)))
68	38, 67	jca 520	. . . . . 6 ⊢ ((𝐴 ∈ No ∧ 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})) → (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛))))
69		lrcut 28097	. . . . . . . 8 ⊢ (𝐴 ∈ No → (( L ‘𝐴) |s ( R ‘𝐴)) = 𝐴)
70	69	adantr 485	. . . . . . 7 ⊢ ((𝐴 ∈ No ∧ (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)))) → (( L ‘𝐴) |s ( R ‘𝐴)) = 𝐴)
71		lltr 28055	. . . . . . . . 9 ⊢ ( L ‘𝐴) <<s ( R ‘𝐴)
72	71	a1i 11	. . . . . . . 8 ⊢ ((𝐴 ∈ No ∧ (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)))) → ( L ‘𝐴) <<s ( R ‘𝐴))
73	34	biimpar 482	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ ∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴) → ∃𝑛 ∈ ℕs 𝑥𝑂 ≤s (𝐴 -s ( 1s /su 𝑛)))
74	73, 17	sylibr 237	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ ∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴) → ∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))}𝑥𝑂 ≤s 𝑦)
75	74	ex 417	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → (∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 → ∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))}𝑥𝑂 ≤s 𝑦))
76	75	ralimdva 3177	. . . . . . . . . 10 ⊢ (𝐴 ∈ No → (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 → ∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))}𝑥𝑂 ≤s 𝑦))
77	76	imp 411	. . . . . . . . 9 ⊢ ((𝐴 ∈ No ∧ ∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴) → ∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))}𝑥𝑂 ≤s 𝑦)
78	77	adantrr 729	. . . . . . . 8 ⊢ ((𝐴 ∈ No ∧ (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)))) → ∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))}𝑥𝑂 ≤s 𝑦)
79	63	biimpar 482	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ ∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛))) → ∃𝑛 ∈ ℕs (𝐴 +s ( 1s /su 𝑛)) ≤s 𝑥𝑂)
80	79, 51	sylibr 237	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ ∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛))) → ∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}𝑦 ≤s 𝑥𝑂)
81	80	ex 417	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) → (∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)) → ∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}𝑦 ≤s 𝑥𝑂))
82	81	ralimdva 3177	. . . . . . . . . 10 ⊢ (𝐴 ∈ No → (∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)) → ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}𝑦 ≤s 𝑥𝑂))
83	82	imp 411	. . . . . . . . 9 ⊢ ((𝐴 ∈ No ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛))) → ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}𝑦 ≤s 𝑥𝑂)
84	83	adantrl 728	. . . . . . . 8 ⊢ ((𝐴 ∈ No ∧ (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)))) → ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}𝑦 ≤s 𝑥𝑂)
85		nnsex 28511	. . . . . . . . . . . . 13 ⊢ ℕs ∈ V
86	85	abrexex 7955	. . . . . . . . . . . 12 ⊢ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} ∈ V
87	86	a1i 11	. . . . . . . . . . 11 ⊢ (𝐴 ∈ No → {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} ∈ V)
88		snexg 5411	. . . . . . . . . . 11 ⊢ (𝐴 ∈ No → {𝐴} ∈ V)
89		simpl 487	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → 𝐴 ∈ No )
90	26	adantl 486	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → ( 1s /su 𝑛) ∈ No )
91	89, 90	subscld 28256	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → (𝐴 -s ( 1s /su 𝑛)) ∈ No )
92		eleq1 2851	. . . . . . . . . . . . . 14 ⊢ (𝑤 = (𝐴 -s ( 1s /su 𝑛)) → (𝑤 ∈ No ↔ (𝐴 -s ( 1s /su 𝑛)) ∈ No ))
93	91, 92	syl5ibrcom 250	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → (𝑤 = (𝐴 -s ( 1s /su 𝑛)) → 𝑤 ∈ No ))
94	93	rexlimdva 3166	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ No → (∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛)) → 𝑤 ∈ No ))
95	94	abssdv 4021	. . . . . . . . . . 11 ⊢ (𝐴 ∈ No → {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} ⊆ No )
96		snssi 4751	. . . . . . . . . . 11 ⊢ (𝐴 ∈ No → {𝐴} ⊆ No )
97		biid 264	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ No ↔ 𝐴 ∈ No )
98		vex 3459	. . . . . . . . . . . . 13 ⊢ 𝑦 ∈ V
99	98, 7	elab 3638	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} ↔ ∃𝑛 ∈ ℕs 𝑦 = (𝐴 -s ( 1s /su 𝑛)))
100		velsn 4605	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ {𝐴} ↔ 𝑧 = 𝐴)
101		id 23	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 ∈ ℕs → 𝑛 ∈ ℕs)
102	101	nnsrecgt0d 28544	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕs → 0s <s ( 1s /su 𝑛))
103	102	adantl 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → 0s <s ( 1s /su 𝑛))
104	90, 89	ltsubsposd 28292	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → ( 0s <s ( 1s /su 𝑛) ↔ (𝐴 -s ( 1s /su 𝑛)) <s 𝐴))
105	103, 104	mpbid 235	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → (𝐴 -s ( 1s /su 𝑛)) <s 𝐴)
106		breq12 5114	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 = (𝐴 -s ( 1s /su 𝑛)) ∧ 𝑧 = 𝐴) → (𝑦 <s 𝑧 ↔ (𝐴 -s ( 1s /su 𝑛)) <s 𝐴))
107	105, 106	syl5ibrcom 250	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → ((𝑦 = (𝐴 -s ( 1s /su 𝑛)) ∧ 𝑧 = 𝐴) → 𝑦 <s 𝑧))
108	107	expd 420	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → (𝑦 = (𝐴 -s ( 1s /su 𝑛)) → (𝑧 = 𝐴 → 𝑦 <s 𝑧)))
109	108	rexlimdva 3166	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ No → (∃𝑛 ∈ ℕs 𝑦 = (𝐴 -s ( 1s /su 𝑛)) → (𝑧 = 𝐴 → 𝑦 <s 𝑧)))
110	109	3imp 1128	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ No ∧ ∃𝑛 ∈ ℕs 𝑦 = (𝐴 -s ( 1s /su 𝑛)) ∧ 𝑧 = 𝐴) → 𝑦 <s 𝑧)
111	97, 99, 100, 110	syl3anb 1179	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ No ∧ 𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} ∧ 𝑧 ∈ {𝐴}) → 𝑦 <s 𝑧)
112	87, 88, 95, 96, 111	sltsd 27961	. . . . . . . . . 10 ⊢ (𝐴 ∈ No → {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} <<s {𝐴})
113	69	sneqd 4601	. . . . . . . . . 10 ⊢ (𝐴 ∈ No → {(( L ‘𝐴) |s ( R ‘𝐴))} = {𝐴})
114	112, 113	breqtrrd 5139	. . . . . . . . 9 ⊢ (𝐴 ∈ No → {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} <<s {(( L ‘𝐴) |s ( R ‘𝐴))})
115	114	adantr 485	. . . . . . . 8 ⊢ ((𝐴 ∈ No ∧ (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)))) → {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} <<s {(( L ‘𝐴) |s ( R ‘𝐴))})
116	70	sneqd 4601	. . . . . . . . 9 ⊢ ((𝐴 ∈ No ∧ (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)))) → {(( L ‘𝐴) |s ( R ‘𝐴))} = {𝐴})
117	85	abrexex 7955	. . . . . . . . . . . 12 ⊢ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))} ∈ V
118	117	a1i 11	. . . . . . . . . . 11 ⊢ (𝐴 ∈ No → {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))} ∈ V)
119	89, 90	addscld 28173	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → (𝐴 +s ( 1s /su 𝑛)) ∈ No )
120		eleq1 2851	. . . . . . . . . . . . . 14 ⊢ (𝑤 = (𝐴 +s ( 1s /su 𝑛)) → (𝑤 ∈ No ↔ (𝐴 +s ( 1s /su 𝑛)) ∈ No ))
121	119, 120	syl5ibrcom 250	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → (𝑤 = (𝐴 +s ( 1s /su 𝑛)) → 𝑤 ∈ No ))
122	121	rexlimdva 3166	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ No → (∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛)) → 𝑤 ∈ No ))
123	122	abssdv 4021	. . . . . . . . . . 11 ⊢ (𝐴 ∈ No → {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))} ⊆ No )
124	98, 41	elab 3638	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))} ↔ ∃𝑛 ∈ ℕs 𝑦 = (𝐴 +s ( 1s /su 𝑛)))
125	90, 89	ltaddspos1d 28204	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → ( 0s <s ( 1s /su 𝑛) ↔ 𝐴 <s (𝐴 +s ( 1s /su 𝑛))))
126	103, 125	mpbid 235	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → 𝐴 <s (𝐴 +s ( 1s /su 𝑛)))
127		breq12 5114	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑧 = 𝐴 ∧ 𝑦 = (𝐴 +s ( 1s /su 𝑛))) → (𝑧 <s 𝑦 ↔ 𝐴 <s (𝐴 +s ( 1s /su 𝑛))))
128	126, 127	syl5ibrcom 250	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → ((𝑧 = 𝐴 ∧ 𝑦 = (𝐴 +s ( 1s /su 𝑛))) → 𝑧 <s 𝑦))
129	128	expcomd 421	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ No ∧ 𝑛 ∈ ℕs) → (𝑦 = (𝐴 +s ( 1s /su 𝑛)) → (𝑧 = 𝐴 → 𝑧 <s 𝑦)))
130	129	rexlimdva 3166	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ No → (∃𝑛 ∈ ℕs 𝑦 = (𝐴 +s ( 1s /su 𝑛)) → (𝑧 = 𝐴 → 𝑧 <s 𝑦)))
131	130	com23 87	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ No → (𝑧 = 𝐴 → (∃𝑛 ∈ ℕs 𝑦 = (𝐴 +s ( 1s /su 𝑛)) → 𝑧 <s 𝑦)))
132	131	3imp 1128	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ No ∧ 𝑧 = 𝐴 ∧ ∃𝑛 ∈ ℕs 𝑦 = (𝐴 +s ( 1s /su 𝑛))) → 𝑧 <s 𝑦)
133	97, 100, 124, 132	syl3anb 1179	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ No ∧ 𝑧 ∈ {𝐴} ∧ 𝑦 ∈ {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}) → 𝑧 <s 𝑦)
134	88, 118, 96, 123, 133	sltsd 27961	. . . . . . . . . 10 ⊢ (𝐴 ∈ No → {𝐴} <<s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})
135	134	adantr 485	. . . . . . . . 9 ⊢ ((𝐴 ∈ No ∧ (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)))) → {𝐴} <<s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})
136	116, 135	eqbrtrd 5133	. . . . . . . 8 ⊢ ((𝐴 ∈ No ∧ (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)))) → {(( L ‘𝐴) |s ( R ‘𝐴))} <<s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})
137	72, 78, 84, 115, 136	cofcut1d 28114	. . . . . . 7 ⊢ ((𝐴 ∈ No ∧ (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)))) → (( L ‘𝐴) |s ( R ‘𝐴)) = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}))
138	70, 137	eqtr3d 2800	. . . . . 6 ⊢ ((𝐴 ∈ No ∧ (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)))) → 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}))
139	68, 138	impbida 812	. . . . 5 ⊢ (𝐴 ∈ No → (𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}) ↔ (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)))))
140		ralunb 4150	. . . . . 6 ⊢ (∀𝑥𝑂 ∈ (( L ‘𝐴) ∪ ( R ‘𝐴))∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)) ↔ (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)) ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂))))
141		simpl 487	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → 𝐴 ∈ No )
142	141, 19	subscld 28256	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → (𝐴 -s 𝑥𝑂) ∈ No )
143		0no 28002	. . . . . . . . . . . . . . 15 ⊢ 0s ∈ No
144	143	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → 0s ∈ No )
145		leftlt 28046	. . . . . . . . . . . . . . . 16 ⊢ (𝑥𝑂 ∈ ( L ‘𝐴) → 𝑥𝑂 <s 𝐴)
146	145	adantl 486	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → 𝑥𝑂 <s 𝐴)
147	19, 141	posdifsd 28291	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → (𝑥𝑂 <s 𝐴 ↔ 0s <s (𝐴 -s 𝑥𝑂)))
148	146, 147	mpbid 235	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → 0s <s (𝐴 -s 𝑥𝑂))
149	144, 142, 148	ltlesd 27937	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → 0s ≤s (𝐴 -s 𝑥𝑂))
150		abssid 28434	. . . . . . . . . . . . 13 ⊢ (((𝐴 -s 𝑥𝑂) ∈ No ∧ 0s ≤s (𝐴 -s 𝑥𝑂)) → (abss‘(𝐴 -s 𝑥𝑂)) = (𝐴 -s 𝑥𝑂))
151	142, 149, 150	syl2anc 595	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → (abss‘(𝐴 -s 𝑥𝑂)) = (𝐴 -s 𝑥𝑂))
152	151	breq2d 5121	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → (( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)) ↔ ( 1s /su 𝑛) ≤s (𝐴 -s 𝑥𝑂)))
153	152	adantr 485	. . . . . . . . . 10 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)) ↔ ( 1s /su 𝑛) ≤s (𝐴 -s 𝑥𝑂)))
154	142	adantr 485	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (𝐴 -s 𝑥𝑂) ∈ No )
155	27, 154, 20	leadds2d 28189	. . . . . . . . . 10 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (( 1s /su 𝑛) ≤s (𝐴 -s 𝑥𝑂) ↔ (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s (𝑥𝑂 +s (𝐴 -s 𝑥𝑂))))
156		pncan3s 28266	. . . . . . . . . . . . 13 ⊢ ((𝑥𝑂 ∈ No ∧ 𝐴 ∈ No ) → (𝑥𝑂 +s (𝐴 -s 𝑥𝑂)) = 𝐴)
157	19, 141, 156	syl2anc 595	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → (𝑥𝑂 +s (𝐴 -s 𝑥𝑂)) = 𝐴)
158	157	adantr 485	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (𝑥𝑂 +s (𝐴 -s 𝑥𝑂)) = 𝐴)
159	158	breq2d 5121	. . . . . . . . . 10 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ 𝑛 ∈ ℕs) → ((𝑥𝑂 +s ( 1s /su 𝑛)) ≤s (𝑥𝑂 +s (𝐴 -s 𝑥𝑂)) ↔ (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴))
160	153, 155, 159	3bitrd 308	. . . . . . . . 9 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)) ↔ (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴))
161	160	rexbidva 3187	. . . . . . . 8 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( L ‘𝐴)) → (∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)) ↔ ∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴))
162	161	ralbidva 3186	. . . . . . 7 ⊢ (𝐴 ∈ No → (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)) ↔ ∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴))
163		abssubs 28443	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ No ) → (abss‘(𝐴 -s 𝑥𝑂)) = (abss‘(𝑥𝑂 -s 𝐴)))
164	53, 163	sylan2 604	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) → (abss‘(𝐴 -s 𝑥𝑂)) = (abss‘(𝑥𝑂 -s 𝐴)))
165	164	adantr 485	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (abss‘(𝐴 -s 𝑥𝑂)) = (abss‘(𝑥𝑂 -s 𝐴)))
166		simpl 487	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) → 𝐴 ∈ No )
167	54, 166	subscld 28256	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) → (𝑥𝑂 -s 𝐴) ∈ No )
168	143	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) → 0s ∈ No )
169		rightgt 28047	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥𝑂 ∈ ( R ‘𝐴) → 𝐴 <s 𝑥𝑂)
170	169	adantl 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) → 𝐴 <s 𝑥𝑂)
171	166, 54	posdifsd 28291	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) → (𝐴 <s 𝑥𝑂 ↔ 0s <s (𝑥𝑂 -s 𝐴)))
172	170, 171	mpbid 235	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) → 0s <s (𝑥𝑂 -s 𝐴))
173	168, 167, 172	ltlesd 27937	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) → 0s ≤s (𝑥𝑂 -s 𝐴))
174		abssid 28434	. . . . . . . . . . . . . 14 ⊢ (((𝑥𝑂 -s 𝐴) ∈ No ∧ 0s ≤s (𝑥𝑂 -s 𝐴)) → (abss‘(𝑥𝑂 -s 𝐴)) = (𝑥𝑂 -s 𝐴))
175	167, 173, 174	syl2anc 595	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) → (abss‘(𝑥𝑂 -s 𝐴)) = (𝑥𝑂 -s 𝐴))
176	175	adantr 485	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (abss‘(𝑥𝑂 -s 𝐴)) = (𝑥𝑂 -s 𝐴))
177	165, 176	eqtrd 2798	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (abss‘(𝐴 -s 𝑥𝑂)) = (𝑥𝑂 -s 𝐴))
178	177	breq2d 5121	. . . . . . . . . 10 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)) ↔ ( 1s /su 𝑛) ≤s (𝑥𝑂 -s 𝐴)))
179	56, 55, 52	lesubsd 28289	. . . . . . . . . 10 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (( 1s /su 𝑛) ≤s (𝑥𝑂 -s 𝐴) ↔ 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛))))
180	178, 179	bitrd 282	. . . . . . . . 9 ⊢ (((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) ∧ 𝑛 ∈ ℕs) → (( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)) ↔ 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛))))
181	180	rexbidva 3187	. . . . . . . 8 ⊢ ((𝐴 ∈ No ∧ 𝑥𝑂 ∈ ( R ‘𝐴)) → (∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)) ↔ ∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛))))
182	181	ralbidva 3186	. . . . . . 7 ⊢ (𝐴 ∈ No → (∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)) ↔ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛))))
183	162, 182	anbi12d 643	. . . . . 6 ⊢ (𝐴 ∈ No → ((∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)) ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂))) ↔ (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)))))
184	140, 183	bitrid 286	. . . . 5 ⊢ (𝐴 ∈ No → (∀𝑥𝑂 ∈ (( L ‘𝐴) ∪ ( R ‘𝐴))∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)) ↔ (∀𝑥𝑂 ∈ ( L ‘𝐴)∃𝑛 ∈ ℕs (𝑥𝑂 +s ( 1s /su 𝑛)) ≤s 𝐴 ∧ ∀𝑥𝑂 ∈ ( R ‘𝐴)∃𝑛 ∈ ℕs 𝐴 ≤s (𝑥𝑂 -s ( 1s /su 𝑛)))))
185	139, 184	bitr4d 285	. . . 4 ⊢ (𝐴 ∈ No → (𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}) ↔ ∀𝑥𝑂 ∈ (( L ‘𝐴) ∪ ( R ‘𝐴))∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂))))
186	185	anbi2d 641	. . 3 ⊢ (𝐴 ∈ No → ((∃𝑛 ∈ ℕs (( -us ‘𝑛) <s 𝐴 ∧ 𝐴 <s 𝑛) ∧ 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))})) ↔ (∃𝑛 ∈ ℕs (( -us ‘𝑛) <s 𝐴 ∧ 𝐴 <s 𝑛) ∧ ∀𝑥𝑂 ∈ (( L ‘𝐴) ∪ ( R ‘𝐴))∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)))))
187	186	pm5.32i 584	. 2 ⊢ ((𝐴 ∈ No ∧ (∃𝑛 ∈ ℕs (( -us ‘𝑛) <s 𝐴 ∧ 𝐴 <s 𝑛) ∧ 𝐴 = ({𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 -s ( 1s /su 𝑛))} |s {𝑤 ∣ ∃𝑛 ∈ ℕs 𝑤 = (𝐴 +s ( 1s /su 𝑛))}))) ↔ (𝐴 ∈ No ∧ (∃𝑛 ∈ ℕs (( -us ‘𝑛) <s 𝐴 ∧ 𝐴 <s 𝑛) ∧ ∀𝑥𝑂 ∈ (( L ‘𝐴) ∪ ( R ‘𝐴))∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)))))
188	1, 187	bitri 278	1 ⊢ (𝐴 ∈ ℝs ↔ (𝐴 ∈ No ∧ (∃𝑛 ∈ ℕs (( -us ‘𝑛) <s 𝐴 ∧ 𝐴 <s 𝑛) ∧ ∀𝑥𝑂 ∈ (( L ‘𝐴) ∪ ( R ‘𝐴))∃𝑛 ∈ ℕs ( 1s /su 𝑛) ≤s (abss‘(𝐴 -s 𝑥𝑂)))))

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 400   = wceq 1570  ∃wex 1809   ∈ wcel 2143  {cab 2741  ∀wral 3079  ∃wrex 3089  Vcvv 3455   ∪ cun 3903  {csn 4589   class class class wbr 5109  ‘cfv 6536  (class class class)co 7410   No csur 27804   <s clts 27805   ≤s cles 27908   <<s cslts 27950   |s ccuts 27952   0_s c0s 27998   1_s c1s 27999   L cleft 28018   R cright 28019   +_s cadds 28152   -u_s cnegs 28212   -_s csubs 28213   /_su cdivs 28380  abs_scabss 28430  ℕ_scnns 28506  ℝ_screno 28682

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-inf2 9606  ax-dc 10425

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-tp 4594  df-op 4596  df-ot 4598  df-uni 4873  df-int 4913  df-iun 4958  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-se 5615  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-om 7859  df-1st 7982  df-2nd 7983  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-2o 8450  df-oadd 8453  df-nadd 8648  df-no 27807  df-lts 27808  df-bday 27809  df-les 27909  df-slts 27951  df-cuts 27953  df-0s 28000  df-1s 28001  df-made 28020  df-old 28021  df-left 28023  df-right 28024  df-norec 28131  df-norec2 28142  df-adds 28153  df-negs 28214  df-subs 28215  df-muls 28300  df-divs 28381  df-abss 28431  df-n0s 28507  df-nns 28508  df-reno 28683

This theorem is referenced by:  0reno  28689  1reno  28690