Theorem supsrlem 11013

Description: Lemma for supremum theorem. (Contributed by NM, 21-May-1996.) (Revised by Mario Carneiro, 15-Jun-2013.) (New usage is discouraged.)

Hypotheses

Ref	Expression
supsrlem.1	⊢ 𝐵 = {𝑤 ∣ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴}
supsrlem.2	⊢ 𝐶 ∈ R

Assertion

Ref	Expression
supsrlem	⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))

Distinct variable groups:   𝑥,𝑦,𝑧,𝑤,𝐴   𝑥,𝐵,𝑦,𝑧,𝑤   𝑥,𝐶,𝑦,𝑧,𝑤

Proof of Theorem supsrlem

Dummy variables 𝑣 𝑢 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		supsrlem.2	. . . . . . 7 ⊢ 𝐶 ∈ R
2		0idsr 10999	. . . . . . 7 ⊢ (𝐶 ∈ R → (𝐶 +R 0R) = 𝐶)
3	1, 2	mp1i 13	. . . . . 6 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → (𝐶 +R 0R) = 𝐶)
4		simpl 482	. . . . . 6 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → 𝐶 ∈ 𝐴)
5	3, 4	eqeltrd 2833	. . . . 5 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → (𝐶 +R 0R) ∈ 𝐴)
6		1pr 10917	. . . . . . 7 ⊢ 1P ∈ P
7	6	elexi 3460	. . . . . 6 ⊢ 1P ∈ V
8		opeq1 4826	. . . . . . . . . 10 ⊢ (𝑤 = 1P → ⟨𝑤, 1P⟩ = ⟨1P, 1P⟩)
9	8	eceq1d 8671	. . . . . . . . 9 ⊢ (𝑤 = 1P → [⟨𝑤, 1P⟩] ~R = [⟨1P, 1P⟩] ~R )
10		df-0r 10962	. . . . . . . . 9 ⊢ 0R = [⟨1P, 1P⟩] ~R
11	9, 10	eqtr4di 2786	. . . . . . . 8 ⊢ (𝑤 = 1P → [⟨𝑤, 1P⟩] ~R = 0R)
12	11	oveq2d 7371	. . . . . . 7 ⊢ (𝑤 = 1P → (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = (𝐶 +R 0R))
13	12	eleq1d 2818	. . . . . 6 ⊢ (𝑤 = 1P → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴 ↔ (𝐶 +R 0R) ∈ 𝐴))
14		supsrlem.1	. . . . . 6 ⊢ 𝐵 = {𝑤 ∣ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴}
15	7, 13, 14	elab2 3634	. . . . 5 ⊢ (1P ∈ 𝐵 ↔ (𝐶 +R 0R) ∈ 𝐴)
16	5, 15	sylibr 234	. . . 4 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → 1P ∈ 𝐵)
17	16	ne0d 4291	. . 3 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → 𝐵 ≠ ∅)
18		breq1 5098	. . . . . . . 8 ⊢ (𝑦 = 𝐶 → (𝑦 <R 𝑥 ↔ 𝐶 <R 𝑥))
19	18	rspccv 3570	. . . . . . 7 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → (𝐶 ∈ 𝐴 → 𝐶 <R 𝑥))
20		0lt1sr 10997	. . . . . . . . . . . . 13 ⊢ 0R <R 1R
21		m1r 10984	. . . . . . . . . . . . . 14 ⊢ -1R ∈ R
22		ltasr 11002	. . . . . . . . . . . . . 14 ⊢ (-1R ∈ R → (0R <R 1R ↔ (-1R +R 0R) <R (-1R +R 1R)))
23	21, 22	ax-mp 5	. . . . . . . . . . . . 13 ⊢ (0R <R 1R ↔ (-1R +R 0R) <R (-1R +R 1R))
24	20, 23	mpbi 230	. . . . . . . . . . . 12 ⊢ (-1R +R 0R) <R (-1R +R 1R)
25		0idsr 10999	. . . . . . . . . . . . 13 ⊢ (-1R ∈ R → (-1R +R 0R) = -1R)
26	21, 25	ax-mp 5	. . . . . . . . . . . 12 ⊢ (-1R +R 0R) = -1R
27		m1p1sr 10994	. . . . . . . . . . . 12 ⊢ (-1R +R 1R) = 0R
28	24, 26, 27	3brtr3i 5124	. . . . . . . . . . 11 ⊢ -1R <R 0R
29		ltasr 11002	. . . . . . . . . . . 12 ⊢ (𝐶 ∈ R → (-1R <R 0R ↔ (𝐶 +R -1R) <R (𝐶 +R 0R)))
30	1, 29	ax-mp 5	. . . . . . . . . . 11 ⊢ (-1R <R 0R ↔ (𝐶 +R -1R) <R (𝐶 +R 0R))
31	28, 30	mpbi 230	. . . . . . . . . 10 ⊢ (𝐶 +R -1R) <R (𝐶 +R 0R)
32	1, 2	ax-mp 5	. . . . . . . . . 10 ⊢ (𝐶 +R 0R) = 𝐶
33	31, 32	breqtri 5120	. . . . . . . . 9 ⊢ (𝐶 +R -1R) <R 𝐶
34		ltsosr 10996	. . . . . . . . . 10 ⊢ <R Or R
35		ltrelsr 10970	. . . . . . . . . 10 ⊢ <R ⊆ (R × R)
36	34, 35	sotri 6081	. . . . . . . . 9 ⊢ (((𝐶 +R -1R) <R 𝐶 ∧ 𝐶 <R 𝑥) → (𝐶 +R -1R) <R 𝑥)
37	33, 36	mpan 690	. . . . . . . 8 ⊢ (𝐶 <R 𝑥 → (𝐶 +R -1R) <R 𝑥)
38	1	map2psrpr 11012	. . . . . . . 8 ⊢ ((𝐶 +R -1R) <R 𝑥 ↔ ∃𝑣 ∈ P (𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥)
39	37, 38	sylib 218	. . . . . . 7 ⊢ (𝐶 <R 𝑥 → ∃𝑣 ∈ P (𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥)
40	19, 39	syl6 35	. . . . . 6 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → (𝐶 ∈ 𝐴 → ∃𝑣 ∈ P (𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥))
41		breq2 5099	. . . . . . . . . 10 ⊢ ((𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥 → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ↔ 𝑦 <R 𝑥))
42	41	ralbidv 3156	. . . . . . . . 9 ⊢ ((𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥 → (∀𝑦 ∈ 𝐴 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ↔ ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥))
43	14	eqabri 2875	. . . . . . . . . . 11 ⊢ (𝑤 ∈ 𝐵 ↔ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴)
44		breq1 5098	. . . . . . . . . . . . 13 ⊢ (𝑦 = (𝐶 +R [⟨𝑤, 1P⟩] ~R ) → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ↔ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑣, 1P⟩] ~R )))
45	44	rspccv 3570	. . . . . . . . . . . 12 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴 → (𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑣, 1P⟩] ~R )))
46	1	ltpsrpr 11011	. . . . . . . . . . . 12 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ↔ 𝑤<P 𝑣)
47	45, 46	imbitrdi 251	. . . . . . . . . . 11 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴 → 𝑤<P 𝑣))
48	43, 47	biimtrid 242	. . . . . . . . . 10 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → (𝑤 ∈ 𝐵 → 𝑤<P 𝑣))
49	48	ralrimiv 3124	. . . . . . . . 9 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∀𝑤 ∈ 𝐵 𝑤<P 𝑣)
50	42, 49	biimtrrdi 254	. . . . . . . 8 ⊢ ((𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥 → (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → ∀𝑤 ∈ 𝐵 𝑤<P 𝑣))
51	50	com12 32	. . . . . . 7 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → ((𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥 → ∀𝑤 ∈ 𝐵 𝑤<P 𝑣))
52	51	reximdv 3148	. . . . . 6 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → (∃𝑣 ∈ P (𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥 → ∃𝑣 ∈ P ∀𝑤 ∈ 𝐵 𝑤<P 𝑣))
53	40, 52	syld 47	. . . . 5 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → (𝐶 ∈ 𝐴 → ∃𝑣 ∈ P ∀𝑤 ∈ 𝐵 𝑤<P 𝑣))
54	53	rexlimivw 3130	. . . 4 ⊢ (∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → (𝐶 ∈ 𝐴 → ∃𝑣 ∈ P ∀𝑤 ∈ 𝐵 𝑤<P 𝑣))
55	54	impcom 407	. . 3 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → ∃𝑣 ∈ P ∀𝑤 ∈ 𝐵 𝑤<P 𝑣)
56		supexpr 10956	. . 3 ⊢ ((𝐵 ≠ ∅ ∧ ∃𝑣 ∈ P ∀𝑤 ∈ 𝐵 𝑤<P 𝑣) → ∃𝑣 ∈ P (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ∧ ∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢)))
57	17, 55, 56	syl2anc 584	. 2 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → ∃𝑣 ∈ P (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ∧ ∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢)))
58	1	mappsrpr 11010	. . . . . . 7 ⊢ ((𝐶 +R -1R) <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ↔ 𝑣 ∈ P)
59	35	brel 5686	. . . . . . 7 ⊢ ((𝐶 +R -1R) <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ((𝐶 +R -1R) ∈ R ∧ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ∈ R))
60	58, 59	sylbir 235	. . . . . 6 ⊢ (𝑣 ∈ P → ((𝐶 +R -1R) ∈ R ∧ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ∈ R))
61	60	simprd 495	. . . . 5 ⊢ (𝑣 ∈ P → (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ∈ R)
62	61	adantl 481	. . . 4 ⊢ (((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) ∧ 𝑣 ∈ P) → (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ∈ R)
63	34, 35	sotri 6081	. . . . . . . . . . . . . . 15 ⊢ (((𝐶 +R -1R) <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ∧ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦) → (𝐶 +R -1R) <R 𝑦)
64	58, 63	sylanbr 582	. . . . . . . . . . . . . 14 ⊢ ((𝑣 ∈ P ∧ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦) → (𝐶 +R -1R) <R 𝑦)
65	1	map2psrpr 11012	. . . . . . . . . . . . . 14 ⊢ ((𝐶 +R -1R) <R 𝑦 ↔ ∃𝑤 ∈ P (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦)
66	64, 65	sylib 218	. . . . . . . . . . . . 13 ⊢ ((𝑣 ∈ P ∧ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦) → ∃𝑤 ∈ P (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦)
67		rexex 3063	. . . . . . . . . . . . 13 ⊢ (∃𝑤 ∈ P (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → ∃𝑤(𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦)
68		df-ral 3049	. . . . . . . . . . . . . . 15 ⊢ (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ↔ ∀𝑤(𝑤 ∈ 𝐵 → ¬ 𝑣<P 𝑤))
69		19.29 1874	. . . . . . . . . . . . . . . 16 ⊢ ((∀𝑤(𝑤 ∈ 𝐵 → ¬ 𝑣<P 𝑤) ∧ ∃𝑤(𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦) → ∃𝑤((𝑤 ∈ 𝐵 → ¬ 𝑣<P 𝑤) ∧ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦))
70		eleq1 2821	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴 ↔ 𝑦 ∈ 𝐴))
71	43, 70	bitrid 283	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → (𝑤 ∈ 𝐵 ↔ 𝑦 ∈ 𝐴))
72	1	ltpsrpr 11011	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑤, 1P⟩] ~R ) ↔ 𝑣<P 𝑤)
73		breq2 5099	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → ((𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑤, 1P⟩] ~R ) ↔ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
74	72, 73	bitr3id 285	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → (𝑣<P 𝑤 ↔ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
75	74	notbid 318	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → (¬ 𝑣<P 𝑤 ↔ ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
76	71, 75	imbi12d 344	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → ((𝑤 ∈ 𝐵 → ¬ 𝑣<P 𝑤) ↔ (𝑦 ∈ 𝐴 → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦)))
77	76	biimpac 478	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑤 ∈ 𝐵 → ¬ 𝑣<P 𝑤) ∧ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦) → (𝑦 ∈ 𝐴 → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
78	77	exlimiv 1931	. . . . . . . . . . . . . . . 16 ⊢ (∃𝑤((𝑤 ∈ 𝐵 → ¬ 𝑣<P 𝑤) ∧ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦) → (𝑦 ∈ 𝐴 → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
79	69, 78	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((∀𝑤(𝑤 ∈ 𝐵 → ¬ 𝑣<P 𝑤) ∧ ∃𝑤(𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦) → (𝑦 ∈ 𝐴 → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
80	68, 79	sylanb 581	. . . . . . . . . . . . . 14 ⊢ ((∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ∧ ∃𝑤(𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦) → (𝑦 ∈ 𝐴 → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
81	80	expcom 413	. . . . . . . . . . . . 13 ⊢ (∃𝑤(𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 → (𝑦 ∈ 𝐴 → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦)))
82	66, 67, 81	3syl 18	. . . . . . . . . . . 12 ⊢ ((𝑣 ∈ P ∧ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦) → (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 → (𝑦 ∈ 𝐴 → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦)))
83	82	impd 410	. . . . . . . . . . 11 ⊢ ((𝑣 ∈ P ∧ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦) → ((∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ∧ 𝑦 ∈ 𝐴) → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
84	83	impancom 451	. . . . . . . . . 10 ⊢ ((𝑣 ∈ P ∧ (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ∧ 𝑦 ∈ 𝐴)) → ((𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦 → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
85	84	pm2.01d 190	. . . . . . . . 9 ⊢ ((𝑣 ∈ P ∧ (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ∧ 𝑦 ∈ 𝐴)) → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦)
86	85	expr 456	. . . . . . . 8 ⊢ ((𝑣 ∈ P ∧ ∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤) → (𝑦 ∈ 𝐴 → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
87	86	ralrimiv 3124	. . . . . . 7 ⊢ ((𝑣 ∈ P ∧ ∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤) → ∀𝑦 ∈ 𝐴 ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦)
88	87	ex 412	. . . . . 6 ⊢ (𝑣 ∈ P → (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 → ∀𝑦 ∈ 𝐴 ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
89	88	adantl 481	. . . . 5 ⊢ (((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) ∧ 𝑣 ∈ P) → (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 → ∀𝑦 ∈ 𝐴 ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
90		r19.29 3096	. . . . . . . . . . . . . 14 ⊢ ((∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) ∧ ∃𝑤 ∈ P (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦) → ∃𝑤 ∈ P ((𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) ∧ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦))
91		breq1 5098	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ↔ 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R )))
92	46, 91	bitr3id 285	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → (𝑤<P 𝑣 ↔ 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R )))
93	92	biimprd 248	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → 𝑤<P 𝑣))
94		vex 3441	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 𝑢 ∈ V
95		opeq1 4826	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑤 = 𝑢 → ⟨𝑤, 1P⟩ = ⟨𝑢, 1P⟩)
96	95	eceq1d 8671	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 = 𝑢 → [⟨𝑤, 1P⟩] ~R = [⟨𝑢, 1P⟩] ~R )
97	96	oveq2d 7371	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑤 = 𝑢 → (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = (𝐶 +R [⟨𝑢, 1P⟩] ~R ))
98	97	eleq1d 2818	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑤 = 𝑢 → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴 ↔ (𝐶 +R [⟨𝑢, 1P⟩] ~R ) ∈ 𝐴))
99	94, 98, 14	elab2 3634	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑢 ∈ 𝐵 ↔ (𝐶 +R [⟨𝑢, 1P⟩] ~R ) ∈ 𝐴)
100		breq2 5099	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑧 = (𝐶 +R [⟨𝑢, 1P⟩] ~R ) → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R 𝑧 ↔ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑢, 1P⟩] ~R )))
101	1	ltpsrpr 11011	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑢, 1P⟩] ~R ) ↔ 𝑤<P 𝑢)
102	100, 101	bitrdi 287	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑧 = (𝐶 +R [⟨𝑢, 1P⟩] ~R ) → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R 𝑧 ↔ 𝑤<P 𝑢))
103	102	rspcev 3573	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝐶 +R [⟨𝑢, 1P⟩] ~R ) ∈ 𝐴 ∧ 𝑤<P 𝑢) → ∃𝑧 ∈ 𝐴 (𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R 𝑧)
104	99, 103	sylanb 581	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑢 ∈ 𝐵 ∧ 𝑤<P 𝑢) → ∃𝑧 ∈ 𝐴 (𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R 𝑧)
105	104	rexlimiva 3126	. . . . . . . . . . . . . . . . . 18 ⊢ (∃𝑢 ∈ 𝐵 𝑤<P 𝑢 → ∃𝑧 ∈ 𝐴 (𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R 𝑧)
106		breq1 5098	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R 𝑧 ↔ 𝑦 <R 𝑧))
107	106	rexbidv 3157	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → (∃𝑧 ∈ 𝐴 (𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R 𝑧 ↔ ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))
108	105, 107	imbitrid 244	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → (∃𝑢 ∈ 𝐵 𝑤<P 𝑢 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))
109	93, 108	imim12d 81	. . . . . . . . . . . . . . . 16 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → ((𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
110	109	impcom 407	. . . . . . . . . . . . . . 15 ⊢ (((𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) ∧ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦) → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))
111	110	rexlimivw 3130	. . . . . . . . . . . . . 14 ⊢ (∃𝑤 ∈ P ((𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) ∧ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦) → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))
112	90, 111	syl 17	. . . . . . . . . . . . 13 ⊢ ((∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) ∧ ∃𝑤 ∈ P (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦) → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))
113	65, 112	sylan2b 594	. . . . . . . . . . . 12 ⊢ ((∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) ∧ (𝐶 +R -1R) <R 𝑦) → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))
114	113	ex 412	. . . . . . . . . . 11 ⊢ (∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) → ((𝐶 +R -1R) <R 𝑦 → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
115	114	adantl 481	. . . . . . . . . 10 ⊢ (((𝐶 ∈ 𝐴 ∧ 𝑣 ∈ P) ∧ ∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢)) → ((𝐶 +R -1R) <R 𝑦 → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
116	115	a1dd 50	. . . . . . . . 9 ⊢ (((𝐶 ∈ 𝐴 ∧ 𝑣 ∈ P) ∧ ∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢)) → ((𝐶 +R -1R) <R 𝑦 → (𝑦 ∈ R → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))))
117	34, 35	sotri2 6083	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ R ∧ ¬ (𝐶 +R -1R) <R 𝑦 ∧ (𝐶 +R -1R) <R 𝐶) → 𝑦 <R 𝐶)
118	33, 117	mp3an3 1452	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ R ∧ ¬ (𝐶 +R -1R) <R 𝑦) → 𝑦 <R 𝐶)
119		breq2 5099	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = 𝐶 → (𝑦 <R 𝑧 ↔ 𝑦 <R 𝐶))
120	119	rspcev 3573	. . . . . . . . . . . . . 14 ⊢ ((𝐶 ∈ 𝐴 ∧ 𝑦 <R 𝐶) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)
121	120	ex 412	. . . . . . . . . . . . 13 ⊢ (𝐶 ∈ 𝐴 → (𝑦 <R 𝐶 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))
122	121	a1dd 50	. . . . . . . . . . . 12 ⊢ (𝐶 ∈ 𝐴 → (𝑦 <R 𝐶 → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
123	118, 122	syl5 34	. . . . . . . . . . 11 ⊢ (𝐶 ∈ 𝐴 → ((𝑦 ∈ R ∧ ¬ (𝐶 +R -1R) <R 𝑦) → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
124	123	expcomd 416	. . . . . . . . . 10 ⊢ (𝐶 ∈ 𝐴 → (¬ (𝐶 +R -1R) <R 𝑦 → (𝑦 ∈ R → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))))
125	124	ad2antrr 726	. . . . . . . . 9 ⊢ (((𝐶 ∈ 𝐴 ∧ 𝑣 ∈ P) ∧ ∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢)) → (¬ (𝐶 +R -1R) <R 𝑦 → (𝑦 ∈ R → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))))
126	116, 125	pm2.61d 179	. . . . . . . 8 ⊢ (((𝐶 ∈ 𝐴 ∧ 𝑣 ∈ P) ∧ ∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢)) → (𝑦 ∈ R → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
127	126	ralrimiv 3124	. . . . . . 7 ⊢ (((𝐶 ∈ 𝐴 ∧ 𝑣 ∈ P) ∧ ∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢)) → ∀𝑦 ∈ R (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))
128	127	ex 412	. . . . . 6 ⊢ ((𝐶 ∈ 𝐴 ∧ 𝑣 ∈ P) → (∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) → ∀𝑦 ∈ R (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
129	128	adantlr 715	. . . . 5 ⊢ (((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) ∧ 𝑣 ∈ P) → (∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) → ∀𝑦 ∈ R (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
130	89, 129	anim12d 609	. . . 4 ⊢ (((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) ∧ 𝑣 ∈ P) → ((∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ∧ ∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢)) → (∀𝑦 ∈ 𝐴 ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))))
131		breq1 5098	. . . . . . . 8 ⊢ (𝑥 = (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → (𝑥 <R 𝑦 ↔ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
132	131	notbid 318	. . . . . . 7 ⊢ (𝑥 = (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → (¬ 𝑥 <R 𝑦 ↔ ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
133	132	ralbidv 3156	. . . . . 6 ⊢ (𝑥 = (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ↔ ∀𝑦 ∈ 𝐴 ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
134		breq2 5099	. . . . . . . 8 ⊢ (𝑥 = (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → (𝑦 <R 𝑥 ↔ 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R )))
135	134	imbi1d 341	. . . . . . 7 ⊢ (𝑥 = (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ((𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧) ↔ (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
136	135	ralbidv 3156	. . . . . 6 ⊢ (𝑥 = (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → (∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧) ↔ ∀𝑦 ∈ R (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
137	133, 136	anbi12d 632	. . . . 5 ⊢ (𝑥 = (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ((∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)) ↔ (∀𝑦 ∈ 𝐴 ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))))
138	137	rspcev 3573	. . . 4 ⊢ (((𝐶 +R [⟨𝑣, 1P⟩] ~R ) ∈ R ∧ (∀𝑦 ∈ 𝐴 ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))) → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
139	62, 130, 138	syl6an 684	. . 3 ⊢ (((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) ∧ 𝑣 ∈ P) → ((∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ∧ ∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢)) → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))))
140	139	rexlimdva 3134	. 2 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → (∃𝑣 ∈ P (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ∧ ∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢)) → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))))
141	57, 140	mpd 15	1 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395  ∀wal 1539   = wceq 1541  ∃wex 1780   ∈ wcel 2113  {cab 2711   ≠ wne 2929  ∀wral 3048  ∃wrex 3057  ∅c0 4282  ⟨cop 4583   class class class wbr 5095  (class class class)co 7355  [cec 8629  Pcnp 10761  1_Pc1p 10762  <_P cltp 10765   ~_R cer 10766  Rcnr 10767  0_Rc0r 10768  1_Rc1r 10769  -1_Rcm1r 10770   +_R cplr 10771   <_R cltr 10773

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2705  ax-sep 5238  ax-nul 5248  ax-pow 5307  ax-pr 5374  ax-un 7677  ax-inf2 9542

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2537  df-eu 2566  df-clab 2712  df-cleq 2725  df-clel 2808  df-nfc 2882  df-ne 2930  df-ral 3049  df-rex 3058  df-rmo 3347  df-reu 3348  df-rab 3397  df-v 3439  df-sbc 3738  df-csb 3847  df-dif 3901  df-un 3903  df-in 3905  df-ss 3915  df-pss 3918  df-nul 4283  df-if 4477  df-pw 4553  df-sn 4578  df-pr 4580  df-op 4584  df-uni 4861  df-int 4900  df-iun 4945  df-br 5096  df-opab 5158  df-mpt 5177  df-tr 5203  df-id 5516  df-eprel 5521  df-po 5529  df-so 5530  df-fr 5574  df-we 5576  df-xp 5627  df-rel 5628  df-cnv 5629  df-co 5630  df-dm 5631  df-rn 5632  df-res 5633  df-ima 5634  df-pred 6256  df-ord 6317  df-on 6318  df-lim 6319  df-suc 6320  df-iota 6445  df-fun 6491  df-fn 6492  df-f 6493  df-f1 6494  df-fo 6495  df-f1o 6496  df-fv 6497  df-ov 7358  df-oprab 7359  df-mpo 7360  df-om 7806  df-1st 7930  df-2nd 7931  df-frecs 8220  df-wrecs 8251  df-recs 8300  df-rdg 8338  df-1o 8394  df-oadd 8398  df-omul 8399  df-er 8631  df-ec 8633  df-qs 8637  df-ni 10774  df-pli 10775  df-mi 10776  df-lti 10777  df-plpq 10810  df-mpq 10811  df-ltpq 10812  df-enq 10813  df-nq 10814  df-erq 10815  df-plq 10816  df-mq 10817  df-1nq 10818  df-rq 10819  df-ltnq 10820  df-np 10883  df-1p 10884  df-plp 10885  df-mp 10886  df-ltp 10887  df-enr 10957  df-nr 10958  df-plr 10959  df-mr 10960  df-ltr 10961  df-0r 10962  df-1r 10963  df-m1r 10964

This theorem is referenced by:  supsr  11014