MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  distrlem4pr Structured version   Visualization version   GIF version

Theorem distrlem4pr 9845
Description: Lemma for distributive law for positive reals. (Contributed by NM, 2-May-1996.) (Revised by Mario Carneiro, 14-Jun-2013.) (New usage is discouraged.)
Assertion
Ref Expression
distrlem4pr (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
Distinct variable groups:   𝑥,𝑦,𝑧,𝑓,𝐴   𝑥,𝐵,𝑦,𝑧,𝑓   𝑥,𝐶,𝑦,𝑧,𝑓

Proof of Theorem distrlem4pr
Dummy variables 𝑤 𝑣 𝑢 𝑔 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpl2 1064 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝐵P)
2 simprlr 803 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑦𝐵)
3 elprnq 9810 . . . . 5 ((𝐵P𝑦𝐵) → 𝑦Q)
41, 2, 3syl2anc 693 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑦Q)
5 simp1 1060 . . . . 5 ((𝐴P𝐵P𝐶P) → 𝐴P)
6 simprl 794 . . . . 5 (((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶)) → 𝑓𝐴)
7 elprnq 9810 . . . . 5 ((𝐴P𝑓𝐴) → 𝑓Q)
85, 6, 7syl2an 494 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑓Q)
9 simpl3 1065 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝐶P)
10 simprrr 805 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑧𝐶)
11 elprnq 9810 . . . . 5 ((𝐶P𝑧𝐶) → 𝑧Q)
129, 10, 11syl2anc 693 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑧Q)
13 vex 3201 . . . . . 6 𝑥 ∈ V
14 vex 3201 . . . . . 6 𝑓 ∈ V
15 ltmnq 9791 . . . . . 6 (𝑢Q → (𝑤 <Q 𝑣 ↔ (𝑢 ·Q 𝑤) <Q (𝑢 ·Q 𝑣)))
16 vex 3201 . . . . . 6 𝑦 ∈ V
17 mulcomnq 9772 . . . . . 6 (𝑤 ·Q 𝑣) = (𝑣 ·Q 𝑤)
1813, 14, 15, 16, 17caovord2 6843 . . . . 5 (𝑦Q → (𝑥 <Q 𝑓 ↔ (𝑥 ·Q 𝑦) <Q (𝑓 ·Q 𝑦)))
19 mulclnq 9766 . . . . . 6 ((𝑓Q𝑧Q) → (𝑓 ·Q 𝑧) ∈ Q)
20 ovex 6675 . . . . . . 7 (𝑥 ·Q 𝑦) ∈ V
21 ovex 6675 . . . . . . 7 (𝑓 ·Q 𝑦) ∈ V
22 ltanq 9790 . . . . . . 7 (𝑢Q → (𝑤 <Q 𝑣 ↔ (𝑢 +Q 𝑤) <Q (𝑢 +Q 𝑣)))
23 ovex 6675 . . . . . . 7 (𝑓 ·Q 𝑧) ∈ V
24 addcomnq 9770 . . . . . . 7 (𝑤 +Q 𝑣) = (𝑣 +Q 𝑤)
2520, 21, 22, 23, 24caovord2 6843 . . . . . 6 ((𝑓 ·Q 𝑧) ∈ Q → ((𝑥 ·Q 𝑦) <Q (𝑓 ·Q 𝑦) ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧))))
2619, 25syl 17 . . . . 5 ((𝑓Q𝑧Q) → ((𝑥 ·Q 𝑦) <Q (𝑓 ·Q 𝑦) ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧))))
2718, 26sylan9bb 736 . . . 4 ((𝑦Q ∧ (𝑓Q𝑧Q)) → (𝑥 <Q 𝑓 ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧))))
284, 8, 12, 27syl12anc 1323 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑥 <Q 𝑓 ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧))))
29 simpl1 1063 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝐴P)
30 addclpr 9837 . . . . . . 7 ((𝐵P𝐶P) → (𝐵 +P 𝐶) ∈ P)
31303adant1 1078 . . . . . 6 ((𝐴P𝐵P𝐶P) → (𝐵 +P 𝐶) ∈ P)
3231adantr 481 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝐵 +P 𝐶) ∈ P)
33 mulclpr 9839 . . . . 5 ((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) → (𝐴 ·P (𝐵 +P 𝐶)) ∈ P)
3429, 32, 33syl2anc 693 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝐴 ·P (𝐵 +P 𝐶)) ∈ P)
35 distrnq 9780 . . . . 5 (𝑓 ·Q (𝑦 +Q 𝑧)) = ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧))
36 simprrl 804 . . . . . 6 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑓𝐴)
37 df-plp 9802 . . . . . . . . 9 +P = (𝑢P, 𝑣P ↦ {𝑤 ∣ ∃𝑔𝑢𝑣 𝑤 = (𝑔 +Q )})
38 addclnq 9764 . . . . . . . . 9 ((𝑔QQ) → (𝑔 +Q ) ∈ Q)
3937, 38genpprecl 9820 . . . . . . . 8 ((𝐵P𝐶P) → ((𝑦𝐵𝑧𝐶) → (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶)))
4039imp 445 . . . . . . 7 (((𝐵P𝐶P) ∧ (𝑦𝐵𝑧𝐶)) → (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶))
411, 9, 2, 10, 40syl22anc 1326 . . . . . 6 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶))
42 df-mp 9803 . . . . . . . 8 ·P = (𝑢P, 𝑣P ↦ {𝑤 ∣ ∃𝑔𝑢𝑣 𝑤 = (𝑔 ·Q )})
43 mulclnq 9766 . . . . . . . 8 ((𝑔QQ) → (𝑔 ·Q ) ∈ Q)
4442, 43genpprecl 9820 . . . . . . 7 ((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) → ((𝑓𝐴 ∧ (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶)) → (𝑓 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
4544imp 445 . . . . . 6 (((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) ∧ (𝑓𝐴 ∧ (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶))) → (𝑓 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
4629, 32, 36, 41, 45syl22anc 1326 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑓 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
4735, 46syl5eqelr 2705 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
48 prcdnq 9812 . . . 4 (((𝐴 ·P (𝐵 +P 𝐶)) ∈ P ∧ ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))) → (((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
4934, 47, 48syl2anc 693 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
5028, 49sylbid 230 . 2 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑥 <Q 𝑓 → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
51 simpll 790 . . . . 5 (((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶)) → 𝑥𝐴)
52 elprnq 9810 . . . . 5 ((𝐴P𝑥𝐴) → 𝑥Q)
535, 51, 52syl2an 494 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑥Q)
54 vex 3201 . . . . . 6 𝑧 ∈ V
5514, 13, 15, 54, 17caovord2 6843 . . . . 5 (𝑧Q → (𝑓 <Q 𝑥 ↔ (𝑓 ·Q 𝑧) <Q (𝑥 ·Q 𝑧)))
56 mulclnq 9766 . . . . . 6 ((𝑥Q𝑦Q) → (𝑥 ·Q 𝑦) ∈ Q)
57 ltanq 9790 . . . . . 6 ((𝑥 ·Q 𝑦) ∈ Q → ((𝑓 ·Q 𝑧) <Q (𝑥 ·Q 𝑧) ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧))))
5856, 57syl 17 . . . . 5 ((𝑥Q𝑦Q) → ((𝑓 ·Q 𝑧) <Q (𝑥 ·Q 𝑧) ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧))))
5955, 58sylan9bbr 737 . . . 4 (((𝑥Q𝑦Q) ∧ 𝑧Q) → (𝑓 <Q 𝑥 ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧))))
6053, 4, 12, 59syl21anc 1324 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑓 <Q 𝑥 ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧))))
61 distrnq 9780 . . . . 5 (𝑥 ·Q (𝑦 +Q 𝑧)) = ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧))
62 simprll 802 . . . . . 6 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑥𝐴)
6342, 43genpprecl 9820 . . . . . . 7 ((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) → ((𝑥𝐴 ∧ (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶)) → (𝑥 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
6463imp 445 . . . . . 6 (((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) ∧ (𝑥𝐴 ∧ (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶))) → (𝑥 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
6529, 32, 62, 41, 64syl22anc 1326 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑥 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
6661, 65syl5eqelr 2705 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
67 prcdnq 9812 . . . 4 (((𝐴 ·P (𝐵 +P 𝐶)) ∈ P ∧ ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))) → (((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
6834, 66, 67syl2anc 693 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
6960, 68sylbid 230 . 2 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑓 <Q 𝑥 → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
70 ltsonq 9788 . . . . 5 <Q Or Q
71 sotrieq 5060 . . . . 5 (( <Q Or Q ∧ (𝑥Q𝑓Q)) → (𝑥 = 𝑓 ↔ ¬ (𝑥 <Q 𝑓𝑓 <Q 𝑥)))
7270, 71mpan 706 . . . 4 ((𝑥Q𝑓Q) → (𝑥 = 𝑓 ↔ ¬ (𝑥 <Q 𝑓𝑓 <Q 𝑥)))
7353, 8, 72syl2anc 693 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑥 = 𝑓 ↔ ¬ (𝑥 <Q 𝑓𝑓 <Q 𝑥)))
74 oveq1 6654 . . . . . . 7 (𝑥 = 𝑓 → (𝑥 ·Q 𝑧) = (𝑓 ·Q 𝑧))
7574oveq2d 6663 . . . . . 6 (𝑥 = 𝑓 → ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) = ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)))
7661, 75syl5eq 2667 . . . . 5 (𝑥 = 𝑓 → (𝑥 ·Q (𝑦 +Q 𝑧)) = ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)))
7776eleq1d 2685 . . . 4 (𝑥 = 𝑓 → ((𝑥 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)) ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
7865, 77syl5ibcom 235 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑥 = 𝑓 → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
7973, 78sylbird 250 . 2 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (¬ (𝑥 <Q 𝑓𝑓 <Q 𝑥) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
8050, 69, 79ecase3d 984 1 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wo 383  wa 384  w3a 1037  wcel 1989   class class class wbr 4651   Or wor 5032  (class class class)co 6647  Qcnq 9671   +Q cplq 9674   ·Q cmq 9675   <Q cltq 9677  Pcnp 9678   +P cpp 9680   ·P cmp 9681
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1721  ax-4 1736  ax-5 1838  ax-6 1887  ax-7 1934  ax-8 1991  ax-9 1998  ax-10 2018  ax-11 2033  ax-12 2046  ax-13 2245  ax-ext 2601  ax-sep 4779  ax-nul 4787  ax-pow 4841  ax-pr 4904  ax-un 6946  ax-inf2 8535
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1485  df-ex 1704  df-nf 1709  df-sb 1880  df-eu 2473  df-mo 2474  df-clab 2608  df-cleq 2614  df-clel 2617  df-nfc 2752  df-ne 2794  df-ral 2916  df-rex 2917  df-reu 2918  df-rmo 2919  df-rab 2920  df-v 3200  df-sbc 3434  df-csb 3532  df-dif 3575  df-un 3577  df-in 3579  df-ss 3586  df-pss 3588  df-nul 3914  df-if 4085  df-pw 4158  df-sn 4176  df-pr 4178  df-tp 4180  df-op 4182  df-uni 4435  df-iun 4520  df-br 4652  df-opab 4711  df-mpt 4728  df-tr 4751  df-id 5022  df-eprel 5027  df-po 5033  df-so 5034  df-fr 5071  df-we 5073  df-xp 5118  df-rel 5119  df-cnv 5120  df-co 5121  df-dm 5122  df-rn 5123  df-res 5124  df-ima 5125  df-pred 5678  df-ord 5724  df-on 5725  df-lim 5726  df-suc 5727  df-iota 5849  df-fun 5888  df-fn 5889  df-f 5890  df-f1 5891  df-fo 5892  df-f1o 5893  df-fv 5894  df-ov 6650  df-oprab 6651  df-mpt2 6652  df-om 7063  df-1st 7165  df-2nd 7166  df-wrecs 7404  df-recs 7465  df-rdg 7503  df-1o 7557  df-oadd 7561  df-omul 7562  df-er 7739  df-ni 9691  df-pli 9692  df-mi 9693  df-lti 9694  df-plpq 9727  df-mpq 9728  df-ltpq 9729  df-enq 9730  df-nq 9731  df-erq 9732  df-plq 9733  df-mq 9734  df-1nq 9735  df-rq 9736  df-ltnq 9737  df-np 9800  df-plp 9802  df-mp 9803
This theorem is referenced by:  distrlem5pr  9846
  Copyright terms: Public domain W3C validator