knoppndvlem2 - Mathbox for Asger C. Ipsen

	Mathbox for Asger C. Ipsen		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > knoppndvlem2		Structured version Visualization version GIF version

Theorem knoppndvlem2 37587

Description: Lemma for knoppndv 37608. (Contributed by Asger C. Ipsen, 15-Jun-2021.) (Revised by Asger C. Ipsen, 5-Jul-2021.)

**Hypotheses**
Ref	Expression
knoppndvlem2.n	⊢ (𝜑 → 𝑁 ∈ ℕ)
knoppndvlem2.i	⊢ (𝜑 → 𝐼 ∈ ℤ)
knoppndvlem2.j	⊢ (𝜑 → 𝐽 ∈ ℤ)
knoppndvlem2.m	⊢ (𝜑 → 𝑀 ∈ ℤ)
knoppndvlem2.1	⊢ (𝜑 → 𝐽 < 𝐼)

**Assertion**
Ref	Expression
knoppndvlem2	⊢ (𝜑 → (((2 · 𝑁)↑𝐼) · ((((2 · 𝑁)↑ -𝐽) / 2) · 𝑀)) ∈ ℤ)

**Proof of Theorem knoppndvlem2**
Step	Hyp	Ref	Expression
1		2cnd 12459	. . . . . . 7 ⊢ (𝜑 → 2 ∈ ℂ)
2		knoppndvlem2.n	. . . . . . . . 9 ⊢ (𝜑 → 𝑁 ∈ ℕ)
3		nnz 12752	. . . . . . . . 9 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
4	2, 3	syl 18	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ∈ ℤ)
5	4	zcnd 12842	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ ℂ)
6	1, 5	mulcld 11366	. . . . . 6 ⊢ (𝜑 → (2 · 𝑁) ∈ ℂ)
7		2ne0 12487	. . . . . . . 8 ⊢ 2 ≠ 0
8	7	a1i 11	. . . . . . 7 ⊢ (𝜑 → 2 ≠ 0)
9		0red 11348	. . . . . . . . 9 ⊢ (𝜑 → 0 ∈ ℝ)
10		1red 11346	. . . . . . . . . 10 ⊢ (𝜑 → 1 ∈ ℝ)
11	4	zred 12841	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ ℝ)
12		0lt1 11876	. . . . . . . . . . 11 ⊢ 0 < 1
13	12	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → 0 < 1)
14		nnge1 12404	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → 1 ≤ 𝑁)
15	2, 14	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → 1 ≤ 𝑁)
16	9, 10, 11, 13, 15	ltletrd 11507	. . . . . . . . 9 ⊢ (𝜑 → 0 < 𝑁)
17	9, 16	ltned 11483	. . . . . . . 8 ⊢ (𝜑 → 0 ≠ 𝑁)
18	17	necomd 3014	. . . . . . 7 ⊢ (𝜑 → 𝑁 ≠ 0)
19	1, 5, 8, 18	mulne0d 12006	. . . . . 6 ⊢ (𝜑 → (2 · 𝑁) ≠ 0)
20		knoppndvlem2.i	. . . . . 6 ⊢ (𝜑 → 𝐼 ∈ ℤ)
21	6, 19, 20	expclzd 14332	. . . . 5 ⊢ (𝜑 → ((2 · 𝑁)↑𝐼) ∈ ℂ)
22		knoppndvlem2.j	. . . . . . . 8 ⊢ (𝜑 → 𝐽 ∈ ℤ)
23	22	znegcld 12843	. . . . . . 7 ⊢ (𝜑 → -𝐽 ∈ ℤ)
24	6, 19, 23	expclzd 14332	. . . . . 6 ⊢ (𝜑 → ((2 · 𝑁)↑ -𝐽) ∈ ℂ)
25	24, 1, 8	divcld 12131	. . . . 5 ⊢ (𝜑 → (((2 · 𝑁)↑ -𝐽) / 2) ∈ ℂ)
26		knoppndvlem2.m	. . . . . 6 ⊢ (𝜑 → 𝑀 ∈ ℤ)
27	26	zcnd 12842	. . . . 5 ⊢ (𝜑 → 𝑀 ∈ ℂ)
28	21, 25, 27	mulassd 11369	. . . 4 ⊢ (𝜑 → ((((2 · 𝑁)↑𝐼) · (((2 · 𝑁)↑ -𝐽) / 2)) · 𝑀) = (((2 · 𝑁)↑𝐼) · ((((2 · 𝑁)↑ -𝐽) / 2) · 𝑀)))
29	28	eqcomd 2769	. . 3 ⊢ (𝜑 → (((2 · 𝑁)↑𝐼) · ((((2 · 𝑁)↑ -𝐽) / 2) · 𝑀)) = ((((2 · 𝑁)↑𝐼) · (((2 · 𝑁)↑ -𝐽) / 2)) · 𝑀))
30	21, 24, 1, 8	divassd 12166	. . . . . 6 ⊢ (𝜑 → ((((2 · 𝑁)↑𝐼) · ((2 · 𝑁)↑ -𝐽)) / 2) = (((2 · 𝑁)↑𝐼) · (((2 · 𝑁)↑ -𝐽) / 2)))
31	30	eqcomd 2769	. . . . 5 ⊢ (𝜑 → (((2 · 𝑁)↑𝐼) · (((2 · 𝑁)↑ -𝐽) / 2)) = ((((2 · 𝑁)↑𝐼) · ((2 · 𝑁)↑ -𝐽)) / 2))
32	6, 19	jca 521	. . . . . . . . . 10 ⊢ (𝜑 → ((2 · 𝑁) ∈ ℂ ∧ (2 · 𝑁) ≠ 0))
33	20, 23	jca 521	. . . . . . . . . 10 ⊢ (𝜑 → (𝐼 ∈ ℤ ∧ -𝐽 ∈ ℤ))
34	32, 33	jca 521	. . . . . . . . 9 ⊢ (𝜑 → (((2 · 𝑁) ∈ ℂ ∧ (2 · 𝑁) ≠ 0) ∧ (𝐼 ∈ ℤ ∧ -𝐽 ∈ ℤ)))
35		expaddz 14287	. . . . . . . . 9 ⊢ ((((2 · 𝑁) ∈ ℂ ∧ (2 · 𝑁) ≠ 0) ∧ (𝐼 ∈ ℤ ∧ -𝐽 ∈ ℤ)) → ((2 · 𝑁)↑(𝐼 + -𝐽)) = (((2 · 𝑁)↑𝐼) · ((2 · 𝑁)↑ -𝐽)))
36	34, 35	syl 18	. . . . . . . 8 ⊢ (𝜑 → ((2 · 𝑁)↑(𝐼 + -𝐽)) = (((2 · 𝑁)↑𝐼) · ((2 · 𝑁)↑ -𝐽)))
37	36	eqcomd 2769	. . . . . . 7 ⊢ (𝜑 → (((2 · 𝑁)↑𝐼) · ((2 · 𝑁)↑ -𝐽)) = ((2 · 𝑁)↑(𝐼 + -𝐽)))
38	20	zcnd 12842	. . . . . . . . 9 ⊢ (𝜑 → 𝐼 ∈ ℂ)
39	22	zcnd 12842	. . . . . . . . 9 ⊢ (𝜑 → 𝐽 ∈ ℂ)
40	38, 39	negsubd 11712	. . . . . . . 8 ⊢ (𝜑 → (𝐼 + -𝐽) = (𝐼 − 𝐽))
41	40	oveq2d 7465	. . . . . . 7 ⊢ (𝜑 → ((2 · 𝑁)↑(𝐼 + -𝐽)) = ((2 · 𝑁)↑(𝐼 − 𝐽)))
42		knoppndvlem2.1	. . . . . . . . . 10 ⊢ (𝜑 → 𝐽 < 𝐼)
43	22, 20	jca 521	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐽 ∈ ℤ ∧ 𝐼 ∈ ℤ))
44		znnsub 12780	. . . . . . . . . . 11 ⊢ ((𝐽 ∈ ℤ ∧ 𝐼 ∈ ℤ) → (𝐽 < 𝐼 ↔ (𝐼 − 𝐽) ∈ ℕ))
45	43, 44	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → (𝐽 < 𝐼 ↔ (𝐼 − 𝐽) ∈ ℕ))
46	42, 45	mpbid 235	. . . . . . . . 9 ⊢ (𝜑 → (𝐼 − 𝐽) ∈ ℕ)
47	6, 46	jca 521	. . . . . . . 8 ⊢ (𝜑 → ((2 · 𝑁) ∈ ℂ ∧ (𝐼 − 𝐽) ∈ ℕ))
48		expm1t 14271	. . . . . . . 8 ⊢ (((2 · 𝑁) ∈ ℂ ∧ (𝐼 − 𝐽) ∈ ℕ) → ((2 · 𝑁)↑(𝐼 − 𝐽)) = (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · (2 · 𝑁)))
49	47, 48	syl 18	. . . . . . 7 ⊢ (𝜑 → ((2 · 𝑁)↑(𝐼 − 𝐽)) = (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · (2 · 𝑁)))
50	37, 41, 49	3eqtrd 2802	. . . . . 6 ⊢ (𝜑 → (((2 · 𝑁)↑𝐼) · ((2 · 𝑁)↑ -𝐽)) = (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · (2 · 𝑁)))
51	50	oveq1d 7464	. . . . 5 ⊢ (𝜑 → ((((2 · 𝑁)↑𝐼) · ((2 · 𝑁)↑ -𝐽)) / 2) = ((((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · (2 · 𝑁)) / 2))
52	20, 22	jca 521	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐼 ∈ ℤ ∧ 𝐽 ∈ ℤ))
53		zsubcl 12776	. . . . . . . . . . . 12 ⊢ ((𝐼 ∈ ℤ ∧ 𝐽 ∈ ℤ) → (𝐼 − 𝐽) ∈ ℤ)
54	52, 53	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐼 − 𝐽) ∈ ℤ)
55		peano2zm 12777	. . . . . . . . . . 11 ⊢ ((𝐼 − 𝐽) ∈ ℤ → ((𝐼 − 𝐽) − 1) ∈ ℤ)
56	54, 55	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐼 − 𝐽) − 1) ∈ ℤ)
57	22	zred 12841	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐽 ∈ ℝ)
58	20	zred 12841	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐼 ∈ ℝ)
59	57, 58	posdifd 11941	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐽 < 𝐼 ↔ 0 < (𝐼 − 𝐽)))
60	42, 59	mpbid 235	. . . . . . . . . . 11 ⊢ (𝜑 → 0 < (𝐼 − 𝐽))
61		0zd 12743	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 ∈ ℤ)
62	61, 54	jca 521	. . . . . . . . . . . 12 ⊢ (𝜑 → (0 ∈ ℤ ∧ (𝐼 − 𝐽) ∈ ℤ))
63		zltlem1 12787	. . . . . . . . . . . 12 ⊢ ((0 ∈ ℤ ∧ (𝐼 − 𝐽) ∈ ℤ) → (0 < (𝐼 − 𝐽) ↔ 0 ≤ ((𝐼 − 𝐽) − 1)))
64	62, 63	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → (0 < (𝐼 − 𝐽) ↔ 0 ≤ ((𝐼 − 𝐽) − 1)))
65	60, 64	mpbid 235	. . . . . . . . . 10 ⊢ (𝜑 → 0 ≤ ((𝐼 − 𝐽) − 1))
66	56, 65	jca 521	. . . . . . . . 9 ⊢ (𝜑 → (((𝐼 − 𝐽) − 1) ∈ ℤ ∧ 0 ≤ ((𝐼 − 𝐽) − 1)))
67		elnn0z 12744	. . . . . . . . 9 ⊢ (((𝐼 − 𝐽) − 1) ∈ ℕ₀ ↔ (((𝐼 − 𝐽) − 1) ∈ ℤ ∧ 0 ≤ ((𝐼 − 𝐽) − 1)))
68	66, 67	sylibr 237	. . . . . . . 8 ⊢ (𝜑 → ((𝐼 − 𝐽) − 1) ∈ ℕ₀)
69	6, 68	expcld 14327	. . . . . . 7 ⊢ (𝜑 → ((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) ∈ ℂ)
70	69, 6, 1, 8	divassd 12166	. . . . . 6 ⊢ (𝜑 → ((((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · (2 · 𝑁)) / 2) = (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · ((2 · 𝑁) / 2)))
71	5, 1, 8	divcan3d 12136	. . . . . . 7 ⊢ (𝜑 → ((2 · 𝑁) / 2) = 𝑁)
72	71	oveq2d 7465	. . . . . 6 ⊢ (𝜑 → (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · ((2 · 𝑁) / 2)) = (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · 𝑁))
73	70, 72	eqtrd 2798	. . . . 5 ⊢ (𝜑 → ((((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · (2 · 𝑁)) / 2) = (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · 𝑁))
74	31, 51, 73	3eqtrd 2802	. . . 4 ⊢ (𝜑 → (((2 · 𝑁)↑𝐼) · (((2 · 𝑁)↑ -𝐽) / 2)) = (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · 𝑁))
75	74	oveq1d 7464	. . 3 ⊢ (𝜑 → ((((2 · 𝑁)↑𝐼) · (((2 · 𝑁)↑ -𝐽) / 2)) · 𝑀) = ((((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · 𝑁) · 𝑀))
76	29, 75	eqtrd 2798	. 2 ⊢ (𝜑 → (((2 · 𝑁)↑𝐼) · ((((2 · 𝑁)↑ -𝐽) / 2) · 𝑀)) = ((((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · 𝑁) · 𝑀))
77		2z 12766	. . . . . . . . 9 ⊢ 2 ∈ ℤ
78	77	a1i 11	. . . . . . . 8 ⊢ (𝜑 → 2 ∈ ℤ)
79	78, 4	jca 521	. . . . . . 7 ⊢ (𝜑 → (2 ∈ ℤ ∧ 𝑁 ∈ ℤ))
80		zmulcl 12783	. . . . . . 7 ⊢ ((2 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (2 · 𝑁) ∈ ℤ)
81	79, 80	syl 18	. . . . . 6 ⊢ (𝜑 → (2 · 𝑁) ∈ ℤ)
82	81, 68	jca 521	. . . . 5 ⊢ (𝜑 → ((2 · 𝑁) ∈ ℤ ∧ ((𝐼 − 𝐽) − 1) ∈ ℕ₀))
83		zexpcl 14257	. . . . 5 ⊢ (((2 · 𝑁) ∈ ℤ ∧ ((𝐼 − 𝐽) − 1) ∈ ℕ₀) → ((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) ∈ ℤ)
84	82, 83	syl 18	. . . 4 ⊢ (𝜑 → ((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) ∈ ℤ)
85	84, 4	zmulcld 12847	. . 3 ⊢ (𝜑 → (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · 𝑁) ∈ ℤ)
86	85, 26	zmulcld 12847	. 2 ⊢ (𝜑 → ((((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · 𝑁) · 𝑀) ∈ ℤ)
87	76, 86	eqeltrd 2864	1 ⊢ (𝜑 → (((2 · 𝑁)↑𝐼) · ((((2 · 𝑁)↑ -𝐽) / 2) · 𝑀)) ∈ ℤ)

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 = wceq 1570 ∈ wcel 2147 ≠ wne 2959 class class class wbr 5106 (class class class)co 7449 ℂcc 11235 0cc0 11237 1c1 11238 + caddc 11240 · cmul 11242 < clt 11380 ≤ cle 11381 − cmin 11578 -cneg 11579 / cdiv 12011 ℕcn 12373 2c2 12435 ℕ₀cn0 12644 ℤcz 12731 ↑cexp 14242

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1945 ax-6 2002 ax-7 2043 ax-8 2149 ax-9 2157 ax-10 2180 ax-11 2197 ax-12 2216 ax-ext 2735 ax-sep 5253 ax-nul 5264 ax-pow 5332 ax-pr 5396 ax-un 7781 ax-cnex 11293 ax-resscn 11294 ax-1cn 11295 ax-icn 11296 ax-addcl 11297 ax-addrcl 11298 ax-mulcl 11299 ax-mulrcl 11300 ax-mulcom 11301 ax-addass 11302 ax-mulass 11303 ax-distr 11304 ax-i2m1 11305 ax-1ne0 11306 ax-1rid 11307 ax-rnegex 11308 ax-rrecex 11309 ax-cnre 11310 ax-pre-lttri 11311 ax-pre-lttrn 11312 ax-pre-ltadd 11313 ax-pre-mulgt0 11314

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2102 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2839 df-nfc 2913 df-ne 2960 df-nel 3066 df-ral 3081 df-rex 3091 df-rmo 3369 df-reu 3370 df-rab 3417 df-v 3456 df-sbc 3743 df-csb 3852 df-ss 3901 df-pss 4017 df-dif 4050 df-in 4094 df-un 4154 df-nul 4282 df-if 4486 df-pw 4562 df-sn 4589 df-pr 4591 df-op 4839 df-uni 4871 df-iun 4956 df-br 5107 df-opab 5172 df-mpt 5191 df-tr 5217 df-id 5551 df-eprel 5556 df-po 5564 df-so 5565 df-fr 5609 df-we 5611 df-xp 5662 df-rel 5663 df-cnv 5664 df-co 5665 df-dm 5666 df-rn 5667 df-res 5668 df-ima 5669 df-pred 6328 df-ord 6389 df-on 6390 df-lim 6391 df-suc 6392 df-iota 6518 df-fun 6566 df-fn 6567 df-f 6568 df-f1 6569 df-fo 6570 df-f1o 6571 df-fv 6572 df-riota 7406 df-ov 7452 df-oprab 7453 df-mpo 7454 df-om 7910 df-2nd 8034 df-frecs 8335 df-wrecs 8366 df-recs 8415 df-rdg 8454 df-er 8753 df-en 9010 df-dom 9011 df-sdom 9012 df-pnf 11382 df-mnf 11383 df-xr 11384 df-ltxr 11385 df-le 11386 df-sub 11580 df-neg 11581 df-div 12012 df-nn 12374 df-2 12443 df-n0 12645 df-z 12732 df-uz 13004 df-seq 14183 df-exp 14243

This theorem is used by: knoppndvlem6 37591

W3C validator