Theorem supsrlem 11047

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 11033	. . . . . . 7 ⊢ (𝐶 ∈ R → (𝐶 +R 0R) = 𝐶)
3	1, 2	mp1i 13	. . . . . 6 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → (𝐶 +R 0R) = 𝐶)
4		simpl 483	. . . . . 6 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → 𝐶 ∈ 𝐴)
5	3, 4	eqeltrd 2838	. . . . 5 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → (𝐶 +R 0R) ∈ 𝐴)
6		1pr 10951	. . . . . . 7 ⊢ 1P ∈ P
7	6	elexi 3464	. . . . . 6 ⊢ 1P ∈ V
8		opeq1 4830	. . . . . . . . . 10 ⊢ (𝑤 = 1P → ⟨𝑤, 1P⟩ = ⟨1P, 1P⟩)
9	8	eceq1d 8687	. . . . . . . . 9 ⊢ (𝑤 = 1P → [⟨𝑤, 1P⟩] ~R = [⟨1P, 1P⟩] ~R )
10		df-0r 10996	. . . . . . . . 9 ⊢ 0R = [⟨1P, 1P⟩] ~R
11	9, 10	eqtr4di 2794	. . . . . . . 8 ⊢ (𝑤 = 1P → [⟨𝑤, 1P⟩] ~R = 0R)
12	11	oveq2d 7373	. . . . . . 7 ⊢ (𝑤 = 1P → (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = (𝐶 +R 0R))
13	12	eleq1d 2822	. . . . . 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 233	. . . 4 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → 1P ∈ 𝐵)
17	16	ne0d 4295	. . 3 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → 𝐵 ≠ ∅)
18		breq1 5108	. . . . . . . 8 ⊢ (𝑦 = 𝐶 → (𝑦 <R 𝑥 ↔ 𝐶 <R 𝑥))
19	18	rspccv 3578	. . . . . . 7 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → (𝐶 ∈ 𝐴 → 𝐶 <R 𝑥))
20		0lt1sr 11031	. . . . . . . . . . . . 13 ⊢ 0R <R 1R
21		m1r 11018	. . . . . . . . . . . . . 14 ⊢ -1R ∈ R
22		ltasr 11036	. . . . . . . . . . . . . 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 229	. . . . . . . . . . . 12 ⊢ (-1R +R 0R) <R (-1R +R 1R)
25		0idsr 11033	. . . . . . . . . . . . 13 ⊢ (-1R ∈ R → (-1R +R 0R) = -1R)
26	21, 25	ax-mp 5	. . . . . . . . . . . 12 ⊢ (-1R +R 0R) = -1R
27		m1p1sr 11028	. . . . . . . . . . . 12 ⊢ (-1R +R 1R) = 0R
28	24, 26, 27	3brtr3i 5134	. . . . . . . . . . 11 ⊢ -1R <R 0R
29		ltasr 11036	. . . . . . . . . . . 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 229	. . . . . . . . . 10 ⊢ (𝐶 +R -1R) <R (𝐶 +R 0R)
32	1, 2	ax-mp 5	. . . . . . . . . 10 ⊢ (𝐶 +R 0R) = 𝐶
33	31, 32	breqtri 5130	. . . . . . . . 9 ⊢ (𝐶 +R -1R) <R 𝐶
34		ltsosr 11030	. . . . . . . . . 10 ⊢ <R Or R
35		ltrelsr 11004	. . . . . . . . . 10 ⊢ <R ⊆ (R × R)
36	34, 35	sotri 6081	. . . . . . . . 9 ⊢ (((𝐶 +R -1R) <R 𝐶 ∧ 𝐶 <R 𝑥) → (𝐶 +R -1R) <R 𝑥)
37	33, 36	mpan 688	. . . . . . . 8 ⊢ (𝐶 <R 𝑥 → (𝐶 +R -1R) <R 𝑥)
38	1	map2psrpr 11046	. . . . . . . 8 ⊢ ((𝐶 +R -1R) <R 𝑥 ↔ ∃𝑣 ∈ P (𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥)
39	37, 38	sylib 217	. . . . . . 7 ⊢ (𝐶 <R 𝑥 → ∃𝑣 ∈ P (𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥)
40	19, 39	syl6 35	. . . . . 6 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → (𝐶 ∈ 𝐴 → ∃𝑣 ∈ P (𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥))
41		breq2 5109	. . . . . . . . . 10 ⊢ ((𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥 → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ↔ 𝑦 <R 𝑥))
42	41	ralbidv 3174	. . . . . . . . 9 ⊢ ((𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥 → (∀𝑦 ∈ 𝐴 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ↔ ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥))
43	14	eqabi 2881	. . . . . . . . . . 11 ⊢ (𝑤 ∈ 𝐵 ↔ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴)
44		breq1 5108	. . . . . . . . . . . . 13 ⊢ (𝑦 = (𝐶 +R [⟨𝑤, 1P⟩] ~R ) → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ↔ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑣, 1P⟩] ~R )))
45	44	rspccv 3578	. . . . . . . . . . . 12 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴 → (𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑣, 1P⟩] ~R )))
46	1	ltpsrpr 11045	. . . . . . . . . . . 12 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ↔ 𝑤<P 𝑣)
47	45, 46	syl6ib 250	. . . . . . . . . . 11 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴 → 𝑤<P 𝑣))
48	43, 47	biimtrid 241	. . . . . . . . . 10 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → (𝑤 ∈ 𝐵 → 𝑤<P 𝑣))
49	48	ralrimiv 3142	. . . . . . . . 9 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∀𝑤 ∈ 𝐵 𝑤<P 𝑣)
50	42, 49	syl6bir 253	. . . . . . . 8 ⊢ ((𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥 → (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → ∀𝑤 ∈ 𝐵 𝑤<P 𝑣))
51	50	com12 32	. . . . . . 7 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → ((𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥 → ∀𝑤 ∈ 𝐵 𝑤<P 𝑣))
52	51	reximdv 3167	. . . . . 6 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → (∃𝑣 ∈ P (𝐶 +R [⟨𝑣, 1P⟩] ~R ) = 𝑥 → ∃𝑣 ∈ P ∀𝑤 ∈ 𝐵 𝑤<P 𝑣))
53	40, 52	syld 47	. . . . 5 ⊢ (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → (𝐶 ∈ 𝐴 → ∃𝑣 ∈ P ∀𝑤 ∈ 𝐵 𝑤<P 𝑣))
54	53	rexlimivw 3148	. . . 4 ⊢ (∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → (𝐶 ∈ 𝐴 → ∃𝑣 ∈ P ∀𝑤 ∈ 𝐵 𝑤<P 𝑣))
55	54	impcom 408	. . 3 ⊢ ((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → ∃𝑣 ∈ P ∀𝑤 ∈ 𝐵 𝑤<P 𝑣)
56		supexpr 10990	. . 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 11044	. . . . . . 7 ⊢ ((𝐶 +R -1R) <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ↔ 𝑣 ∈ P)
59	35	brel 5697	. . . . . . 7 ⊢ ((𝐶 +R -1R) <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ((𝐶 +R -1R) ∈ R ∧ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ∈ R))
60	58, 59	sylbir 234	. . . . . 6 ⊢ (𝑣 ∈ P → ((𝐶 +R -1R) ∈ R ∧ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ∈ R))
61	60	simprd 496	. . . . 5 ⊢ (𝑣 ∈ P → (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ∈ R)
62	61	adantl 482	. . . 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 11046	. . . . . . . . . . . . . 14 ⊢ ((𝐶 +R -1R) <R 𝑦 ↔ ∃𝑤 ∈ P (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦)
66	64, 65	sylib 217	. . . . . . . . . . . . 13 ⊢ ((𝑣 ∈ P ∧ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦) → ∃𝑤 ∈ P (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦)
67		rexex 3079	. . . . . . . . . . . . 13 ⊢ (∃𝑤 ∈ P (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → ∃𝑤(𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦)
68		df-ral 3065	. . . . . . . . . . . . . . 15 ⊢ (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ↔ ∀𝑤(𝑤 ∈ 𝐵 → ¬ 𝑣<P 𝑤))
69		19.29 1876	. . . . . . . . . . . . . . . 16 ⊢ ((∀𝑤(𝑤 ∈ 𝐵 → ¬ 𝑣<P 𝑤) ∧ ∃𝑤(𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦) → ∃𝑤((𝑤 ∈ 𝐵 → ¬ 𝑣<P 𝑤) ∧ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦))
70		eleq1 2825	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴 ↔ 𝑦 ∈ 𝐴))
71	43, 70	bitrid 282	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → (𝑤 ∈ 𝐵 ↔ 𝑦 ∈ 𝐴))
72	1	ltpsrpr 11045	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑤, 1P⟩] ~R ) ↔ 𝑣<P 𝑤)
73		breq2 5109	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → ((𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑤, 1P⟩] ~R ) ↔ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
74	72, 73	bitr3id 284	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → (𝑣<P 𝑤 ↔ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
75	74	notbid 317	. . . . . . . . . . . . . . . . . . 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 479	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑤 ∈ 𝐵 → ¬ 𝑣<P 𝑤) ∧ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦) → (𝑦 ∈ 𝐴 → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
78	77	exlimiv 1933	. . . . . . . . . . . . . . . 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 414	. . . . . . . . . . . . 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 411	. . . . . . . . . . 11 ⊢ ((𝑣 ∈ P ∧ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦) → ((∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ∧ 𝑦 ∈ 𝐴) → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
84	83	impancom 452	. . . . . . . . . 10 ⊢ ((𝑣 ∈ P ∧ (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ∧ 𝑦 ∈ 𝐴)) → ((𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦 → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
85	84	pm2.01d 189	. . . . . . . . 9 ⊢ ((𝑣 ∈ P ∧ (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ∧ 𝑦 ∈ 𝐴)) → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦)
86	85	expr 457	. . . . . . . 8 ⊢ ((𝑣 ∈ P ∧ ∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤) → (𝑦 ∈ 𝐴 → ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
87	86	ralrimiv 3142	. . . . . . 7 ⊢ ((𝑣 ∈ P ∧ ∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤) → ∀𝑦 ∈ 𝐴 ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦)
88	87	ex 413	. . . . . 6 ⊢ (𝑣 ∈ P → (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 → ∀𝑦 ∈ 𝐴 ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
89	88	adantl 482	. . . . 5 ⊢ (((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) ∧ 𝑣 ∈ P) → (∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 → ∀𝑦 ∈ 𝐴 ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
90		r19.29 3117	. . . . . . . . . . . . . 14 ⊢ ((∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) ∧ ∃𝑤 ∈ P (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦) → ∃𝑤 ∈ P ((𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) ∧ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦))
91		breq1 5108	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) ↔ 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R )))
92	46, 91	bitr3id 284	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → (𝑤<P 𝑣 ↔ 𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R )))
93	92	biimprd 247	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → 𝑤<P 𝑣))
94		vex 3449	. . . . . . . . . . . . . . . . . . . . 21 ⊢ 𝑢 ∈ V
95		opeq1 4830	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑤 = 𝑢 → ⟨𝑤, 1P⟩ = ⟨𝑢, 1P⟩)
96	95	eceq1d 8687	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑤 = 𝑢 → [⟨𝑤, 1P⟩] ~R = [⟨𝑢, 1P⟩] ~R )
97	96	oveq2d 7373	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑤 = 𝑢 → (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = (𝐶 +R [⟨𝑢, 1P⟩] ~R ))
98	97	eleq1d 2822	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑤 = 𝑢 → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴 ↔ (𝐶 +R [⟨𝑢, 1P⟩] ~R ) ∈ 𝐴))
99	94, 98, 14	elab2 3634	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑢 ∈ 𝐵 ↔ (𝐶 +R [⟨𝑢, 1P⟩] ~R ) ∈ 𝐴)
100		breq2 5109	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑧 = (𝐶 +R [⟨𝑢, 1P⟩] ~R ) → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R 𝑧 ↔ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑢, 1P⟩] ~R )))
101	1	ltpsrpr 11045	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R (𝐶 +R [⟨𝑢, 1P⟩] ~R ) ↔ 𝑤<P 𝑢)
102	100, 101	bitrdi 286	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑧 = (𝐶 +R [⟨𝑢, 1P⟩] ~R ) → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R 𝑧 ↔ 𝑤<P 𝑢))
103	102	rspcev 3581	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝐶 +R [⟨𝑢, 1P⟩] ~R ) ∈ 𝐴 ∧ 𝑤<P 𝑢) → ∃𝑧 ∈ 𝐴 (𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R 𝑧)
104	99, 103	sylanb 581	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑢 ∈ 𝐵 ∧ 𝑤<P 𝑢) → ∃𝑧 ∈ 𝐴 (𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R 𝑧)
105	104	rexlimiva 3144	. . . . . . . . . . . . . . . . . 18 ⊢ (∃𝑢 ∈ 𝐵 𝑤<P 𝑢 → ∃𝑧 ∈ 𝐴 (𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R 𝑧)
106		breq1 5108	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R 𝑧 ↔ 𝑦 <R 𝑧))
107	106	rexbidv 3175	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦 → (∃𝑧 ∈ 𝐴 (𝐶 +R [⟨𝑤, 1P⟩] ~R ) <R 𝑧 ↔ ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))
108	105, 107	imbitrid 243	. . . . . . . . . . . . . . . . 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 408	. . . . . . . . . . . . . . 15 ⊢ (((𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) ∧ (𝐶 +R [⟨𝑤, 1P⟩] ~R ) = 𝑦) → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))
111	110	rexlimivw 3148	. . . . . . . . . . . . . 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 413	. . . . . . . . . . 11 ⊢ (∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) → ((𝐶 +R -1R) <R 𝑦 → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
115	114	adantl 482	. . . . . . . . . 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 1450	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ R ∧ ¬ (𝐶 +R -1R) <R 𝑦) → 𝑦 <R 𝐶)
119		breq2 5109	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = 𝐶 → (𝑦 <R 𝑧 ↔ 𝑦 <R 𝐶))
120	119	rspcev 3581	. . . . . . . . . . . . . 14 ⊢ ((𝐶 ∈ 𝐴 ∧ 𝑦 <R 𝐶) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)
121	120	ex 413	. . . . . . . . . . . . 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 417	. . . . . . . . . 10 ⊢ (𝐶 ∈ 𝐴 → (¬ (𝐶 +R -1R) <R 𝑦 → (𝑦 ∈ R → (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))))
125	124	ad2antrr 724	. . . . . . . . 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 3142	. . . . . . 7 ⊢ (((𝐶 ∈ 𝐴 ∧ 𝑣 ∈ P) ∧ ∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢)) → ∀𝑦 ∈ R (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))
128	127	ex 413	. . . . . 6 ⊢ ((𝐶 ∈ 𝐴 ∧ 𝑣 ∈ P) → (∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢) → ∀𝑦 ∈ R (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
129	128	adantlr 713	. . . . 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 5108	. . . . . . . 8 ⊢ (𝑥 = (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → (𝑥 <R 𝑦 ↔ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
132	131	notbid 317	. . . . . . 7 ⊢ (𝑥 = (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → (¬ 𝑥 <R 𝑦 ↔ ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
133	132	ralbidv 3174	. . . . . 6 ⊢ (𝑥 = (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ↔ ∀𝑦 ∈ 𝐴 ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦))
134		breq2 5109	. . . . . . . 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 3174	. . . . . 6 ⊢ (𝑥 = (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → (∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧) ↔ ∀𝑦 ∈ R (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
137	133, 136	anbi12d 631	. . . . 5 ⊢ (𝑥 = (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ((∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)) ↔ (∀𝑦 ∈ 𝐴 ¬ (𝐶 +R [⟨𝑣, 1P⟩] ~R ) <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R (𝐶 +R [⟨𝑣, 1P⟩] ~R ) → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))))
138	137	rspcev 3581	. . . 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 682	. . 3 ⊢ (((𝐶 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) ∧ 𝑣 ∈ P) → ((∀𝑤 ∈ 𝐵 ¬ 𝑣<P 𝑤 ∧ ∀𝑤 ∈ P (𝑤<P 𝑣 → ∃𝑢 ∈ 𝐵 𝑤<P 𝑢)) → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))))
140	139	rexlimdva 3152	. 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 205   ∧ wa 396  ∀wal 1539   = wceq 1541  ∃wex 1781   ∈ wcel 2106  {cab 2713   ≠ wne 2943  ∀wral 3064  ∃wrex 3073  ∅c0 4282  ⟨cop 4592   class class class wbr 5105  (class class class)co 7357  [cec 8646  Pcnp 10795  1_Pc1p 10796  <_P cltp 10799   ~_R cer 10800  Rcnr 10801  0_Rc0r 10802  1_Rc1r 10803  -1_Rcm1r 10804   +_R cplr 10805   <_R cltr 10807

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-sep 5256  ax-nul 5263  ax-pow 5320  ax-pr 5384  ax-un 7672  ax-inf2 9577

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-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-pred 6253  df-ord 6320  df-on 6321  df-lim 6322  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-ov 7360  df-oprab 7361  df-mpo 7362  df-om 7803  df-1st 7921  df-2nd 7922  df-frecs 8212  df-wrecs 8243  df-recs 8317  df-rdg 8356  df-1o 8412  df-oadd 8416  df-omul 8417  df-er 8648  df-ec 8650  df-qs 8654  df-ni 10808  df-pli 10809  df-mi 10810  df-lti 10811  df-plpq 10844  df-mpq 10845  df-ltpq 10846  df-enq 10847  df-nq 10848  df-erq 10849  df-plq 10850  df-mq 10851  df-1nq 10852  df-rq 10853  df-ltnq 10854  df-np 10917  df-1p 10918  df-plp 10919  df-mp 10920  df-ltp 10921  df-enr 10991  df-nr 10992  df-plr 10993  df-mr 10994  df-ltr 10995  df-0r 10996  df-1r 10997  df-m1r 10998

This theorem is referenced by:  supsr  11048