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

Theorem distrlem4pr 10909
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 1193 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝐵P)
2 simprlr 779 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑦𝐵)
3 elprnq 10874 . . . . 5 ((𝐵P𝑦𝐵) → 𝑦Q)
41, 2, 3syl2anc 584 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑦Q)
5 simp1 1136 . . . . 5 ((𝐴P𝐵P𝐶P) → 𝐴P)
6 simprl 770 . . . . 5 (((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶)) → 𝑓𝐴)
7 elprnq 10874 . . . . 5 ((𝐴P𝑓𝐴) → 𝑓Q)
85, 6, 7syl2an 596 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑓Q)
9 simpl3 1194 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝐶P)
10 simprrr 781 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑧𝐶)
11 elprnq 10874 . . . . 5 ((𝐶P𝑧𝐶) → 𝑧Q)
129, 10, 11syl2anc 584 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑧Q)
13 vex 3438 . . . . . 6 𝑥 ∈ V
14 vex 3438 . . . . . 6 𝑓 ∈ V
15 ltmnq 10855 . . . . . 6 (𝑢Q → (𝑤 <Q 𝑣 ↔ (𝑢 ·Q 𝑤) <Q (𝑢 ·Q 𝑣)))
16 vex 3438 . . . . . 6 𝑦 ∈ V
17 mulcomnq 10836 . . . . . 6 (𝑤 ·Q 𝑣) = (𝑣 ·Q 𝑤)
1813, 14, 15, 16, 17caovord2 7553 . . . . 5 (𝑦Q → (𝑥 <Q 𝑓 ↔ (𝑥 ·Q 𝑦) <Q (𝑓 ·Q 𝑦)))
19 mulclnq 10830 . . . . . 6 ((𝑓Q𝑧Q) → (𝑓 ·Q 𝑧) ∈ Q)
20 ovex 7374 . . . . . . 7 (𝑥 ·Q 𝑦) ∈ V
21 ovex 7374 . . . . . . 7 (𝑓 ·Q 𝑦) ∈ V
22 ltanq 10854 . . . . . . 7 (𝑢Q → (𝑤 <Q 𝑣 ↔ (𝑢 +Q 𝑤) <Q (𝑢 +Q 𝑣)))
23 ovex 7374 . . . . . . 7 (𝑓 ·Q 𝑧) ∈ V
24 addcomnq 10834 . . . . . . 7 (𝑤 +Q 𝑣) = (𝑣 +Q 𝑤)
2520, 21, 22, 23, 24caovord2 7553 . . . . . 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 509 . . . 4 ((𝑦Q ∧ (𝑓Q𝑧Q)) → (𝑥 <Q 𝑓 ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧))))
284, 8, 12, 27syl12anc 836 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑥 <Q 𝑓 ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧))))
29 simpl1 1192 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝐴P)
30 addclpr 10901 . . . . . . 7 ((𝐵P𝐶P) → (𝐵 +P 𝐶) ∈ P)
31303adant1 1130 . . . . . 6 ((𝐴P𝐵P𝐶P) → (𝐵 +P 𝐶) ∈ P)
3231adantr 480 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝐵 +P 𝐶) ∈ P)
33 mulclpr 10903 . . . . 5 ((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) → (𝐴 ·P (𝐵 +P 𝐶)) ∈ P)
3429, 32, 33syl2anc 584 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝐴 ·P (𝐵 +P 𝐶)) ∈ P)
35 distrnq 10844 . . . . 5 (𝑓 ·Q (𝑦 +Q 𝑧)) = ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧))
36 simprrl 780 . . . . . 6 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑓𝐴)
37 df-plp 10866 . . . . . . . . 9 +P = (𝑢P, 𝑣P ↦ {𝑤 ∣ ∃𝑔𝑢𝑣 𝑤 = (𝑔 +Q )})
38 addclnq 10828 . . . . . . . . 9 ((𝑔QQ) → (𝑔 +Q ) ∈ Q)
3937, 38genpprecl 10884 . . . . . . . 8 ((𝐵P𝐶P) → ((𝑦𝐵𝑧𝐶) → (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶)))
4039imp 406 . . . . . . 7 (((𝐵P𝐶P) ∧ (𝑦𝐵𝑧𝐶)) → (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶))
411, 9, 2, 10, 40syl22anc 838 . . . . . 6 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶))
42 df-mp 10867 . . . . . . . 8 ·P = (𝑢P, 𝑣P ↦ {𝑤 ∣ ∃𝑔𝑢𝑣 𝑤 = (𝑔 ·Q )})
43 mulclnq 10830 . . . . . . . 8 ((𝑔QQ) → (𝑔 ·Q ) ∈ Q)
4442, 43genpprecl 10884 . . . . . . 7 ((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) → ((𝑓𝐴 ∧ (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶)) → (𝑓 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
4544imp 406 . . . . . 6 (((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) ∧ (𝑓𝐴 ∧ (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶))) → (𝑓 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
4629, 32, 36, 41, 45syl22anc 838 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑓 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
4735, 46eqeltrrid 2834 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
48 prcdnq 10876 . . . 4 (((𝐴 ·P (𝐵 +P 𝐶)) ∈ P ∧ ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))) → (((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
4934, 47, 48syl2anc 584 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
5028, 49sylbid 240 . 2 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑥 <Q 𝑓 → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
51 simpll 766 . . . . 5 (((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶)) → 𝑥𝐴)
52 elprnq 10874 . . . . 5 ((𝐴P𝑥𝐴) → 𝑥Q)
535, 51, 52syl2an 596 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑥Q)
54 vex 3438 . . . . . 6 𝑧 ∈ V
5514, 13, 15, 54, 17caovord2 7553 . . . . 5 (𝑧Q → (𝑓 <Q 𝑥 ↔ (𝑓 ·Q 𝑧) <Q (𝑥 ·Q 𝑧)))
56 mulclnq 10830 . . . . . 6 ((𝑥Q𝑦Q) → (𝑥 ·Q 𝑦) ∈ Q)
57 ltanq 10854 . . . . . 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 510 . . . 4 (((𝑥Q𝑦Q) ∧ 𝑧Q) → (𝑓 <Q 𝑥 ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧))))
6053, 4, 12, 59syl21anc 837 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑓 <Q 𝑥 ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧))))
61 distrnq 10844 . . . . 5 (𝑥 ·Q (𝑦 +Q 𝑧)) = ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧))
62 simprll 778 . . . . . 6 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑥𝐴)
6342, 43genpprecl 10884 . . . . . . 7 ((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) → ((𝑥𝐴 ∧ (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶)) → (𝑥 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
6463imp 406 . . . . . 6 (((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) ∧ (𝑥𝐴 ∧ (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶))) → (𝑥 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
6529, 32, 62, 41, 64syl22anc 838 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑥 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
6661, 65eqeltrrid 2834 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
67 prcdnq 10876 . . . 4 (((𝐴 ·P (𝐵 +P 𝐶)) ∈ P ∧ ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))) → (((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
6834, 66, 67syl2anc 584 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
6960, 68sylbid 240 . 2 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑓 <Q 𝑥 → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
70 ltsonq 10852 . . . . 5 <Q Or Q
71 sotrieq 5553 . . . . 5 (( <Q Or Q ∧ (𝑥Q𝑓Q)) → (𝑥 = 𝑓 ↔ ¬ (𝑥 <Q 𝑓𝑓 <Q 𝑥)))
7270, 71mpan 690 . . . 4 ((𝑥Q𝑓Q) → (𝑥 = 𝑓 ↔ ¬ (𝑥 <Q 𝑓𝑓 <Q 𝑥)))
7353, 8, 72syl2anc 584 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑥 = 𝑓 ↔ ¬ (𝑥 <Q 𝑓𝑓 <Q 𝑥)))
74 oveq1 7348 . . . . . . 7 (𝑥 = 𝑓 → (𝑥 ·Q 𝑧) = (𝑓 ·Q 𝑧))
7574oveq2d 7357 . . . . . 6 (𝑥 = 𝑓 → ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) = ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)))
7661, 75eqtrid 2777 . . . . 5 (𝑥 = 𝑓 → (𝑥 ·Q (𝑦 +Q 𝑧)) = ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)))
7776eleq1d 2814 . . . 4 (𝑥 = 𝑓 → ((𝑥 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)) ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
7865, 77syl5ibcom 245 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑥 = 𝑓 → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
7973, 78sylbird 260 . 2 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (¬ (𝑥 <Q 𝑓𝑓 <Q 𝑥) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
8050, 69, 79ecase3d 1034 1 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  wo 847  w3a 1086  wcel 2110   class class class wbr 5089   Or wor 5521  (class class class)co 7341  Qcnq 10735   +Q cplq 10738   ·Q cmq 10739   <Q cltq 10741  Pcnp 10742   +P cpp 10744   ·P cmp 10745
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2112  ax-9 2120  ax-10 2143  ax-11 2159  ax-12 2179  ax-ext 2702  ax-sep 5232  ax-nul 5242  ax-pow 5301  ax-pr 5368  ax-un 7663  ax-inf2 9526
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-ral 3046  df-rex 3055  df-rmo 3344  df-reu 3345  df-rab 3394  df-v 3436  df-sbc 3740  df-csb 3849  df-dif 3903  df-un 3905  df-in 3907  df-ss 3917  df-pss 3920  df-nul 4282  df-if 4474  df-pw 4550  df-sn 4575  df-pr 4577  df-op 4581  df-uni 4858  df-iun 4941  df-br 5090  df-opab 5152  df-mpt 5171  df-tr 5197  df-id 5509  df-eprel 5514  df-po 5522  df-so 5523  df-fr 5567  df-we 5569  df-xp 5620  df-rel 5621  df-cnv 5622  df-co 5623  df-dm 5624  df-rn 5625  df-res 5626  df-ima 5627  df-pred 6244  df-ord 6305  df-on 6306  df-lim 6307  df-suc 6308  df-iota 6433  df-fun 6479  df-fn 6480  df-f 6481  df-f1 6482  df-fo 6483  df-f1o 6484  df-fv 6485  df-ov 7344  df-oprab 7345  df-mpo 7346  df-om 7792  df-1st 7916  df-2nd 7917  df-frecs 8206  df-wrecs 8237  df-recs 8286  df-rdg 8324  df-1o 8380  df-oadd 8384  df-omul 8385  df-er 8617  df-ni 10755  df-pli 10756  df-mi 10757  df-lti 10758  df-plpq 10791  df-mpq 10792  df-ltpq 10793  df-enq 10794  df-nq 10795  df-erq 10796  df-plq 10797  df-mq 10798  df-1nq 10799  df-rq 10800  df-ltnq 10801  df-np 10864  df-plp 10866  df-mp 10867
This theorem is referenced by:  distrlem5pr  10910
  Copyright terms: Public domain W3C validator