vdwlem3 - Metamath Proof Explorer

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

Theorem vdwlem3 16684

Description: Lemma for vdw 16695. (Contributed by Mario Carneiro, 13-Sep-2014.)

**Hypotheses**
Ref	Expression
vdwlem3.v	⊢ (𝜑 → 𝑉 ∈ ℕ)
vdwlem3.w	⊢ (𝜑 → 𝑊 ∈ ℕ)
vdwlem3.a	⊢ (𝜑 → 𝐴 ∈ (1...𝑉))
vdwlem3.b	⊢ (𝜑 → 𝐵 ∈ (1...𝑊))

**Assertion**
Ref	Expression
vdwlem3	⊢ (𝜑 → (𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ∈ (1...(𝑊 · (2 · 𝑉))))

**Proof of Theorem vdwlem3**
Step	Hyp	Ref	Expression
1		vdwlem3.b	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ (1...𝑊))
2		elfznn 13285	. . . . . 6 ⊢ (𝐵 ∈ (1...𝑊) → 𝐵 ∈ ℕ)
3	1, 2	syl 17	. . . . 5 ⊢ (𝜑 → 𝐵 ∈ ℕ)
4		vdwlem3.w	. . . . . 6 ⊢ (𝜑 → 𝑊 ∈ ℕ)
5		vdwlem3.a	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 ∈ (1...𝑉))
6		elfznn 13285	. . . . . . . . 9 ⊢ (𝐴 ∈ (1...𝑉) → 𝐴 ∈ ℕ)
7	5, 6	syl 17	. . . . . . . 8 ⊢ (𝜑 → 𝐴 ∈ ℕ)
8		nnm1nn0 12274	. . . . . . . 8 ⊢ (𝐴 ∈ ℕ → (𝐴 − 1) ∈ ℕ₀)
9	7, 8	syl 17	. . . . . . 7 ⊢ (𝜑 → (𝐴 − 1) ∈ ℕ₀)
10		vdwlem3.v	. . . . . . 7 ⊢ (𝜑 → 𝑉 ∈ ℕ)
11		nn0nnaddcl 12264	. . . . . . 7 ⊢ (((𝐴 − 1) ∈ ℕ₀ ∧ 𝑉 ∈ ℕ) → ((𝐴 − 1) + 𝑉) ∈ ℕ)
12	9, 10, 11	syl2anc 584	. . . . . 6 ⊢ (𝜑 → ((𝐴 − 1) + 𝑉) ∈ ℕ)
13	4, 12	nnmulcld 12026	. . . . 5 ⊢ (𝜑 → (𝑊 · ((𝐴 − 1) + 𝑉)) ∈ ℕ)
14	3, 13	nnaddcld 12025	. . . 4 ⊢ (𝜑 → (𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ∈ ℕ)
15	14	nnred 11988	. . 3 ⊢ (𝜑 → (𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ∈ ℝ)
16	7, 10	nnaddcld 12025	. . . . 5 ⊢ (𝜑 → (𝐴 + 𝑉) ∈ ℕ)
17	4, 16	nnmulcld 12026	. . . 4 ⊢ (𝜑 → (𝑊 · (𝐴 + 𝑉)) ∈ ℕ)
18	17	nnred 11988	. . 3 ⊢ (𝜑 → (𝑊 · (𝐴 + 𝑉)) ∈ ℝ)
19		2nn 12046	. . . . . 6 ⊢ 2 ∈ ℕ
20		nnmulcl 11997	. . . . . 6 ⊢ ((2 ∈ ℕ ∧ 𝑉 ∈ ℕ) → (2 · 𝑉) ∈ ℕ)
21	19, 10, 20	sylancr 587	. . . . 5 ⊢ (𝜑 → (2 · 𝑉) ∈ ℕ)
22	4, 21	nnmulcld 12026	. . . 4 ⊢ (𝜑 → (𝑊 · (2 · 𝑉)) ∈ ℕ)
23	22	nnred 11988	. . 3 ⊢ (𝜑 → (𝑊 · (2 · 𝑉)) ∈ ℝ)
24		elfzle2 13260	. . . . . 6 ⊢ (𝐵 ∈ (1...𝑊) → 𝐵 ≤ 𝑊)
25	1, 24	syl 17	. . . . 5 ⊢ (𝜑 → 𝐵 ≤ 𝑊)
26		nnre 11980	. . . . . . 7 ⊢ (𝐵 ∈ ℕ → 𝐵 ∈ ℝ)
27		nnre 11980	. . . . . . 7 ⊢ (𝑊 ∈ ℕ → 𝑊 ∈ ℝ)
28		nnre 11980	. . . . . . 7 ⊢ ((𝑊 · ((𝐴 − 1) + 𝑉)) ∈ ℕ → (𝑊 · ((𝐴 − 1) + 𝑉)) ∈ ℝ)
29		leadd1 11443	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ ∧ 𝑊 ∈ ℝ ∧ (𝑊 · ((𝐴 − 1) + 𝑉)) ∈ ℝ) → (𝐵 ≤ 𝑊 ↔ (𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ≤ (𝑊 + (𝑊 · ((𝐴 − 1) + 𝑉)))))
30	26, 27, 28, 29	syl3an 1159	. . . . . 6 ⊢ ((𝐵 ∈ ℕ ∧ 𝑊 ∈ ℕ ∧ (𝑊 · ((𝐴 − 1) + 𝑉)) ∈ ℕ) → (𝐵 ≤ 𝑊 ↔ (𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ≤ (𝑊 + (𝑊 · ((𝐴 − 1) + 𝑉)))))
31	3, 4, 13, 30	syl3anc 1370	. . . . 5 ⊢ (𝜑 → (𝐵 ≤ 𝑊 ↔ (𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ≤ (𝑊 + (𝑊 · ((𝐴 − 1) + 𝑉)))))
32	25, 31	mpbid 231	. . . 4 ⊢ (𝜑 → (𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ≤ (𝑊 + (𝑊 · ((𝐴 − 1) + 𝑉))))
33	4	nncnd 11989	. . . . . 6 ⊢ (𝜑 → 𝑊 ∈ ℂ)
34		1cnd 10970	. . . . . 6 ⊢ (𝜑 → 1 ∈ ℂ)
35	12	nncnd 11989	. . . . . 6 ⊢ (𝜑 → ((𝐴 − 1) + 𝑉) ∈ ℂ)
36	33, 34, 35	adddid 10999	. . . . 5 ⊢ (𝜑 → (𝑊 · (1 + ((𝐴 − 1) + 𝑉))) = ((𝑊 · 1) + (𝑊 · ((𝐴 − 1) + 𝑉))))
37	9	nn0cnd 12295	. . . . . . . 8 ⊢ (𝜑 → (𝐴 − 1) ∈ ℂ)
38	10	nncnd 11989	. . . . . . . 8 ⊢ (𝜑 → 𝑉 ∈ ℂ)
39	34, 37, 38	addassd 10997	. . . . . . 7 ⊢ (𝜑 → ((1 + (𝐴 − 1)) + 𝑉) = (1 + ((𝐴 − 1) + 𝑉)))
40		ax-1cn 10929	. . . . . . . . 9 ⊢ 1 ∈ ℂ
41	7	nncnd 11989	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 ∈ ℂ)
42		pncan3 11229	. . . . . . . . 9 ⊢ ((1 ∈ ℂ ∧ 𝐴 ∈ ℂ) → (1 + (𝐴 − 1)) = 𝐴)
43	40, 41, 42	sylancr 587	. . . . . . . 8 ⊢ (𝜑 → (1 + (𝐴 − 1)) = 𝐴)
44	43	oveq1d 7290	. . . . . . 7 ⊢ (𝜑 → ((1 + (𝐴 − 1)) + 𝑉) = (𝐴 + 𝑉))
45	39, 44	eqtr3d 2780	. . . . . 6 ⊢ (𝜑 → (1 + ((𝐴 − 1) + 𝑉)) = (𝐴 + 𝑉))
46	45	oveq2d 7291	. . . . 5 ⊢ (𝜑 → (𝑊 · (1 + ((𝐴 − 1) + 𝑉))) = (𝑊 · (𝐴 + 𝑉)))
47	33	mulid1d 10992	. . . . . 6 ⊢ (𝜑 → (𝑊 · 1) = 𝑊)
48	47	oveq1d 7290	. . . . 5 ⊢ (𝜑 → ((𝑊 · 1) + (𝑊 · ((𝐴 − 1) + 𝑉))) = (𝑊 + (𝑊 · ((𝐴 − 1) + 𝑉))))
49	36, 46, 48	3eqtr3d 2786	. . . 4 ⊢ (𝜑 → (𝑊 · (𝐴 + 𝑉)) = (𝑊 + (𝑊 · ((𝐴 − 1) + 𝑉))))
50	32, 49	breqtrrd 5102	. . 3 ⊢ (𝜑 → (𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ≤ (𝑊 · (𝐴 + 𝑉)))
51	7	nnred 11988	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ ℝ)
52	10	nnred 11988	. . . . . 6 ⊢ (𝜑 → 𝑉 ∈ ℝ)
53		elfzle2 13260	. . . . . . 7 ⊢ (𝐴 ∈ (1...𝑉) → 𝐴 ≤ 𝑉)
54	5, 53	syl 17	. . . . . 6 ⊢ (𝜑 → 𝐴 ≤ 𝑉)
55	51, 52, 52, 54	leadd1dd 11589	. . . . 5 ⊢ (𝜑 → (𝐴 + 𝑉) ≤ (𝑉 + 𝑉))
56	38	2timesd 12216	. . . . 5 ⊢ (𝜑 → (2 · 𝑉) = (𝑉 + 𝑉))
57	55, 56	breqtrrd 5102	. . . 4 ⊢ (𝜑 → (𝐴 + 𝑉) ≤ (2 · 𝑉))
58	16	nnred 11988	. . . . 5 ⊢ (𝜑 → (𝐴 + 𝑉) ∈ ℝ)
59	21	nnred 11988	. . . . 5 ⊢ (𝜑 → (2 · 𝑉) ∈ ℝ)
60	4	nnred 11988	. . . . 5 ⊢ (𝜑 → 𝑊 ∈ ℝ)
61	4	nngt0d 12022	. . . . 5 ⊢ (𝜑 → 0 < 𝑊)
62		lemul2 11828	. . . . 5 ⊢ (((𝐴 + 𝑉) ∈ ℝ ∧ (2 · 𝑉) ∈ ℝ ∧ (𝑊 ∈ ℝ ∧ 0 < 𝑊)) → ((𝐴 + 𝑉) ≤ (2 · 𝑉) ↔ (𝑊 · (𝐴 + 𝑉)) ≤ (𝑊 · (2 · 𝑉))))
63	58, 59, 60, 61, 62	syl112anc 1373	. . . 4 ⊢ (𝜑 → ((𝐴 + 𝑉) ≤ (2 · 𝑉) ↔ (𝑊 · (𝐴 + 𝑉)) ≤ (𝑊 · (2 · 𝑉))))
64	57, 63	mpbid 231	. . 3 ⊢ (𝜑 → (𝑊 · (𝐴 + 𝑉)) ≤ (𝑊 · (2 · 𝑉)))
65	15, 18, 23, 50, 64	letrd 11132	. 2 ⊢ (𝜑 → (𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ≤ (𝑊 · (2 · 𝑉)))
66		nnuz 12621	. . . 4 ⊢ ℕ = (ℤ_≥‘1)
67	14, 66	eleqtrdi 2849	. . 3 ⊢ (𝜑 → (𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ∈ (ℤ_≥‘1))
68	22	nnzd 12425	. . 3 ⊢ (𝜑 → (𝑊 · (2 · 𝑉)) ∈ ℤ)
69		elfz5 13248	. . 3 ⊢ (((𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ∈ (ℤ_≥‘1) ∧ (𝑊 · (2 · 𝑉)) ∈ ℤ) → ((𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ∈ (1...(𝑊 · (2 · 𝑉))) ↔ (𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ≤ (𝑊 · (2 · 𝑉))))
70	67, 68, 69	syl2anc 584	. 2 ⊢ (𝜑 → ((𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ∈ (1...(𝑊 · (2 · 𝑉))) ↔ (𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ≤ (𝑊 · (2 · 𝑉))))
71	65, 70	mpbird 256	1 ⊢ (𝜑 → (𝐵 + (𝑊 · ((𝐴 − 1) + 𝑉))) ∈ (1...(𝑊 · (2 · 𝑉))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 = wceq 1539 ∈ wcel 2106 class class class wbr 5074 ‘cfv 6433 (class class class)co 7275 ℂcc 10869 ℝcr 10870 0cc0 10871 1c1 10872 + caddc 10874 · cmul 10876 < clt 11009 ≤ cle 11010 − cmin 11205 ℕcn 11973 2c2 12028 ℕ₀cn0 12233 ℤcz 12319 ℤ_≥cuz 12582 ...cfz 13239

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 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 2709 ax-sep 5223 ax-nul 5230 ax-pow 5288 ax-pr 5352 ax-un 7588 ax-cnex 10927 ax-resscn 10928 ax-1cn 10929 ax-icn 10930 ax-addcl 10931 ax-addrcl 10932 ax-mulcl 10933 ax-mulrcl 10934 ax-mulcom 10935 ax-addass 10936 ax-mulass 10937 ax-distr 10938 ax-i2m1 10939 ax-1ne0 10940 ax-1rid 10941 ax-rnegex 10942 ax-rrecex 10943 ax-cnre 10944 ax-pre-lttri 10945 ax-pre-lttrn 10946 ax-pre-ltadd 10947 ax-pre-mulgt0 10948

This theorem depends on definitions: df-bi 206 df-an 397 df-or 845 df-3or 1087 df-3an 1088 df-tru 1542 df-fal 1552 df-ex 1783 df-nf 1787 df-sb 2068 df-mo 2540 df-eu 2569 df-clab 2716 df-cleq 2730 df-clel 2816 df-nfc 2889 df-ne 2944 df-nel 3050 df-ral 3069 df-rex 3070 df-reu 3072 df-rab 3073 df-v 3434 df-sbc 3717 df-csb 3833 df-dif 3890 df-un 3892 df-in 3894 df-ss 3904 df-pss 3906 df-nul 4257 df-if 4460 df-pw 4535 df-sn 4562 df-pr 4564 df-op 4568 df-uni 4840 df-iun 4926 df-br 5075 df-opab 5137 df-mpt 5158 df-tr 5192 df-id 5489 df-eprel 5495 df-po 5503 df-so 5504 df-fr 5544 df-we 5546 df-xp 5595 df-rel 5596 df-cnv 5597 df-co 5598 df-dm 5599 df-rn 5600 df-res 5601 df-ima 5602 df-pred 6202 df-ord 6269 df-on 6270 df-lim 6271 df-suc 6272 df-iota 6391 df-fun 6435 df-fn 6436 df-f 6437 df-f1 6438 df-fo 6439 df-f1o 6440 df-fv 6441 df-riota 7232 df-ov 7278 df-oprab 7279 df-mpo 7280 df-om 7713 df-1st 7831 df-2nd 7832 df-frecs 8097 df-wrecs 8128 df-recs 8202 df-rdg 8241 df-er 8498 df-en 8734 df-dom 8735 df-sdom 8736 df-pnf 11011 df-mnf 11012 df-xr 11013 df-ltxr 11014 df-le 11015 df-sub 11207 df-neg 11208 df-nn 11974 df-2 12036 df-n0 12234 df-z 12320 df-uz 12583 df-fz 13240

This theorem is referenced by: vdwlem4 16685 vdwlem6 16687

W3C validator