genprndl - Intuitionistic Logic Explorer

	Intuitionistic Logic Explorer		< Previous Next > Nearby theorems
Mirrors > Home > ILE Home > Th. List > genprndl		GIF version

Theorem genprndl 7462

Description: The lower cut produced by addition or multiplication on positive reals is rounded. (Contributed by Jim Kingdon, 7-Oct-2019.)

**Hypotheses**
Ref	Expression
genpelvl.1	⊢ 𝐹 = (𝑤 ∈ P, 𝑣 ∈ P ↦ ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ Q ∃𝑧 ∈ Q (𝑦 ∈ (1^st ‘𝑤) ∧ 𝑧 ∈ (1^st ‘𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ Q ∃𝑧 ∈ Q (𝑦 ∈ (2^nd ‘𝑤) ∧ 𝑧 ∈ (2^nd ‘𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}⟩)
genpelvl.2	⊢ ((𝑦 ∈ Q ∧ 𝑧 ∈ Q) → (𝑦𝐺𝑧) ∈ Q)
genprndl.ord	⊢ ((𝑥 ∈ Q ∧ 𝑦 ∈ Q ∧ 𝑧 ∈ Q) → (𝑥 <_Q 𝑦 ↔ (𝑧𝐺𝑥) <_Q (𝑧𝐺𝑦)))
genprndl.com	⊢ ((𝑥 ∈ Q ∧ 𝑦 ∈ Q) → (𝑥𝐺𝑦) = (𝑦𝐺𝑥))
genprndl.lower	⊢ ((((𝐴 ∈ P ∧ 𝑔 ∈ (1^st ‘𝐴)) ∧ (𝐵 ∈ P ∧ ℎ ∈ (1^st ‘𝐵))) ∧ 𝑥 ∈ Q) → (𝑥 <_Q (𝑔𝐺ℎ) → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))))

**Assertion**
Ref	Expression
genprndl	⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → ∀𝑞 ∈ Q (𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ ∃𝑟 ∈ Q (𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)))))

Distinct variable groups: 𝑥,𝑦,𝑧,𝑔,ℎ,𝑤,𝑣,𝑞,𝐴 𝑥,𝐵,𝑦,𝑧,𝑔,ℎ,𝑤,𝑣,𝑞 𝑥,𝐺,𝑦,𝑧,𝑔,ℎ,𝑤,𝑣,𝑞 𝑔,𝐹,𝑞 𝐴,𝑟,𝑞,𝑣,𝑤,𝑥,𝑦,𝑧 𝐵,𝑟,𝑔,ℎ ℎ,𝐹,𝑟,𝑣,𝑤,𝑥,𝑦,𝑧 𝐺,𝑟

Proof of Theorem genprndl Dummy variables 𝑎 𝑏 𝑐 𝑑 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		genpelvl.1	. . . . . . . . . 10 ⊢ 𝐹 = (𝑤 ∈ P, 𝑣 ∈ P ↦ ⟨{𝑥 ∈ Q ∣ ∃𝑦 ∈ Q ∃𝑧 ∈ Q (𝑦 ∈ (1^st ‘𝑤) ∧ 𝑧 ∈ (1^st ‘𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}, {𝑥 ∈ Q ∣ ∃𝑦 ∈ Q ∃𝑧 ∈ Q (𝑦 ∈ (2^nd ‘𝑤) ∧ 𝑧 ∈ (2^nd ‘𝑣) ∧ 𝑥 = (𝑦𝐺𝑧))}⟩)
2		genpelvl.2	. . . . . . . . . 10 ⊢ ((𝑦 ∈ Q ∧ 𝑧 ∈ Q) → (𝑦𝐺𝑧) ∈ Q)
3	1, 2	genpelvl 7453	. . . . . . . . 9 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ ∃𝑎 ∈ (1^st ‘𝐴)∃𝑏 ∈ (1^st ‘𝐵)𝑞 = (𝑎𝐺𝑏)))
4		r2ex 2486	. . . . . . . . 9 ⊢ (∃𝑎 ∈ (1^st ‘𝐴)∃𝑏 ∈ (1^st ‘𝐵)𝑞 = (𝑎𝐺𝑏) ↔ ∃𝑎∃𝑏((𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵)) ∧ 𝑞 = (𝑎𝐺𝑏)))
5	3, 4	bitrdi 195	. . . . . . . 8 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ ∃𝑎∃𝑏((𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵)) ∧ 𝑞 = (𝑎𝐺𝑏))))
6	5	biimpa 294	. . . . . . 7 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵))) → ∃𝑎∃𝑏((𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵)) ∧ 𝑞 = (𝑎𝐺𝑏)))
7	6	adantrl 470	. . . . . 6 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑞 ∈ Q ∧ 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)))) → ∃𝑎∃𝑏((𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵)) ∧ 𝑞 = (𝑎𝐺𝑏)))
8		prop 7416	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ P → ⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩ ∈ P)
9		prnmaxl 7429	. . . . . . . . . . . . . . . 16 ⊢ ((⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩ ∈ P ∧ 𝑎 ∈ (1^st ‘𝐴)) → ∃𝑐 ∈ (1^st ‘𝐴)𝑎 <_Q 𝑐)
10	8, 9	sylan 281	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ P ∧ 𝑎 ∈ (1^st ‘𝐴)) → ∃𝑐 ∈ (1^st ‘𝐴)𝑎 <_Q 𝑐)
11		prop 7416	. . . . . . . . . . . . . . . 16 ⊢ (𝐵 ∈ P → ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩ ∈ P)
12		prnmaxl 7429	. . . . . . . . . . . . . . . 16 ⊢ ((⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩ ∈ P ∧ 𝑏 ∈ (1^st ‘𝐵)) → ∃𝑑 ∈ (1^st ‘𝐵)𝑏 <_Q 𝑑)
13	11, 12	sylan 281	. . . . . . . . . . . . . . 15 ⊢ ((𝐵 ∈ P ∧ 𝑏 ∈ (1^st ‘𝐵)) → ∃𝑑 ∈ (1^st ‘𝐵)𝑏 <_Q 𝑑)
14	10, 13	anim12i 336	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ P ∧ 𝑎 ∈ (1^st ‘𝐴)) ∧ (𝐵 ∈ P ∧ 𝑏 ∈ (1^st ‘𝐵))) → (∃𝑐 ∈ (1^st ‘𝐴)𝑎 <_Q 𝑐 ∧ ∃𝑑 ∈ (1^st ‘𝐵)𝑏 <_Q 𝑑))
15	14	an4s 578	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵))) → (∃𝑐 ∈ (1^st ‘𝐴)𝑎 <_Q 𝑐 ∧ ∃𝑑 ∈ (1^st ‘𝐵)𝑏 <_Q 𝑑))
16		reeanv 2635	. . . . . . . . . . . . 13 ⊢ (∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)(𝑎 <_Q 𝑐 ∧ 𝑏 <_Q 𝑑) ↔ (∃𝑐 ∈ (1^st ‘𝐴)𝑎 <_Q 𝑐 ∧ ∃𝑑 ∈ (1^st ‘𝐵)𝑏 <_Q 𝑑))
17	15, 16	sylibr 133	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵))) → ∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)(𝑎 <_Q 𝑐 ∧ 𝑏 <_Q 𝑑))
18		genprndl.ord	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ∈ Q ∧ 𝑦 ∈ Q ∧ 𝑧 ∈ Q) → (𝑥 <_Q 𝑦 ↔ (𝑧𝐺𝑥) <_Q (𝑧𝐺𝑦)))
19		genprndl.com	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ∈ Q ∧ 𝑦 ∈ Q) → (𝑥𝐺𝑦) = (𝑦𝐺𝑥))
20	18, 19	genplt2i 7451	. . . . . . . . . . . . . 14 ⊢ ((𝑎 <_Q 𝑐 ∧ 𝑏 <_Q 𝑑) → (𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑))
21	20	reximi 2563	. . . . . . . . . . . . 13 ⊢ (∃𝑑 ∈ (1^st ‘𝐵)(𝑎 <_Q 𝑐 ∧ 𝑏 <_Q 𝑑) → ∃𝑑 ∈ (1^st ‘𝐵)(𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑))
22	21	reximi 2563	. . . . . . . . . . . 12 ⊢ (∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)(𝑎 <_Q 𝑐 ∧ 𝑏 <_Q 𝑑) → ∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)(𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑))
23	17, 22	syl 14	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵))) → ∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)(𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑))
24	23	adantrr 471	. . . . . . . . . 10 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ ((𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵)) ∧ 𝑞 = (𝑎𝐺𝑏))) → ∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)(𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑))
25		breq1 3985	. . . . . . . . . . . . . 14 ⊢ (𝑞 = (𝑎𝐺𝑏) → (𝑞 <_Q (𝑐𝐺𝑑) ↔ (𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑)))
26	25	biimprd 157	. . . . . . . . . . . . 13 ⊢ (𝑞 = (𝑎𝐺𝑏) → ((𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑) → 𝑞 <_Q (𝑐𝐺𝑑)))
27	26	reximdv 2567	. . . . . . . . . . . 12 ⊢ (𝑞 = (𝑎𝐺𝑏) → (∃𝑑 ∈ (1^st ‘𝐵)(𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑) → ∃𝑑 ∈ (1^st ‘𝐵)𝑞 <_Q (𝑐𝐺𝑑)))
28	27	reximdv 2567	. . . . . . . . . . 11 ⊢ (𝑞 = (𝑎𝐺𝑏) → (∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)(𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑) → ∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)𝑞 <_Q (𝑐𝐺𝑑)))
29	28	ad2antll 483	. . . . . . . . . 10 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ ((𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵)) ∧ 𝑞 = (𝑎𝐺𝑏))) → (∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)(𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑) → ∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)𝑞 <_Q (𝑐𝐺𝑑)))
30	24, 29	mpd 13	. . . . . . . . 9 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ ((𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵)) ∧ 𝑞 = (𝑎𝐺𝑏))) → ∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)𝑞 <_Q (𝑐𝐺𝑑))
31	30	ex 114	. . . . . . . 8 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (((𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵)) ∧ 𝑞 = (𝑎𝐺𝑏)) → ∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)𝑞 <_Q (𝑐𝐺𝑑)))
32	31	exlimdvv 1885	. . . . . . 7 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (∃𝑎∃𝑏((𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵)) ∧ 𝑞 = (𝑎𝐺𝑏)) → ∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)𝑞 <_Q (𝑐𝐺𝑑)))
33	32	adantr 274	. . . . . 6 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑞 ∈ Q ∧ 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)))) → (∃𝑎∃𝑏((𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵)) ∧ 𝑞 = (𝑎𝐺𝑏)) → ∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)𝑞 <_Q (𝑐𝐺𝑑)))
34	7, 33	mpd 13	. . . . 5 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑞 ∈ Q ∧ 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)))) → ∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)𝑞 <_Q (𝑐𝐺𝑑))
35	1, 2	genpprecll 7455	. . . . . . . . 9 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → ((𝑐 ∈ (1^st ‘𝐴) ∧ 𝑑 ∈ (1^st ‘𝐵)) → (𝑐𝐺𝑑) ∈ (1^st ‘(𝐴𝐹𝐵))))
36	35	imp 123	. . . . . . . 8 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑐 ∈ (1^st ‘𝐴) ∧ 𝑑 ∈ (1^st ‘𝐵))) → (𝑐𝐺𝑑) ∈ (1^st ‘(𝐴𝐹𝐵)))
37		elprnql 7422	. . . . . . . . . . . . 13 ⊢ ((⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩ ∈ P ∧ 𝑐 ∈ (1^st ‘𝐴)) → 𝑐 ∈ Q)
38	8, 37	sylan 281	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ P ∧ 𝑐 ∈ (1^st ‘𝐴)) → 𝑐 ∈ Q)
39		elprnql 7422	. . . . . . . . . . . . 13 ⊢ ((⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩ ∈ P ∧ 𝑑 ∈ (1^st ‘𝐵)) → 𝑑 ∈ Q)
40	11, 39	sylan 281	. . . . . . . . . . . 12 ⊢ ((𝐵 ∈ P ∧ 𝑑 ∈ (1^st ‘𝐵)) → 𝑑 ∈ Q)
41	38, 40	anim12i 336	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ P ∧ 𝑐 ∈ (1^st ‘𝐴)) ∧ (𝐵 ∈ P ∧ 𝑑 ∈ (1^st ‘𝐵))) → (𝑐 ∈ Q ∧ 𝑑 ∈ Q))
42	41	an4s 578	. . . . . . . . . 10 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑐 ∈ (1^st ‘𝐴) ∧ 𝑑 ∈ (1^st ‘𝐵))) → (𝑐 ∈ Q ∧ 𝑑 ∈ Q))
43	2	caovcl 5996	. . . . . . . . . 10 ⊢ ((𝑐 ∈ Q ∧ 𝑑 ∈ Q) → (𝑐𝐺𝑑) ∈ Q)
44	42, 43	syl 14	. . . . . . . . 9 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑐 ∈ (1^st ‘𝐴) ∧ 𝑑 ∈ (1^st ‘𝐵))) → (𝑐𝐺𝑑) ∈ Q)
45		breq2 3986	. . . . . . . . . . 11 ⊢ (𝑟 = (𝑐𝐺𝑑) → (𝑞 <_Q 𝑟 ↔ 𝑞 <_Q (𝑐𝐺𝑑)))
46		eleq1 2229	. . . . . . . . . . 11 ⊢ (𝑟 = (𝑐𝐺𝑑) → (𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ (𝑐𝐺𝑑) ∈ (1^st ‘(𝐴𝐹𝐵))))
47	45, 46	anbi12d 465	. . . . . . . . . 10 ⊢ (𝑟 = (𝑐𝐺𝑑) → ((𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵))) ↔ (𝑞 <_Q (𝑐𝐺𝑑) ∧ (𝑐𝐺𝑑) ∈ (1^st ‘(𝐴𝐹𝐵)))))
48	47	adantl 275	. . . . . . . . 9 ⊢ ((((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑐 ∈ (1^st ‘𝐴) ∧ 𝑑 ∈ (1^st ‘𝐵))) ∧ 𝑟 = (𝑐𝐺𝑑)) → ((𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵))) ↔ (𝑞 <_Q (𝑐𝐺𝑑) ∧ (𝑐𝐺𝑑) ∈ (1^st ‘(𝐴𝐹𝐵)))))
49	44, 48	rspcedv 2834	. . . . . . . 8 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑐 ∈ (1^st ‘𝐴) ∧ 𝑑 ∈ (1^st ‘𝐵))) → ((𝑞 <_Q (𝑐𝐺𝑑) ∧ (𝑐𝐺𝑑) ∈ (1^st ‘(𝐴𝐹𝐵))) → ∃𝑟 ∈ Q (𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)))))
50	36, 49	mpan2d 425	. . . . . . 7 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑐 ∈ (1^st ‘𝐴) ∧ 𝑑 ∈ (1^st ‘𝐵))) → (𝑞 <_Q (𝑐𝐺𝑑) → ∃𝑟 ∈ Q (𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)))))
51	50	rexlimdvva 2591	. . . . . 6 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)𝑞 <_Q (𝑐𝐺𝑑) → ∃𝑟 ∈ Q (𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)))))
52	51	adantr 274	. . . . 5 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑞 ∈ Q ∧ 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)))) → (∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)𝑞 <_Q (𝑐𝐺𝑑) → ∃𝑟 ∈ Q (𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)))))
53	34, 52	mpd 13	. . . 4 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑞 ∈ Q ∧ 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)))) → ∃𝑟 ∈ Q (𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵))))
54	53	expr 373	. . 3 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ 𝑞 ∈ Q) → (𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)) → ∃𝑟 ∈ Q (𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)))))
55		genprndl.lower	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ P ∧ 𝑔 ∈ (1^st ‘𝐴)) ∧ (𝐵 ∈ P ∧ ℎ ∈ (1^st ‘𝐵))) ∧ 𝑥 ∈ Q) → (𝑥 <_Q (𝑔𝐺ℎ) → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))))
56	1, 2, 55	genpcdl 7460	. . . . . . . . . 10 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)) → (𝑥 <_Q 𝑟 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵)))))
57	56	alrimdv 1864	. . . . . . . . 9 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)) → ∀𝑥(𝑥 <_Q 𝑟 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵)))))
58		breq1 3985	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑞 → (𝑥 <_Q 𝑟 ↔ 𝑞 <_Q 𝑟))
59		eleq1 2229	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑞 → (𝑥 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵))))
60	58, 59	imbi12d 233	. . . . . . . . . 10 ⊢ (𝑥 = 𝑞 → ((𝑥 <_Q 𝑟 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))) ↔ (𝑞 <_Q 𝑟 → 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)))))
61	60	cbvalv 1905	. . . . . . . . 9 ⊢ (∀𝑥(𝑥 <_Q 𝑟 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))) ↔ ∀𝑞(𝑞 <_Q 𝑟 → 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵))))
62	57, 61	syl6ib 160	. . . . . . . 8 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)) → ∀𝑞(𝑞 <_Q 𝑟 → 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)))))
63		sp 1499	. . . . . . . 8 ⊢ (∀𝑞(𝑞 <_Q 𝑟 → 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵))) → (𝑞 <_Q 𝑟 → 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵))))
64	62, 63	syl6 33	. . . . . . 7 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)) → (𝑞 <_Q 𝑟 → 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)))))
65	64	impd 252	. . . . . 6 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → ((𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)) ∧ 𝑞 <_Q 𝑟) → 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵))))
66	65	ancomsd 267	. . . . 5 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → ((𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵))) → 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵))))
67	66	ad2antrr 480	. . . 4 ⊢ ((((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ 𝑞 ∈ Q) ∧ 𝑟 ∈ Q) → ((𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵))) → 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵))))
68	67	rexlimdva 2583	. . 3 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ 𝑞 ∈ Q) → (∃𝑟 ∈ Q (𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵))) → 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵))))
69	54, 68	impbid 128	. 2 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ 𝑞 ∈ Q) → (𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ ∃𝑟 ∈ Q (𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)))))
70	69	ralrimiva 2539	1 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → ∀𝑞 ∈ Q (𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ ∃𝑟 ∈ Q (𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)))))

Colors of variables: wff set class

Syntax hints: → wi 4 ∧ wa 103 ↔ wb 104 ∧ w3a 968 ∀wal 1341 = wceq 1343 ∃wex 1480 ∈ wcel 2136 ∀wral 2444 ∃wrex 2445 {crab 2448 ⟨cop 3579 class class class wbr 3982 ‘cfv 5188 (class class class)co 5842 ∈ cmpo 5844 1^st c1st 6106 2^nd c2nd 6107 Qcnq 7221 <_Q cltq 7226 Pcnp 7232

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-ia1 105 ax-ia2 106 ax-ia3 107 ax-in1 604 ax-in2 605 ax-io 699 ax-5 1435 ax-7 1436 ax-gen 1437 ax-ie1 1481 ax-ie2 1482 ax-8 1492 ax-10 1493 ax-11 1494 ax-i12 1495 ax-bndl 1497 ax-4 1498 ax-17 1514 ax-i9 1518 ax-ial 1522 ax-i5r 1523 ax-13 2138 ax-14 2139 ax-ext 2147 ax-coll 4097 ax-sep 4100 ax-nul 4108 ax-pow 4153 ax-pr 4187 ax-un 4411 ax-setind 4514 ax-iinf 4565

This theorem depends on definitions: df-bi 116 df-dc 825 df-3or 969 df-3an 970 df-tru 1346 df-fal 1349 df-nf 1449 df-sb 1751 df-eu 2017 df-mo 2018 df-clab 2152 df-cleq 2158 df-clel 2161 df-nfc 2297 df-ne 2337 df-ral 2449 df-rex 2450 df-reu 2451 df-rab 2453 df-v 2728 df-sbc 2952 df-csb 3046 df-dif 3118 df-un 3120 df-in 3122 df-ss 3129 df-nul 3410 df-pw 3561 df-sn 3582 df-pr 3583 df-op 3585 df-uni 3790 df-int 3825 df-iun 3868 df-br 3983 df-opab 4044 df-mpt 4045 df-tr 4081 df-eprel 4267 df-id 4271 df-po 4274 df-iso 4275 df-iord 4344 df-on 4346 df-suc 4349 df-iom 4568 df-xp 4610 df-rel 4611 df-cnv 4612 df-co 4613 df-dm 4614 df-rn 4615 df-res 4616 df-ima 4617 df-iota 5153 df-fun 5190 df-fn 5191 df-f 5192 df-f1 5193 df-fo 5194 df-f1o 5195 df-fv 5196 df-ov 5845 df-oprab 5846 df-mpo 5847 df-1st 6108 df-2nd 6109 df-recs 6273 df-irdg 6338 df-oadd 6388 df-omul 6389 df-er 6501 df-ec 6503 df-qs 6507 df-ni 7245 df-mi 7247 df-lti 7248 df-enq 7288 df-nqqs 7289 df-ltnqqs 7294 df-inp 7407

This theorem is referenced by: addclpr 7478 mulclpr 7513

W3C validator