genprndl - Intuitionistic Logic Explorer

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

Theorem genprndl 7322

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 7313	. . . . . . . . 9 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ ∃𝑎 ∈ (1^st ‘𝐴)∃𝑏 ∈ (1^st ‘𝐵)𝑞 = (𝑎𝐺𝑏)))
4		r2ex 2453	. . . . . . . . 9 ⊢ (∃𝑎 ∈ (1^st ‘𝐴)∃𝑏 ∈ (1^st ‘𝐵)𝑞 = (𝑎𝐺𝑏) ↔ ∃𝑎∃𝑏((𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵)) ∧ 𝑞 = (𝑎𝐺𝑏)))
5	3, 4	syl6bb 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 469	. . . . . 6 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑞 ∈ Q ∧ 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)))) → ∃𝑎∃𝑏((𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵)) ∧ 𝑞 = (𝑎𝐺𝑏)))
8		prop 7276	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ P → ⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩ ∈ P)
9		prnmaxl 7289	. . . . . . . . . . . . . . . 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 7276	. . . . . . . . . . . . . . . 16 ⊢ (𝐵 ∈ P → ⟨(1^st ‘𝐵), (2^nd ‘𝐵)⟩ ∈ P)
12		prnmaxl 7289	. . . . . . . . . . . . . . . 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 577	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵))) → (∃𝑐 ∈ (1^st ‘𝐴)𝑎 <_Q 𝑐 ∧ ∃𝑑 ∈ (1^st ‘𝐵)𝑏 <_Q 𝑑))
16		reeanv 2598	. . . . . . . . . . . . 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 7311	. . . . . . . . . . . . . 14 ⊢ ((𝑎 <_Q 𝑐 ∧ 𝑏 <_Q 𝑑) → (𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑))
21	20	reximi 2527	. . . . . . . . . . . . 13 ⊢ (∃𝑑 ∈ (1^st ‘𝐵)(𝑎 <_Q 𝑐 ∧ 𝑏 <_Q 𝑑) → ∃𝑑 ∈ (1^st ‘𝐵)(𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑))
22	21	reximi 2527	. . . . . . . . . . . 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 470	. . . . . . . . . 10 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ ((𝑎 ∈ (1^st ‘𝐴) ∧ 𝑏 ∈ (1^st ‘𝐵)) ∧ 𝑞 = (𝑎𝐺𝑏))) → ∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)(𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑))
25		breq1 3927	. . . . . . . . . . . . . 14 ⊢ (𝑞 = (𝑎𝐺𝑏) → (𝑞 <_Q (𝑐𝐺𝑑) ↔ (𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑)))
26	25	biimprd 157	. . . . . . . . . . . . 13 ⊢ (𝑞 = (𝑎𝐺𝑏) → ((𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑) → 𝑞 <_Q (𝑐𝐺𝑑)))
27	26	reximdv 2531	. . . . . . . . . . . 12 ⊢ (𝑞 = (𝑎𝐺𝑏) → (∃𝑑 ∈ (1^st ‘𝐵)(𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑) → ∃𝑑 ∈ (1^st ‘𝐵)𝑞 <_Q (𝑐𝐺𝑑)))
28	27	reximdv 2531	. . . . . . . . . . 11 ⊢ (𝑞 = (𝑎𝐺𝑏) → (∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)(𝑎𝐺𝑏) <_Q (𝑐𝐺𝑑) → ∃𝑐 ∈ (1^st ‘𝐴)∃𝑑 ∈ (1^st ‘𝐵)𝑞 <_Q (𝑐𝐺𝑑)))
29	28	ad2antll 482	. . . . . . . . . 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 1869	. . . . . . 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 7315	. . . . . . . . 9 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → ((𝑐 ∈ (1^st ‘𝐴) ∧ 𝑑 ∈ (1^st ‘𝐵)) → (𝑐𝐺𝑑) ∈ (1^st ‘(𝐴𝐹𝐵))))
36	35	imp 123	. . . . . . . 8 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑐 ∈ (1^st ‘𝐴) ∧ 𝑑 ∈ (1^st ‘𝐵))) → (𝑐𝐺𝑑) ∈ (1^st ‘(𝐴𝐹𝐵)))
37		elprnql 7282	. . . . . . . . . . . . 13 ⊢ ((⟨(1^st ‘𝐴), (2^nd ‘𝐴)⟩ ∈ P ∧ 𝑐 ∈ (1^st ‘𝐴)) → 𝑐 ∈ Q)
38	8, 37	sylan 281	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ P ∧ 𝑐 ∈ (1^st ‘𝐴)) → 𝑐 ∈ Q)
39		elprnql 7282	. . . . . . . . . . . . 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 577	. . . . . . . . . 10 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑐 ∈ (1^st ‘𝐴) ∧ 𝑑 ∈ (1^st ‘𝐵))) → (𝑐 ∈ Q ∧ 𝑑 ∈ Q))
43	2	caovcl 5918	. . . . . . . . . 10 ⊢ ((𝑐 ∈ Q ∧ 𝑑 ∈ Q) → (𝑐𝐺𝑑) ∈ Q)
44	42, 43	syl 14	. . . . . . . . 9 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑐 ∈ (1^st ‘𝐴) ∧ 𝑑 ∈ (1^st ‘𝐵))) → (𝑐𝐺𝑑) ∈ Q)
45		breq2 3928	. . . . . . . . . . 11 ⊢ (𝑟 = (𝑐𝐺𝑑) → (𝑞 <_Q 𝑟 ↔ 𝑞 <_Q (𝑐𝐺𝑑)))
46		eleq1 2200	. . . . . . . . . . 11 ⊢ (𝑟 = (𝑐𝐺𝑑) → (𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ (𝑐𝐺𝑑) ∈ (1^st ‘(𝐴𝐹𝐵))))
47	45, 46	anbi12d 464	. . . . . . . . . 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 2788	. . . . . . . 8 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑐 ∈ (1^st ‘𝐴) ∧ 𝑑 ∈ (1^st ‘𝐵))) → ((𝑞 <_Q (𝑐𝐺𝑑) ∧ (𝑐𝐺𝑑) ∈ (1^st ‘(𝐴𝐹𝐵))) → ∃𝑟 ∈ Q (𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)))))
50	36, 49	mpan2d 424	. . . . . . 7 ⊢ (((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ (𝑐 ∈ (1^st ‘𝐴) ∧ 𝑑 ∈ (1^st ‘𝐵))) → (𝑞 <_Q (𝑐𝐺𝑑) → ∃𝑟 ∈ Q (𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)))))
51	50	rexlimdvva 2555	. . . . . 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 372	. . 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 7320	. . . . . . . . . 10 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)) → (𝑥 <_Q 𝑟 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵)))))
57	56	alrimdv 1848	. . . . . . . . 9 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)) → ∀𝑥(𝑥 <_Q 𝑟 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵)))))
58		breq1 3927	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑞 → (𝑥 <_Q 𝑟 ↔ 𝑞 <_Q 𝑟))
59		eleq1 2200	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑞 → (𝑥 ∈ (1^st ‘(𝐴𝐹𝐵)) ↔ 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵))))
60	58, 59	imbi12d 233	. . . . . . . . . 10 ⊢ (𝑥 = 𝑞 → ((𝑥 <_Q 𝑟 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))) ↔ (𝑞 <_Q 𝑟 → 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)))))
61	60	cbvalv 1889	. . . . . . . . 9 ⊢ (∀𝑥(𝑥 <_Q 𝑟 → 𝑥 ∈ (1^st ‘(𝐴𝐹𝐵))) ↔ ∀𝑞(𝑞 <_Q 𝑟 → 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵))))
62	57, 61	syl6ib 160	. . . . . . . 8 ⊢ ((𝐴 ∈ P ∧ 𝐵 ∈ P) → (𝑟 ∈ (1^st ‘(𝐴𝐹𝐵)) → ∀𝑞(𝑞 <_Q 𝑟 → 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵)))))
63		sp 1488	. . . . . . . 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 479	. . . 4 ⊢ ((((𝐴 ∈ P ∧ 𝐵 ∈ P) ∧ 𝑞 ∈ Q) ∧ 𝑟 ∈ Q) → ((𝑞 <_Q 𝑟 ∧ 𝑟 ∈ (1^st ‘(𝐴𝐹𝐵))) → 𝑞 ∈ (1^st ‘(𝐴𝐹𝐵))))
68	67	rexlimdva 2547	. . 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 2503	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 962 ∀wal 1329 = wceq 1331 ∃wex 1468 ∈ wcel 1480 ∀wral 2414 ∃wrex 2415 {crab 2418 ⟨cop 3525 class class class wbr 3924 ‘cfv 5118 (class class class)co 5767 ∈ cmpo 5769 1^st c1st 6029 2^nd c2nd 6030 Qcnq 7081 <_Q cltq 7086 Pcnp 7092

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 603 ax-in2 604 ax-io 698 ax-5 1423 ax-7 1424 ax-gen 1425 ax-ie1 1469 ax-ie2 1470 ax-8 1482 ax-10 1483 ax-11 1484 ax-i12 1485 ax-bndl 1486 ax-4 1487 ax-13 1491 ax-14 1492 ax-17 1506 ax-i9 1510 ax-ial 1514 ax-i5r 1515 ax-ext 2119 ax-coll 4038 ax-sep 4041 ax-nul 4049 ax-pow 4093 ax-pr 4126 ax-un 4350 ax-setind 4447 ax-iinf 4497

This theorem depends on definitions: df-bi 116 df-dc 820 df-3or 963 df-3an 964 df-tru 1334 df-fal 1337 df-nf 1437 df-sb 1736 df-eu 2000 df-mo 2001 df-clab 2124 df-cleq 2130 df-clel 2133 df-nfc 2268 df-ne 2307 df-ral 2419 df-rex 2420 df-reu 2421 df-rab 2423 df-v 2683 df-sbc 2905 df-csb 2999 df-dif 3068 df-un 3070 df-in 3072 df-ss 3079 df-nul 3359 df-pw 3507 df-sn 3528 df-pr 3529 df-op 3531 df-uni 3732 df-int 3767 df-iun 3810 df-br 3925 df-opab 3985 df-mpt 3986 df-tr 4022 df-eprel 4206 df-id 4210 df-po 4213 df-iso 4214 df-iord 4283 df-on 4285 df-suc 4288 df-iom 4500 df-xp 4540 df-rel 4541 df-cnv 4542 df-co 4543 df-dm 4544 df-rn 4545 df-res 4546 df-ima 4547 df-iota 5083 df-fun 5120 df-fn 5121 df-f 5122 df-f1 5123 df-fo 5124 df-f1o 5125 df-fv 5126 df-ov 5770 df-oprab 5771 df-mpo 5772 df-1st 6031 df-2nd 6032 df-recs 6195 df-irdg 6260 df-oadd 6310 df-omul 6311 df-er 6422 df-ec 6424 df-qs 6428 df-ni 7105 df-mi 7107 df-lti 7108 df-enq 7148 df-nqqs 7149 df-ltnqqs 7154 df-inp 7267

This theorem is referenced by: addclpr 7338 mulclpr 7373

W3C validator