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

Theorem distrlem4pr 10888
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 1192 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝐵P)
2 simprlr 778 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑦𝐵)
3 elprnq 10853 . . . . 5 ((𝐵P𝑦𝐵) → 𝑦Q)
41, 2, 3syl2anc 585 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑦Q)
5 simp1 1136 . . . . 5 ((𝐴P𝐵P𝐶P) → 𝐴P)
6 simprl 769 . . . . 5 (((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶)) → 𝑓𝐴)
7 elprnq 10853 . . . . 5 ((𝐴P𝑓𝐴) → 𝑓Q)
85, 6, 7syl2an 597 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑓Q)
9 simpl3 1193 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝐶P)
10 simprrr 780 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑧𝐶)
11 elprnq 10853 . . . . 5 ((𝐶P𝑧𝐶) → 𝑧Q)
129, 10, 11syl2anc 585 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑧Q)
13 vex 3446 . . . . . 6 𝑥 ∈ V
14 vex 3446 . . . . . 6 𝑓 ∈ V
15 ltmnq 10834 . . . . . 6 (𝑢Q → (𝑤 <Q 𝑣 ↔ (𝑢 ·Q 𝑤) <Q (𝑢 ·Q 𝑣)))
16 vex 3446 . . . . . 6 𝑦 ∈ V
17 mulcomnq 10815 . . . . . 6 (𝑤 ·Q 𝑣) = (𝑣 ·Q 𝑤)
1813, 14, 15, 16, 17caovord2 7551 . . . . 5 (𝑦Q → (𝑥 <Q 𝑓 ↔ (𝑥 ·Q 𝑦) <Q (𝑓 ·Q 𝑦)))
19 mulclnq 10809 . . . . . 6 ((𝑓Q𝑧Q) → (𝑓 ·Q 𝑧) ∈ Q)
20 ovex 7375 . . . . . . 7 (𝑥 ·Q 𝑦) ∈ V
21 ovex 7375 . . . . . . 7 (𝑓 ·Q 𝑦) ∈ V
22 ltanq 10833 . . . . . . 7 (𝑢Q → (𝑤 <Q 𝑣 ↔ (𝑢 +Q 𝑤) <Q (𝑢 +Q 𝑣)))
23 ovex 7375 . . . . . . 7 (𝑓 ·Q 𝑧) ∈ V
24 addcomnq 10813 . . . . . . 7 (𝑤 +Q 𝑣) = (𝑣 +Q 𝑤)
2520, 21, 22, 23, 24caovord2 7551 . . . . . 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 511 . . . 4 ((𝑦Q ∧ (𝑓Q𝑧Q)) → (𝑥 <Q 𝑓 ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧))))
284, 8, 12, 27syl12anc 835 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑥 <Q 𝑓 ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧))))
29 simpl1 1191 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝐴P)
30 addclpr 10880 . . . . . . 7 ((𝐵P𝐶P) → (𝐵 +P 𝐶) ∈ P)
31303adant1 1130 . . . . . 6 ((𝐴P𝐵P𝐶P) → (𝐵 +P 𝐶) ∈ P)
3231adantr 482 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝐵 +P 𝐶) ∈ P)
33 mulclpr 10882 . . . . 5 ((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) → (𝐴 ·P (𝐵 +P 𝐶)) ∈ P)
3429, 32, 33syl2anc 585 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝐴 ·P (𝐵 +P 𝐶)) ∈ P)
35 distrnq 10823 . . . . 5 (𝑓 ·Q (𝑦 +Q 𝑧)) = ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧))
36 simprrl 779 . . . . . 6 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑓𝐴)
37 df-plp 10845 . . . . . . . . 9 +P = (𝑢P, 𝑣P ↦ {𝑤 ∣ ∃𝑔𝑢𝑣 𝑤 = (𝑔 +Q )})
38 addclnq 10807 . . . . . . . . 9 ((𝑔QQ) → (𝑔 +Q ) ∈ Q)
3937, 38genpprecl 10863 . . . . . . . 8 ((𝐵P𝐶P) → ((𝑦𝐵𝑧𝐶) → (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶)))
4039imp 408 . . . . . . 7 (((𝐵P𝐶P) ∧ (𝑦𝐵𝑧𝐶)) → (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶))
411, 9, 2, 10, 40syl22anc 837 . . . . . 6 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶))
42 df-mp 10846 . . . . . . . 8 ·P = (𝑢P, 𝑣P ↦ {𝑤 ∣ ∃𝑔𝑢𝑣 𝑤 = (𝑔 ·Q )})
43 mulclnq 10809 . . . . . . . 8 ((𝑔QQ) → (𝑔 ·Q ) ∈ Q)
4442, 43genpprecl 10863 . . . . . . 7 ((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) → ((𝑓𝐴 ∧ (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶)) → (𝑓 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
4544imp 408 . . . . . 6 (((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) ∧ (𝑓𝐴 ∧ (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶))) → (𝑓 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
4629, 32, 36, 41, 45syl22anc 837 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑓 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
4735, 46eqeltrrid 2843 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
48 prcdnq 10855 . . . 4 (((𝐴 ·P (𝐵 +P 𝐶)) ∈ P ∧ ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))) → (((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
4934, 47, 48syl2anc 585 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑓 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
5028, 49sylbid 239 . 2 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑥 <Q 𝑓 → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
51 simpll 765 . . . . 5 (((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶)) → 𝑥𝐴)
52 elprnq 10853 . . . . 5 ((𝐴P𝑥𝐴) → 𝑥Q)
535, 51, 52syl2an 597 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑥Q)
54 vex 3446 . . . . . 6 𝑧 ∈ V
5514, 13, 15, 54, 17caovord2 7551 . . . . 5 (𝑧Q → (𝑓 <Q 𝑥 ↔ (𝑓 ·Q 𝑧) <Q (𝑥 ·Q 𝑧)))
56 mulclnq 10809 . . . . . 6 ((𝑥Q𝑦Q) → (𝑥 ·Q 𝑦) ∈ Q)
57 ltanq 10833 . . . . . 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 512 . . . 4 (((𝑥Q𝑦Q) ∧ 𝑧Q) → (𝑓 <Q 𝑥 ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧))))
6053, 4, 12, 59syl21anc 836 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑓 <Q 𝑥 ↔ ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧))))
61 distrnq 10823 . . . . 5 (𝑥 ·Q (𝑦 +Q 𝑧)) = ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧))
62 simprll 777 . . . . . 6 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → 𝑥𝐴)
6342, 43genpprecl 10863 . . . . . . 7 ((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) → ((𝑥𝐴 ∧ (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶)) → (𝑥 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
6463imp 408 . . . . . 6 (((𝐴P ∧ (𝐵 +P 𝐶) ∈ P) ∧ (𝑥𝐴 ∧ (𝑦 +Q 𝑧) ∈ (𝐵 +P 𝐶))) → (𝑥 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
6529, 32, 62, 41, 64syl22anc 837 . . . . 5 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑥 ·Q (𝑦 +Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
6661, 65eqeltrrid 2843 . . . 4 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
67 prcdnq 10855 . . . 4 (((𝐴 ·P (𝐵 +P 𝐶)) ∈ P ∧ ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))) → (((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
6834, 66, 67syl2anc 585 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) <Q ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
6960, 68sylbid 239 . 2 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑓 <Q 𝑥 → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶))))
70 ltsonq 10831 . . . . 5 <Q Or Q
71 sotrieq 5566 . . . . 5 (( <Q Or Q ∧ (𝑥Q𝑓Q)) → (𝑥 = 𝑓 ↔ ¬ (𝑥 <Q 𝑓𝑓 <Q 𝑥)))
7270, 71mpan 688 . . . 4 ((𝑥Q𝑓Q) → (𝑥 = 𝑓 ↔ ¬ (𝑥 <Q 𝑓𝑓 <Q 𝑥)))
7353, 8, 72syl2anc 585 . . 3 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → (𝑥 = 𝑓 ↔ ¬ (𝑥 <Q 𝑓𝑓 <Q 𝑥)))
74 oveq1 7349 . . . . . . 7 (𝑥 = 𝑓 → (𝑥 ·Q 𝑧) = (𝑓 ·Q 𝑧))
7574oveq2d 7358 . . . . . 6 (𝑥 = 𝑓 → ((𝑥 ·Q 𝑦) +Q (𝑥 ·Q 𝑧)) = ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)))
7661, 75eqtrid 2789 . . . . 5 (𝑥 = 𝑓 → (𝑥 ·Q (𝑦 +Q 𝑧)) = ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)))
7776eleq1d 2822 . . . 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 1032 1 (((𝐴P𝐵P𝐶P) ∧ ((𝑥𝐴𝑦𝐵) ∧ (𝑓𝐴𝑧𝐶))) → ((𝑥 ·Q 𝑦) +Q (𝑓 ·Q 𝑧)) ∈ (𝐴 ·P (𝐵 +P 𝐶)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 397  wo 845  w3a 1087  wcel 2106   class class class wbr 5097   Or wor 5536  (class class class)co 7342  Qcnq 10714   +Q cplq 10717   ·Q cmq 10718   <Q cltq 10720  Pcnp 10721   +P cpp 10723   ·P cmp 10724
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2708  ax-sep 5248  ax-nul 5255  ax-pow 5313  ax-pr 5377  ax-un 7655  ax-inf2 9503
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2887  df-ne 2942  df-ral 3063  df-rex 3072  df-rmo 3350  df-reu 3351  df-rab 3405  df-v 3444  df-sbc 3732  df-csb 3848  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3921  df-nul 4275  df-if 4479  df-pw 4554  df-sn 4579  df-pr 4581  df-op 4585  df-uni 4858  df-iun 4948  df-br 5098  df-opab 5160  df-mpt 5181  df-tr 5215  df-id 5523  df-eprel 5529  df-po 5537  df-so 5538  df-fr 5580  df-we 5582  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-pred 6243  df-ord 6310  df-on 6311  df-lim 6312  df-suc 6313  df-iota 6436  df-fun 6486  df-fn 6487  df-f 6488  df-f1 6489  df-fo 6490  df-f1o 6491  df-fv 6492  df-ov 7345  df-oprab 7346  df-mpo 7347  df-om 7786  df-1st 7904  df-2nd 7905  df-frecs 8172  df-wrecs 8203  df-recs 8277  df-rdg 8316  df-1o 8372  df-oadd 8376  df-omul 8377  df-er 8574  df-ni 10734  df-pli 10735  df-mi 10736  df-lti 10737  df-plpq 10770  df-mpq 10771  df-ltpq 10772  df-enq 10773  df-nq 10774  df-erq 10775  df-plq 10776  df-mq 10777  df-1nq 10778  df-rq 10779  df-ltnq 10780  df-np 10843  df-plp 10845  df-mp 10846
This theorem is referenced by:  distrlem5pr  10889
  Copyright terms: Public domain W3C validator