Users' Mathboxes 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 37359
Description: Lemma for knoppndv 37380. (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
StepHypRef Expression
1 2cnd 12414 . . . . . . 7 (𝜑 → 2 ∈ ℂ)
2 knoppndvlem2.n . . . . . . . . 9 (𝜑 → 𝑁 ∈ ℕ)
3 nnz 12707 . . . . . . . . 9 (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
42, 3syl 18 . . . . . . . 8 (𝜑 → 𝑁 ∈ ℤ)
54zcnd 12797 . . . . . . 7 (𝜑 → 𝑁 ∈ ℂ)
61, 5mulcld 11322 . . . . . 6 (𝜑 → (2 · 𝑁) ∈ ℂ)
7 2ne0 12442 . . . . . . . 8 2 ≠ 0
87a1i 11 . . . . . . 7 (𝜑 → 2 ≠ 0)
9 0red 11304 . . . . . . . . 9 (𝜑 → 0 ∈ ℝ)
10 1red 11302 . . . . . . . . . 10 (𝜑 → 1 ∈ ℝ)
114zred 12796 . . . . . . . . . 10 (𝜑 → 𝑁 ∈ ℝ)
12 0lt1 11831 . . . . . . . . . . 11 0 < 1
1312a1i 11 . . . . . . . . . 10 (𝜑 → 0 < 1)
14 nnge1 12359 . . . . . . . . . . 11 (𝑁 ∈ ℕ → 1 ≤ 𝑁)
152, 14syl 18 . . . . . . . . . 10 (𝜑 → 1 ≤ 𝑁)
169, 10, 11, 13, 15ltletrd 11463 . . . . . . . . 9 (𝜑 → 0 < 𝑁)
179, 16ltned 11439 . . . . . . . 8 (𝜑 → 0 ≠ 𝑁)
1817necomd 3011 . . . . . . 7 (𝜑 → 𝑁 ≠ 0)
191, 5, 8, 18mulne0d 11961 . . . . . 6 (𝜑 → (2 · 𝑁) ≠ 0)
20 knoppndvlem2.i . . . . . 6 (𝜑 → 𝐼 ∈ ℤ)
216, 19, 20expclzd 14287 . . . . 5 (𝜑 → ((2 · 𝑁)↑𝐼) ∈ ℂ)
22 knoppndvlem2.j . . . . . . . 8 (𝜑 → 𝐽 ∈ ℤ)
2322znegcld 12798 . . . . . . 7 (𝜑 → -𝐽 ∈ ℤ)
246, 19, 23expclzd 14287 . . . . . 6 (𝜑 → ((2 · 𝑁)↑-𝐽) ∈ ℂ)
2524, 1, 8divcld 12086 . . . . 5 (𝜑 → (((2 · 𝑁)↑-𝐽) / 2) ∈ ℂ)
26 knoppndvlem2.m . . . . . 6 (𝜑 → 𝑀 ∈ ℤ)
2726zcnd 12797 . . . . 5 (𝜑 → 𝑀 ∈ ℂ)
2821, 25, 27mulassd 11325 . . . 4 (𝜑 → ((((2 · 𝑁)↑𝐼) · (((2 · 𝑁)↑-𝐽) / 2)) · 𝑀) = (((2 · 𝑁)↑𝐼) · ((((2 · 𝑁)↑-𝐽) / 2) · 𝑀)))
2928eqcomd 2767 . . 3 (𝜑 → (((2 · 𝑁)↑𝐼) · ((((2 · 𝑁)↑-𝐽) / 2) · 𝑀)) = ((((2 · 𝑁)↑𝐼) · (((2 · 𝑁)↑-𝐽) / 2)) · 𝑀))
3021, 24, 1, 8divassd 12121 . . . . . 6 (𝜑 → ((((2 · 𝑁)↑𝐼) · ((2 · 𝑁)↑-𝐽)) / 2) = (((2 · 𝑁)↑𝐼) · (((2 · 𝑁)↑-𝐽) / 2)))
3130eqcomd 2767 . . . . 5 (𝜑 → (((2 · 𝑁)↑𝐼) · (((2 · 𝑁)↑-𝐽) / 2)) = ((((2 · 𝑁)↑𝐼) · ((2 · 𝑁)↑-𝐽)) / 2))
326, 19jca 521 . . . . . . . . . 10 (𝜑 → ((2 · 𝑁) ∈ ℂ ∧ (2 · 𝑁) ≠ 0))
3320, 23jca 521 . . . . . . . . . 10 (𝜑 → (𝐼 ∈ ℤ ∧ -𝐽 ∈ ℤ))
3432, 33jca 521 . . . . . . . . 9 (𝜑 → (((2 · 𝑁) ∈ ℂ ∧ (2 · 𝑁) ≠ 0) ∧ (𝐼 ∈ ℤ ∧ -𝐽 ∈ ℤ)))
35 expaddz 14242 . . . . . . . . 9 ((((2 · 𝑁) ∈ ℂ ∧ (2 · 𝑁) ≠ 0) ∧ (𝐼 ∈ ℤ ∧ -𝐽 ∈ ℤ)) → ((2 · 𝑁)↑(𝐼 + -𝐽)) = (((2 · 𝑁)↑𝐼) · ((2 · 𝑁)↑-𝐽)))
3634, 35syl 18 . . . . . . . 8 (𝜑 → ((2 · 𝑁)↑(𝐼 + -𝐽)) = (((2 · 𝑁)↑𝐼) · ((2 · 𝑁)↑-𝐽)))
3736eqcomd 2767 . . . . . . 7 (𝜑 → (((2 · 𝑁)↑𝐼) · ((2 · 𝑁)↑-𝐽)) = ((2 · 𝑁)↑(𝐼 + -𝐽)))
3820zcnd 12797 . . . . . . . . 9 (𝜑 → 𝐼 ∈ ℂ)
3922zcnd 12797 . . . . . . . . 9 (𝜑 → 𝐽 ∈ ℂ)
4038, 39negsubd 11668 . . . . . . . 8 (𝜑 → (𝐼 + -𝐽) = (𝐼 − 𝐽))
4140oveq2d 7434 . . . . . . 7 (𝜑 → ((2 · 𝑁)↑(𝐼 + -𝐽)) = ((2 · 𝑁)↑(𝐼 − 𝐽)))
42 knoppndvlem2.1 . . . . . . . . . 10 (𝜑 → 𝐽 < 𝐼)
4322, 20jca 521 . . . . . . . . . . 11 (𝜑 → (𝐽 ∈ ℤ ∧ 𝐼 ∈ ℤ))
44 znnsub 12735 . . . . . . . . . . 11 ((𝐽 ∈ ℤ ∧ 𝐼 ∈ ℤ) → (𝐽 < 𝐼 ↔ (𝐼 − 𝐽) ∈ ℕ))
4543, 44syl 18 . . . . . . . . . 10 (𝜑 → (𝐽 < 𝐼 ↔ (𝐼 − 𝐽) ∈ ℕ))
4642, 45mpbid 235 . . . . . . . . 9 (𝜑 → (𝐼 − 𝐽) ∈ ℕ)
476, 46jca 521 . . . . . . . 8 (𝜑 → ((2 · 𝑁) ∈ ℂ ∧ (𝐼 − 𝐽) ∈ ℕ))
48 expm1t 14226 . . . . . . . 8 (((2 · 𝑁) ∈ ℂ ∧ (𝐼 − 𝐽) ∈ ℕ) → ((2 · 𝑁)↑(𝐼 − 𝐽)) = (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · (2 · 𝑁)))
4947, 48syl 18 . . . . . . 7 (𝜑 → ((2 · 𝑁)↑(𝐼 − 𝐽)) = (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · (2 · 𝑁)))
5037, 41, 493eqtrd 2800 . . . . . 6 (𝜑 → (((2 · 𝑁)↑𝐼) · ((2 · 𝑁)↑-𝐽)) = (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · (2 · 𝑁)))
5150oveq1d 7433 . . . . 5 (𝜑 → ((((2 · 𝑁)↑𝐼) · ((2 · 𝑁)↑-𝐽)) / 2) = ((((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · (2 · 𝑁)) / 2))
5220, 22jca 521 . . . . . . . . . . . 12 (𝜑 → (𝐼 ∈ ℤ ∧ 𝐽 ∈ ℤ))
53 zsubcl 12731 . . . . . . . . . . . 12 ((𝐼 ∈ ℤ ∧ 𝐽 ∈ ℤ) → (𝐼 − 𝐽) ∈ ℤ)
5452, 53syl 18 . . . . . . . . . . 11 (𝜑 → (𝐼 − 𝐽) ∈ ℤ)
55 peano2zm 12732 . . . . . . . . . . 11 ((𝐼 − 𝐽) ∈ ℤ → ((𝐼 − 𝐽) − 1) ∈ ℤ)
5654, 55syl 18 . . . . . . . . . 10 (𝜑 → ((𝐼 − 𝐽) − 1) ∈ ℤ)
5722zred 12796 . . . . . . . . . . . . 13 (𝜑 → 𝐽 ∈ ℝ)
5820zred 12796 . . . . . . . . . . . . 13 (𝜑 → 𝐼 ∈ ℝ)
5957, 58posdifd 11896 . . . . . . . . . . . 12 (𝜑 → (𝐽 < 𝐼 ↔ 0 < (𝐼 − 𝐽)))
6042, 59mpbid 235 . . . . . . . . . . 11 (𝜑 → 0 < (𝐼 − 𝐽))
61 0zd 12698 . . . . . . . . . . . . 13 (𝜑 → 0 ∈ ℤ)
6261, 54jca 521 . . . . . . . . . . . 12 (𝜑 → (0 ∈ ℤ ∧ (𝐼 − 𝐽) ∈ ℤ))
63 zltlem1 12742 . . . . . . . . . . . 12 ((0 ∈ ℤ ∧ (𝐼 − 𝐽) ∈ ℤ) → (0 < (𝐼 − 𝐽) ↔ 0 ≤ ((𝐼 − 𝐽) − 1)))
6462, 63syl 18 . . . . . . . . . . 11 (𝜑 → (0 < (𝐼 − 𝐽) ↔ 0 ≤ ((𝐼 − 𝐽) − 1)))
6560, 64mpbid 235 . . . . . . . . . 10 (𝜑 → 0 ≤ ((𝐼 − 𝐽) − 1))
6656, 65jca 521 . . . . . . . . 9 (𝜑 → (((𝐼 − 𝐽) − 1) ∈ ℤ ∧ 0 ≤ ((𝐼 − 𝐽) − 1)))
67 elnn0z 12699 . . . . . . . . 9 (((𝐼 − 𝐽) − 1) ∈ ℕ0 ↔ (((𝐼 − 𝐽) − 1) ∈ ℤ ∧ 0 ≤ ((𝐼 − 𝐽) − 1)))
6866, 67sylibr 237 . . . . . . . 8 (𝜑 → ((𝐼 − 𝐽) − 1) ∈ ℕ0)
696, 68expcld 14282 . . . . . . 7 (𝜑 → ((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) ∈ ℂ)
7069, 6, 1, 8divassd 12121 . . . . . 6 (𝜑 → ((((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · (2 · 𝑁)) / 2) = (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · ((2 · 𝑁) / 2)))
715, 1, 8divcan3d 12091 . . . . . . 7 (𝜑 → ((2 · 𝑁) / 2) = 𝑁)
7271oveq2d 7434 . . . . . 6 (𝜑 → (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · ((2 · 𝑁) / 2)) = (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · 𝑁))
7370, 72eqtrd 2796 . . . . 5 (𝜑 → ((((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · (2 · 𝑁)) / 2) = (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · 𝑁))
7431, 51, 733eqtrd 2800 . . . 4 (𝜑 → (((2 · 𝑁)↑𝐼) · (((2 · 𝑁)↑-𝐽) / 2)) = (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · 𝑁))
7574oveq1d 7433 . . 3 (𝜑 → ((((2 · 𝑁)↑𝐼) · (((2 · 𝑁)↑-𝐽) / 2)) · 𝑀) = ((((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · 𝑁) · 𝑀))
7629, 75eqtrd 2796 . 2 (𝜑 → (((2 · 𝑁)↑𝐼) · ((((2 · 𝑁)↑-𝐽) / 2) · 𝑀)) = ((((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · 𝑁) · 𝑀))
77 2z 12721 . . . . . . . . 9 2 ∈ ℤ
7877a1i 11 . . . . . . . 8 (𝜑 → 2 ∈ ℤ)
7978, 4jca 521 . . . . . . 7 (𝜑 → (2 ∈ ℤ ∧ 𝑁 ∈ ℤ))
80 zmulcl 12738 . . . . . . 7 ((2 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (2 · 𝑁) ∈ ℤ)
8179, 80syl 18 . . . . . 6 (𝜑 → (2 · 𝑁) ∈ ℤ)
8281, 68jca 521 . . . . 5 (𝜑 → ((2 · 𝑁) ∈ ℤ ∧ ((𝐼 − 𝐽) − 1) ∈ ℕ0))
83 zexpcl 14212 . . . . 5 (((2 · 𝑁) ∈ ℤ ∧ ((𝐼 − 𝐽) − 1) ∈ ℕ0) → ((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) ∈ ℤ)
8482, 83syl 18 . . . 4 (𝜑 → ((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) ∈ ℤ)
8584, 4zmulcld 12802 . . 3 (𝜑 → (((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · 𝑁) ∈ ℤ)
8685, 26zmulcld 12802 . 2 (𝜑 → ((((2 · 𝑁)↑((𝐼 − 𝐽) − 1)) · 𝑁) · 𝑀) ∈ ℤ)
8776, 86eqeltrd 2861 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 2145   ≠ wne 2956   class class class wbr 5103  (class class class)co 7418  ℂcc 11191  0cc0 11193  1c1 11194   + caddc 11196   · cmul 11198   < clt 11336   ≤ cle 11337   − cmin 11534  -cneg 11535   / cdiv 11966  ℕcn 12328  2c2 12390  ℕ0cn0 12599  ℤcz 12686  ↑cexp 14197
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 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7749  ax-cnex 11249  ax-resscn 11250  ax-1cn 11251  ax-icn 11252  ax-addcl 11253  ax-addrcl 11254  ax-mulcl 11255  ax-mulrcl 11256  ax-mulcom 11257  ax-addass 11258  ax-mulass 11259  ax-distr 11260  ax-i2m1 11261  ax-1ne0 11262  ax-1rid 11263  ax-rnegex 11264  ax-rrecex 11265  ax-cnre 11266  ax-pre-lttri 11267  ax-pre-lttrn 11268  ax-pre-ltadd 11269  ax-pre-mulgt0 11270
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 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-riota 7375  df-ov 7421  df-oprab 7422  df-mpo 7423  df-om 7876  df-2nd 8000  df-frecs 8292  df-wrecs 8323  df-recs 8372  df-rdg 8411  df-er 8710  df-en 8967  df-dom 8968  df-sdom 8969  df-pnf 11338  df-mnf 11339  df-xr 11340  df-ltxr 11341  df-le 11342  df-sub 11536  df-neg 11537  df-div 11967  df-nn 12329  df-2 12398  df-n0 12600  df-z 12687  df-uz 12959  df-seq 14138  df-exp 14198
This theorem is used by:  knoppndvlem6  37363
  Copyright terms: Public domain W3C validator