mulnqprlemrl - Intuitionistic Logic Explorer

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

Theorem mulnqprlemrl 7193

Description: Lemma for mulnqpr 7197. The reverse subset relationship for the lower cut. (Contributed by Jim Kingdon, 18-Jul-2021.)

**Assertion**
Ref	Expression
mulnqprlemrl	⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩)) ⊆ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q (𝐴 ·_Q 𝐵)}, {𝑢 ∣ (𝐴 ·_Q 𝐵) <_Q 𝑢}⟩))

Distinct variable groups: 𝐴,𝑙,𝑢 𝐵,𝑙,𝑢

Proof of Theorem mulnqprlemrl Dummy variables 𝑓 𝑔 ℎ 𝑟 𝑠 𝑡 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		nqprlu 7167	. . . . . 6 ⊢ (𝐴 ∈ Q → ⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ∈ P)
2		nqprlu 7167	. . . . . 6 ⊢ (𝐵 ∈ Q → ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩ ∈ P)
3		df-imp 7089	. . . . . . 7 ⊢ ·_P = (𝑥 ∈ P, 𝑦 ∈ P ↦ ⟨{𝑓 ∈ Q ∣ ∃𝑔 ∈ Q ∃ℎ ∈ Q (𝑔 ∈ (1^st ‘𝑥) ∧ ℎ ∈ (1^st ‘𝑦) ∧ 𝑓 = (𝑔 ·_Q ℎ))}, {𝑓 ∈ Q ∣ ∃𝑔 ∈ Q ∃ℎ ∈ Q (𝑔 ∈ (2^nd ‘𝑥) ∧ ℎ ∈ (2^nd ‘𝑦) ∧ 𝑓 = (𝑔 ·_Q ℎ))}⟩)
4		mulclnq 6996	. . . . . . 7 ⊢ ((𝑔 ∈ Q ∧ ℎ ∈ Q) → (𝑔 ·_Q ℎ) ∈ Q)
5	3, 4	genpelvl 7132	. . . . . 6 ⊢ ((⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ∈ P ∧ ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩ ∈ P) → (𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩)) ↔ ∃𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩)∃𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩)𝑟 = (𝑠 ·_Q 𝑡)))
6	1, 2, 5	syl2an 284	. . . . 5 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩)) ↔ ∃𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩)∃𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩)𝑟 = (𝑠 ·_Q 𝑡)))
7	6	biimpa 291	. . . 4 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) → ∃𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩)∃𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩)𝑟 = (𝑠 ·_Q 𝑡))
8		vex 2623	. . . . . . . . . . . . 13 ⊢ 𝑠 ∈ V
9		breq1 3854	. . . . . . . . . . . . 13 ⊢ (𝑙 = 𝑠 → (𝑙 <_Q 𝐴 ↔ 𝑠 <_Q 𝐴))
10		ltnqex 7169	. . . . . . . . . . . . . 14 ⊢ {𝑙 ∣ 𝑙 <_Q 𝐴} ∈ V
11		gtnqex 7170	. . . . . . . . . . . . . 14 ⊢ {𝑢 ∣ 𝐴 <_Q 𝑢} ∈ V
12	10, 11	op1st 5931	. . . . . . . . . . . . 13 ⊢ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) = {𝑙 ∣ 𝑙 <_Q 𝐴}
13	8, 9, 12	elab2 2764	. . . . . . . . . . . 12 ⊢ (𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) ↔ 𝑠 <_Q 𝐴)
14	13	biimpi 119	. . . . . . . . . . 11 ⊢ (𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) → 𝑠 <_Q 𝐴)
15	14	ad2antrl 475	. . . . . . . . . 10 ⊢ ((((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ (𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) ∧ 𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) → 𝑠 <_Q 𝐴)
16	15	adantr 271	. . . . . . . . 9 ⊢ (((((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ (𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) ∧ 𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ 𝑟 = (𝑠 ·_Q 𝑡)) → 𝑠 <_Q 𝐴)
17		vex 2623	. . . . . . . . . . . . 13 ⊢ 𝑡 ∈ V
18		breq1 3854	. . . . . . . . . . . . 13 ⊢ (𝑙 = 𝑡 → (𝑙 <_Q 𝐵 ↔ 𝑡 <_Q 𝐵))
19		ltnqex 7169	. . . . . . . . . . . . . 14 ⊢ {𝑙 ∣ 𝑙 <_Q 𝐵} ∈ V
20		gtnqex 7170	. . . . . . . . . . . . . 14 ⊢ {𝑢 ∣ 𝐵 <_Q 𝑢} ∈ V
21	19, 20	op1st 5931	. . . . . . . . . . . . 13 ⊢ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩) = {𝑙 ∣ 𝑙 <_Q 𝐵}
22	17, 18, 21	elab2 2764	. . . . . . . . . . . 12 ⊢ (𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩) ↔ 𝑡 <_Q 𝐵)
23	22	biimpi 119	. . . . . . . . . . 11 ⊢ (𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩) → 𝑡 <_Q 𝐵)
24	23	ad2antll 476	. . . . . . . . . 10 ⊢ ((((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ (𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) ∧ 𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) → 𝑡 <_Q 𝐵)
25	24	adantr 271	. . . . . . . . 9 ⊢ (((((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ (𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) ∧ 𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ 𝑟 = (𝑠 ·_Q 𝑡)) → 𝑡 <_Q 𝐵)
26		ltrelnq 6985	. . . . . . . . . . . 12 ⊢ <_Q ⊆ (Q × Q)
27	26	brel 4503	. . . . . . . . . . 11 ⊢ (𝑠 <_Q 𝐴 → (𝑠 ∈ Q ∧ 𝐴 ∈ Q))
28	16, 27	syl 14	. . . . . . . . . 10 ⊢ (((((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ (𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) ∧ 𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ 𝑟 = (𝑠 ·_Q 𝑡)) → (𝑠 ∈ Q ∧ 𝐴 ∈ Q))
29	26	brel 4503	. . . . . . . . . . 11 ⊢ (𝑡 <_Q 𝐵 → (𝑡 ∈ Q ∧ 𝐵 ∈ Q))
30	25, 29	syl 14	. . . . . . . . . 10 ⊢ (((((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ (𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) ∧ 𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ 𝑟 = (𝑠 ·_Q 𝑡)) → (𝑡 ∈ Q ∧ 𝐵 ∈ Q))
31		lt2mulnq 7025	. . . . . . . . . 10 ⊢ (((𝑠 ∈ Q ∧ 𝐴 ∈ Q) ∧ (𝑡 ∈ Q ∧ 𝐵 ∈ Q)) → ((𝑠 <_Q 𝐴 ∧ 𝑡 <_Q 𝐵) → (𝑠 ·_Q 𝑡) <_Q (𝐴 ·_Q 𝐵)))
32	28, 30, 31	syl2anc 404	. . . . . . . . 9 ⊢ (((((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ (𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) ∧ 𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ 𝑟 = (𝑠 ·_Q 𝑡)) → ((𝑠 <_Q 𝐴 ∧ 𝑡 <_Q 𝐵) → (𝑠 ·_Q 𝑡) <_Q (𝐴 ·_Q 𝐵)))
33	16, 25, 32	mp2and 425	. . . . . . . 8 ⊢ (((((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ (𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) ∧ 𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ 𝑟 = (𝑠 ·_Q 𝑡)) → (𝑠 ·_Q 𝑡) <_Q (𝐴 ·_Q 𝐵))
34		breq1 3854	. . . . . . . . 9 ⊢ (𝑟 = (𝑠 ·_Q 𝑡) → (𝑟 <_Q (𝐴 ·_Q 𝐵) ↔ (𝑠 ·_Q 𝑡) <_Q (𝐴 ·_Q 𝐵)))
35	34	adantl 272	. . . . . . . 8 ⊢ (((((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ (𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) ∧ 𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ 𝑟 = (𝑠 ·_Q 𝑡)) → (𝑟 <_Q (𝐴 ·_Q 𝐵) ↔ (𝑠 ·_Q 𝑡) <_Q (𝐴 ·_Q 𝐵)))
36	33, 35	mpbird 166	. . . . . . 7 ⊢ (((((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ (𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) ∧ 𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ 𝑟 = (𝑠 ·_Q 𝑡)) → 𝑟 <_Q (𝐴 ·_Q 𝐵))
37		vex 2623	. . . . . . . 8 ⊢ 𝑟 ∈ V
38		breq1 3854	. . . . . . . 8 ⊢ (𝑙 = 𝑟 → (𝑙 <_Q (𝐴 ·_Q 𝐵) ↔ 𝑟 <_Q (𝐴 ·_Q 𝐵)))
39		ltnqex 7169	. . . . . . . . 9 ⊢ {𝑙 ∣ 𝑙 <_Q (𝐴 ·_Q 𝐵)} ∈ V
40		gtnqex 7170	. . . . . . . . 9 ⊢ {𝑢 ∣ (𝐴 ·_Q 𝐵) <_Q 𝑢} ∈ V
41	39, 40	op1st 5931	. . . . . . . 8 ⊢ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q (𝐴 ·_Q 𝐵)}, {𝑢 ∣ (𝐴 ·_Q 𝐵) <_Q 𝑢}⟩) = {𝑙 ∣ 𝑙 <_Q (𝐴 ·_Q 𝐵)}
42	37, 38, 41	elab2 2764	. . . . . . 7 ⊢ (𝑟 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q (𝐴 ·_Q 𝐵)}, {𝑢 ∣ (𝐴 ·_Q 𝐵) <_Q 𝑢}⟩) ↔ 𝑟 <_Q (𝐴 ·_Q 𝐵))
43	36, 42	sylibr 133	. . . . . 6 ⊢ (((((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ (𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) ∧ 𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ 𝑟 = (𝑠 ·_Q 𝑡)) → 𝑟 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q (𝐴 ·_Q 𝐵)}, {𝑢 ∣ (𝐴 ·_Q 𝐵) <_Q 𝑢}⟩))
44	43	ex 114	. . . . 5 ⊢ ((((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) ∧ (𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩) ∧ 𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) → (𝑟 = (𝑠 ·_Q 𝑡) → 𝑟 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q (𝐴 ·_Q 𝐵)}, {𝑢 ∣ (𝐴 ·_Q 𝐵) <_Q 𝑢}⟩)))
45	44	rexlimdvva 2497	. . . 4 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) → (∃𝑠 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩)∃𝑡 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩)𝑟 = (𝑠 ·_Q 𝑡) → 𝑟 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q (𝐴 ·_Q 𝐵)}, {𝑢 ∣ (𝐴 ·_Q 𝐵) <_Q 𝑢}⟩)))
46	7, 45	mpd 13	. . 3 ⊢ (((𝐴 ∈ Q ∧ 𝐵 ∈ Q) ∧ 𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩))) → 𝑟 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q (𝐴 ·_Q 𝐵)}, {𝑢 ∣ (𝐴 ·_Q 𝐵) <_Q 𝑢}⟩))
47	46	ex 114	. 2 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (𝑟 ∈ (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩)) → 𝑟 ∈ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q (𝐴 ·_Q 𝐵)}, {𝑢 ∣ (𝐴 ·_Q 𝐵) <_Q 𝑢}⟩)))
48	47	ssrdv 3032	1 ⊢ ((𝐴 ∈ Q ∧ 𝐵 ∈ Q) → (1^st ‘(⟨{𝑙 ∣ 𝑙 <_Q 𝐴}, {𝑢 ∣ 𝐴 <_Q 𝑢}⟩ ·_P ⟨{𝑙 ∣ 𝑙 <_Q 𝐵}, {𝑢 ∣ 𝐵 <_Q 𝑢}⟩)) ⊆ (1^st ‘⟨{𝑙 ∣ 𝑙 <_Q (𝐴 ·_Q 𝐵)}, {𝑢 ∣ (𝐴 ·_Q 𝐵) <_Q 𝑢}⟩))

Colors of variables: wff set class

Syntax hints: → wi 4 ∧ wa 103 ↔ wb 104 = wceq 1290 ∈ wcel 1439 {cab 2075 ∃wrex 2361 ⊆ wss 3000 ⟨cop 3453 class class class wbr 3851 ‘cfv 5028 (class class class)co 5666 1^st c1st 5923 Qcnq 6900 ·_Q cmq 6903 <_Q cltq 6905 Pcnp 6911 ·_P cmp 6914

This theorem was proved from axioms: ax-1 5 ax-2 6 ax-mp 7 ax-ia1 105 ax-ia2 106 ax-ia3 107 ax-in1 580 ax-in2 581 ax-io 666 ax-5 1382 ax-7 1383 ax-gen 1384 ax-ie1 1428 ax-ie2 1429 ax-8 1441 ax-10 1442 ax-11 1443 ax-i12 1444 ax-bndl 1445 ax-4 1446 ax-13 1450 ax-14 1451 ax-17 1465 ax-i9 1469 ax-ial 1473 ax-i5r 1474 ax-ext 2071 ax-coll 3960 ax-sep 3963 ax-nul 3971 ax-pow 4015 ax-pr 4045 ax-un 4269 ax-setind 4366 ax-iinf 4416

This theorem depends on definitions: df-bi 116 df-dc 782 df-3or 926 df-3an 927 df-tru 1293 df-fal 1296 df-nf 1396 df-sb 1694 df-eu 1952 df-mo 1953 df-clab 2076 df-cleq 2082 df-clel 2085 df-nfc 2218 df-ne 2257 df-ral 2365 df-rex 2366 df-reu 2367 df-rab 2369 df-v 2622 df-sbc 2842 df-csb 2935 df-dif 3002 df-un 3004 df-in 3006 df-ss 3013 df-nul 3288 df-pw 3435 df-sn 3456 df-pr 3457 df-op 3459 df-uni 3660 df-int 3695 df-iun 3738 df-br 3852 df-opab 3906 df-mpt 3907 df-tr 3943 df-eprel 4125 df-id 4129 df-po 4132 df-iso 4133 df-iord 4202 df-on 4204 df-suc 4207 df-iom 4419 df-xp 4458 df-rel 4459 df-cnv 4460 df-co 4461 df-dm 4462 df-rn 4463 df-res 4464 df-ima 4465 df-iota 4993 df-fun 5030 df-fn 5031 df-f 5032 df-f1 5033 df-fo 5034 df-f1o 5035 df-fv 5036 df-ov 5669 df-oprab 5670 df-mpt2 5671 df-1st 5925 df-2nd 5926 df-recs 6084 df-irdg 6149 df-1o 6195 df-oadd 6199 df-omul 6200 df-er 6306 df-ec 6308 df-qs 6312 df-ni 6924 df-pli 6925 df-mi 6926 df-lti 6927 df-plpq 6964 df-mpq 6965 df-enq 6967 df-nqqs 6968 df-plqqs 6969 df-mqqs 6970 df-1nqqs 6971 df-rq 6972 df-ltnqqs 6973 df-inp 7086 df-imp 7089

This theorem is referenced by: mulnqprlemfu 7196 mulnqpr 7197

W3C validator