Users' Mathboxes Mathbox for Alexander van der Vekens < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  dignn0flhalflem1 Structured version   Visualization version   GIF version

Theorem dignn0flhalflem1 42207
Description: Lemma 1 for dignn0flhalf 42210. (Contributed by AV, 7-Jun-2012.)
Assertion
Ref Expression
dignn0flhalflem1 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((𝐴 / (2↑𝑁)) − 1)) < (⌊‘((𝐴 − 1) / (2↑𝑁))))

Proof of Theorem dignn0flhalflem1
StepHypRef Expression
1 zre 11258 . . . . . 6 (𝐴 ∈ ℤ → 𝐴 ∈ ℝ)
213ad2ant1 1075 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝐴 ∈ ℝ)
3 2rp 11713 . . . . . . . . 9 2 ∈ ℝ+
43a1i 11 . . . . . . . 8 (𝑁 ∈ ℕ → 2 ∈ ℝ+)
5 nnz 11276 . . . . . . . 8 (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
64, 5rpexpcld 12894 . . . . . . 7 (𝑁 ∈ ℕ → (2↑𝑁) ∈ ℝ+)
76rpred 11748 . . . . . 6 (𝑁 ∈ ℕ → (2↑𝑁) ∈ ℝ)
873ad2ant3 1077 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2↑𝑁) ∈ ℝ)
92, 8resubcld 10337 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝐴 − (2↑𝑁)) ∈ ℝ)
1063ad2ant3 1077 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2↑𝑁) ∈ ℝ+)
119, 10modcld 12536 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − (2↑𝑁)) mod (2↑𝑁)) ∈ ℝ)
129, 11resubcld 10337 . . 3 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − (2↑𝑁)) − ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) ∈ ℝ)
13 peano2zm 11297 . . . . . 6 (𝐴 ∈ ℤ → (𝐴 − 1) ∈ ℤ)
1413zred 11358 . . . . 5 (𝐴 ∈ ℤ → (𝐴 − 1) ∈ ℝ)
15143ad2ant1 1075 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝐴 − 1) ∈ ℝ)
1615, 10modcld 12536 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − 1) mod (2↑𝑁)) ∈ ℝ)
1715, 16resubcld 10337 . . 3 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − 1) − ((𝐴 − 1) mod (2↑𝑁))) ∈ ℝ)
18 1red 9934 . . . . . 6 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → 1 ∈ ℝ)
1918, 16readdcld 9948 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (1 + ((𝐴 − 1) mod (2↑𝑁))) ∈ ℝ)
208, 11readdcld 9948 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((2↑𝑁) + ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) ∈ ℝ)
21 2nn 11062 . . . . . . . . . . . . . 14 2 ∈ ℕ
2221a1i 11 . . . . . . . . . . . . 13 (𝑁 ∈ ℕ → 2 ∈ ℕ)
23 nnnn0 11176 . . . . . . . . . . . . 13 (𝑁 ∈ ℕ → 𝑁 ∈ ℕ0)
2422, 23nnexpcld 12892 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → (2↑𝑁) ∈ ℕ)
2524anim2i 591 . . . . . . . . . . 11 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝐴 ∈ ℤ ∧ (2↑𝑁) ∈ ℕ))
26253adant2 1073 . . . . . . . . . 10 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝐴 ∈ ℤ ∧ (2↑𝑁) ∈ ℕ))
27 m1modmmod 42110 . . . . . . . . . 10 ((𝐴 ∈ ℤ ∧ (2↑𝑁) ∈ ℕ) → (((𝐴 − 1) mod (2↑𝑁)) − (𝐴 mod (2↑𝑁))) = if((𝐴 mod (2↑𝑁)) = 0, ((2↑𝑁) − 1), -1))
2826, 27syl 17 . . . . . . . . 9 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((𝐴 − 1) mod (2↑𝑁)) − (𝐴 mod (2↑𝑁))) = if((𝐴 mod (2↑𝑁)) = 0, ((2↑𝑁) − 1), -1))
29 nnz 11276 . . . . . . . . . . . . . . . 16 (((𝐴 − 1) / 2) ∈ ℕ → ((𝐴 − 1) / 2) ∈ ℤ)
3029a1i 11 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((𝐴 − 1) / 2) ∈ ℕ → ((𝐴 − 1) / 2) ∈ ℤ))
31 zcn 11259 . . . . . . . . . . . . . . . . . . 19 (𝐴 ∈ ℤ → 𝐴 ∈ ℂ)
32 xp1d2m1eqxm1d2 11163 . . . . . . . . . . . . . . . . . . . 20 (𝐴 ∈ ℂ → (((𝐴 + 1) / 2) − 1) = ((𝐴 − 1) / 2))
3332eqcomd 2616 . . . . . . . . . . . . . . . . . . 19 (𝐴 ∈ ℂ → ((𝐴 − 1) / 2) = (((𝐴 + 1) / 2) − 1))
3431, 33syl 17 . . . . . . . . . . . . . . . . . 18 (𝐴 ∈ ℤ → ((𝐴 − 1) / 2) = (((𝐴 + 1) / 2) − 1))
3534adantr 480 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 − 1) / 2) = (((𝐴 + 1) / 2) − 1))
3635eleq1d 2672 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((𝐴 − 1) / 2) ∈ ℤ ↔ (((𝐴 + 1) / 2) − 1) ∈ ℤ))
37 peano2z 11295 . . . . . . . . . . . . . . . . 17 ((((𝐴 + 1) / 2) − 1) ∈ ℤ → ((((𝐴 + 1) / 2) − 1) + 1) ∈ ℤ)
3831adantr 480 . . . . . . . . . . . . . . . . . . . . 21 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 𝐴 ∈ ℂ)
39 1cnd 9935 . . . . . . . . . . . . . . . . . . . . 21 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 1 ∈ ℂ)
4038, 39addcld 9938 . . . . . . . . . . . . . . . . . . . 20 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝐴 + 1) ∈ ℂ)
4140halfcld 11154 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 + 1) / 2) ∈ ℂ)
4241, 39npcand 10275 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((((𝐴 + 1) / 2) − 1) + 1) = ((𝐴 + 1) / 2))
4342eleq1d 2672 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((((𝐴 + 1) / 2) − 1) + 1) ∈ ℤ ↔ ((𝐴 + 1) / 2) ∈ ℤ))
4437, 43syl5ib 233 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((((𝐴 + 1) / 2) − 1) ∈ ℤ → ((𝐴 + 1) / 2) ∈ ℤ))
4536, 44sylbid 229 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((𝐴 − 1) / 2) ∈ ℤ → ((𝐴 + 1) / 2) ∈ ℤ))
46 mod0 12537 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℝ ∧ (2↑𝑁) ∈ ℝ+) → ((𝐴 mod (2↑𝑁)) = 0 ↔ (𝐴 / (2↑𝑁)) ∈ ℤ))
471, 6, 46syl2an 493 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 mod (2↑𝑁)) = 0 ↔ (𝐴 / (2↑𝑁)) ∈ ℤ))
4822nnzd 11357 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑁 ∈ ℕ → 2 ∈ ℤ)
49 nnm1nn0 11211 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℕ0)
50 zexpcl 12737 . . . . . . . . . . . . . . . . . . . . . . . 24 ((2 ∈ ℤ ∧ (𝑁 − 1) ∈ ℕ0) → (2↑(𝑁 − 1)) ∈ ℤ)
5148, 49, 50syl2anc 691 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑁 ∈ ℕ → (2↑(𝑁 − 1)) ∈ ℤ)
5251adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (2↑(𝑁 − 1)) ∈ ℤ)
5352adantr 480 . . . . . . . . . . . . . . . . . . . . 21 (((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) ∧ (𝐴 / (2↑𝑁)) ∈ ℤ) → (2↑(𝑁 − 1)) ∈ ℤ)
54 simpr 476 . . . . . . . . . . . . . . . . . . . . 21 (((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) ∧ (𝐴 / (2↑𝑁)) ∈ ℤ) → (𝐴 / (2↑𝑁)) ∈ ℤ)
5553, 54zmulcld 11364 . . . . . . . . . . . . . . . . . . . 20 (((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) ∧ (𝐴 / (2↑𝑁)) ∈ ℤ) → ((2↑(𝑁 − 1)) · (𝐴 / (2↑𝑁))) ∈ ℤ)
5655ex 449 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 / (2↑𝑁)) ∈ ℤ → ((2↑(𝑁 − 1)) · (𝐴 / (2↑𝑁))) ∈ ℤ))
575adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 𝑁 ∈ ℤ)
5857zcnd 11359 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 𝑁 ∈ ℂ)
5958, 39negsubd 10277 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑁 + -1) = (𝑁 − 1))
6059eqcomd 2616 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑁 − 1) = (𝑁 + -1))
6160oveq1d 6564 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝑁 − 1) − 𝑁) = ((𝑁 + -1) − 𝑁))
6239negcld 10258 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → -1 ∈ ℂ)
6358, 62pncan2d 10273 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝑁 + -1) − 𝑁) = -1)
6461, 63eqtrd 2644 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝑁 − 1) − 𝑁) = -1)
6564oveq2d 6565 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (2↑((𝑁 − 1) − 𝑁)) = (2↑-1))
66 2cnd 10970 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 2 ∈ ℂ)
67 2ne0 10990 . . . . . . . . . . . . . . . . . . . . . . . . 25 2 ≠ 0
6867a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 2 ≠ 0)
69 1zzd 11285 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑁 ∈ ℕ → 1 ∈ ℤ)
705, 69zsubcld 11363 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℤ)
7170, 5jca 553 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑁 ∈ ℕ → ((𝑁 − 1) ∈ ℤ ∧ 𝑁 ∈ ℤ))
7271adantl 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝑁 − 1) ∈ ℤ ∧ 𝑁 ∈ ℤ))
73 expsub 12770 . . . . . . . . . . . . . . . . . . . . . . . 24 (((2 ∈ ℂ ∧ 2 ≠ 0) ∧ ((𝑁 − 1) ∈ ℤ ∧ 𝑁 ∈ ℤ)) → (2↑((𝑁 − 1) − 𝑁)) = ((2↑(𝑁 − 1)) / (2↑𝑁)))
7466, 68, 72, 73syl21anc 1317 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (2↑((𝑁 − 1) − 𝑁)) = ((2↑(𝑁 − 1)) / (2↑𝑁)))
75 expn1 12732 . . . . . . . . . . . . . . . . . . . . . . . 24 (2 ∈ ℂ → (2↑-1) = (1 / 2))
7666, 75syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (2↑-1) = (1 / 2))
7765, 74, 763eqtr3d 2652 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((2↑(𝑁 − 1)) / (2↑𝑁)) = (1 / 2))
7877oveq2d 6565 . . . . . . . . . . . . . . . . . . . . 21 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝐴 · ((2↑(𝑁 − 1)) / (2↑𝑁))) = (𝐴 · (1 / 2)))
79 2cnd 10970 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑁 ∈ ℕ → 2 ∈ ℂ)
8079, 49expcld 12870 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑁 ∈ ℕ → (2↑(𝑁 − 1)) ∈ ℂ)
8180adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (2↑(𝑁 − 1)) ∈ ℂ)
823a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 2 ∈ ℝ+)
8382, 57rpexpcld 12894 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (2↑𝑁) ∈ ℝ+)
8483rpcnne0d 11757 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((2↑𝑁) ∈ ℂ ∧ (2↑𝑁) ≠ 0))
85 div12 10586 . . . . . . . . . . . . . . . . . . . . . 22 (((2↑(𝑁 − 1)) ∈ ℂ ∧ 𝐴 ∈ ℂ ∧ ((2↑𝑁) ∈ ℂ ∧ (2↑𝑁) ≠ 0)) → ((2↑(𝑁 − 1)) · (𝐴 / (2↑𝑁))) = (𝐴 · ((2↑(𝑁 − 1)) / (2↑𝑁))))
8681, 38, 84, 85syl3anc 1318 . . . . . . . . . . . . . . . . . . . . 21 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((2↑(𝑁 − 1)) · (𝐴 / (2↑𝑁))) = (𝐴 · ((2↑(𝑁 − 1)) / (2↑𝑁))))
8738, 66, 68divrecd 10683 . . . . . . . . . . . . . . . . . . . . 21 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝐴 / 2) = (𝐴 · (1 / 2)))
8878, 86, 873eqtr4d 2654 . . . . . . . . . . . . . . . . . . . 20 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((2↑(𝑁 − 1)) · (𝐴 / (2↑𝑁))) = (𝐴 / 2))
8988eleq1d 2672 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((2↑(𝑁 − 1)) · (𝐴 / (2↑𝑁))) ∈ ℤ ↔ (𝐴 / 2) ∈ ℤ))
9056, 89sylibd 228 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 / (2↑𝑁)) ∈ ℤ → (𝐴 / 2) ∈ ℤ))
9147, 90sylbid 229 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 mod (2↑𝑁)) = 0 → (𝐴 / 2) ∈ ℤ))
92 zeo2 11340 . . . . . . . . . . . . . . . . . 18 (𝐴 ∈ ℤ → ((𝐴 / 2) ∈ ℤ ↔ ¬ ((𝐴 + 1) / 2) ∈ ℤ))
9392adantr 480 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 / 2) ∈ ℤ ↔ ¬ ((𝐴 + 1) / 2) ∈ ℤ))
9491, 93sylibd 228 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 mod (2↑𝑁)) = 0 → ¬ ((𝐴 + 1) / 2) ∈ ℤ))
9594necon2ad 2797 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((𝐴 + 1) / 2) ∈ ℤ → (𝐴 mod (2↑𝑁)) ≠ 0))
9630, 45, 953syld 58 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((𝐴 − 1) / 2) ∈ ℕ → (𝐴 mod (2↑𝑁)) ≠ 0))
9796ex 449 . . . . . . . . . . . . 13 (𝐴 ∈ ℤ → (𝑁 ∈ ℕ → (((𝐴 − 1) / 2) ∈ ℕ → (𝐴 mod (2↑𝑁)) ≠ 0)))
9897com23 84 . . . . . . . . . . . 12 (𝐴 ∈ ℤ → (((𝐴 − 1) / 2) ∈ ℕ → (𝑁 ∈ ℕ → (𝐴 mod (2↑𝑁)) ≠ 0)))
99983imp 1249 . . . . . . . . . . 11 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝐴 mod (2↑𝑁)) ≠ 0)
10099neneqd 2787 . . . . . . . . . 10 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ¬ (𝐴 mod (2↑𝑁)) = 0)
101100iffalsed 4047 . . . . . . . . 9 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → if((𝐴 mod (2↑𝑁)) = 0, ((2↑𝑁) − 1), -1) = -1)
10228, 101eqtrd 2644 . . . . . . . 8 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((𝐴 − 1) mod (2↑𝑁)) − (𝐴 mod (2↑𝑁))) = -1)
103 neg1lt0 11004 . . . . . . . . . 10 -1 < 0
104 2re 10967 . . . . . . . . . . . . 13 2 ∈ ℝ
105 1lt2 11071 . . . . . . . . . . . . 13 1 < 2
106 expgt1 12760 . . . . . . . . . . . . 13 ((2 ∈ ℝ ∧ 𝑁 ∈ ℕ ∧ 1 < 2) → 1 < (2↑𝑁))
107104, 105, 106mp3an13 1407 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → 1 < (2↑𝑁))
108 1red 9934 . . . . . . . . . . . . 13 (𝑁 ∈ ℕ → 1 ∈ ℝ)
109108, 7posdifd 10493 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → (1 < (2↑𝑁) ↔ 0 < ((2↑𝑁) − 1)))
110107, 109mpbid 221 . . . . . . . . . . 11 (𝑁 ∈ ℕ → 0 < ((2↑𝑁) − 1))
111108renegcld 10336 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → -1 ∈ ℝ)
112 0red 9920 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → 0 ∈ ℝ)
1137, 108resubcld 10337 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → ((2↑𝑁) − 1) ∈ ℝ)
114 lttr 9993 . . . . . . . . . . . 12 ((-1 ∈ ℝ ∧ 0 ∈ ℝ ∧ ((2↑𝑁) − 1) ∈ ℝ) → ((-1 < 0 ∧ 0 < ((2↑𝑁) − 1)) → -1 < ((2↑𝑁) − 1)))
115111, 112, 113, 114syl3anc 1318 . . . . . . . . . . 11 (𝑁 ∈ ℕ → ((-1 < 0 ∧ 0 < ((2↑𝑁) − 1)) → -1 < ((2↑𝑁) − 1)))
116110, 115mpan2d 706 . . . . . . . . . 10 (𝑁 ∈ ℕ → (-1 < 0 → -1 < ((2↑𝑁) − 1)))
117103, 116mpi 20 . . . . . . . . 9 (𝑁 ∈ ℕ → -1 < ((2↑𝑁) − 1))
1181173ad2ant3 1077 . . . . . . . 8 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → -1 < ((2↑𝑁) − 1))
119102, 118eqbrtrd 4605 . . . . . . 7 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((𝐴 − 1) mod (2↑𝑁)) − (𝐴 mod (2↑𝑁))) < ((2↑𝑁) − 1))
1202, 10modcld 12536 . . . . . . . 8 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝐴 mod (2↑𝑁)) ∈ ℝ)
121 ltsubadd2b 42100 . . . . . . . 8 (((1 ∈ ℝ ∧ (2↑𝑁) ∈ ℝ) ∧ ((𝐴 mod (2↑𝑁)) ∈ ℝ ∧ ((𝐴 − 1) mod (2↑𝑁)) ∈ ℝ)) → ((((𝐴 − 1) mod (2↑𝑁)) − (𝐴 mod (2↑𝑁))) < ((2↑𝑁) − 1) ↔ (1 + ((𝐴 − 1) mod (2↑𝑁))) < ((2↑𝑁) + (𝐴 mod (2↑𝑁)))))
12218, 8, 120, 16, 121syl22anc 1319 . . . . . . 7 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((((𝐴 − 1) mod (2↑𝑁)) − (𝐴 mod (2↑𝑁))) < ((2↑𝑁) − 1) ↔ (1 + ((𝐴 − 1) mod (2↑𝑁))) < ((2↑𝑁) + (𝐴 mod (2↑𝑁)))))
123119, 122mpbid 221 . . . . . 6 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (1 + ((𝐴 − 1) mod (2↑𝑁))) < ((2↑𝑁) + (𝐴 mod (2↑𝑁))))
124 modid0 12558 . . . . . . . . . . . 12 ((2↑𝑁) ∈ ℝ+ → ((2↑𝑁) mod (2↑𝑁)) = 0)
12510, 124syl 17 . . . . . . . . . . 11 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((2↑𝑁) mod (2↑𝑁)) = 0)
126125oveq2d 6565 . . . . . . . . . 10 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 mod (2↑𝑁)) − ((2↑𝑁) mod (2↑𝑁))) = ((𝐴 mod (2↑𝑁)) − 0))
127120recnd 9947 . . . . . . . . . . 11 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝐴 mod (2↑𝑁)) ∈ ℂ)
128127subid1d 10260 . . . . . . . . . 10 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 mod (2↑𝑁)) − 0) = (𝐴 mod (2↑𝑁)))
129126, 128eqtrd 2644 . . . . . . . . 9 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 mod (2↑𝑁)) − ((2↑𝑁) mod (2↑𝑁))) = (𝐴 mod (2↑𝑁)))
130129oveq1d 6564 . . . . . . . 8 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((𝐴 mod (2↑𝑁)) − ((2↑𝑁) mod (2↑𝑁))) mod (2↑𝑁)) = ((𝐴 mod (2↑𝑁)) mod (2↑𝑁)))
131 modsubmodmod 12591 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ (2↑𝑁) ∈ ℝ ∧ (2↑𝑁) ∈ ℝ+) → (((𝐴 mod (2↑𝑁)) − ((2↑𝑁) mod (2↑𝑁))) mod (2↑𝑁)) = ((𝐴 − (2↑𝑁)) mod (2↑𝑁)))
1322, 8, 10, 131syl3anc 1318 . . . . . . . 8 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((𝐴 mod (2↑𝑁)) − ((2↑𝑁) mod (2↑𝑁))) mod (2↑𝑁)) = ((𝐴 − (2↑𝑁)) mod (2↑𝑁)))
133 modabs2 12566 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ (2↑𝑁) ∈ ℝ+) → ((𝐴 mod (2↑𝑁)) mod (2↑𝑁)) = (𝐴 mod (2↑𝑁)))
1342, 10, 133syl2anc 691 . . . . . . . 8 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 mod (2↑𝑁)) mod (2↑𝑁)) = (𝐴 mod (2↑𝑁)))
135130, 132, 1343eqtr3d 2652 . . . . . . 7 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − (2↑𝑁)) mod (2↑𝑁)) = (𝐴 mod (2↑𝑁)))
136135oveq2d 6565 . . . . . 6 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((2↑𝑁) + ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) = ((2↑𝑁) + (𝐴 mod (2↑𝑁))))
137123, 136breqtrrd 4611 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (1 + ((𝐴 − 1) mod (2↑𝑁))) < ((2↑𝑁) + ((𝐴 − (2↑𝑁)) mod (2↑𝑁))))
13819, 20, 2, 137ltsub2dd 10519 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝐴 − ((2↑𝑁) + ((𝐴 − (2↑𝑁)) mod (2↑𝑁)))) < (𝐴 − (1 + ((𝐴 − 1) mod (2↑𝑁)))))
139313ad2ant1 1075 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝐴 ∈ ℂ)
1408recnd 9947 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2↑𝑁) ∈ ℂ)
14111recnd 9947 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − (2↑𝑁)) mod (2↑𝑁)) ∈ ℂ)
142139, 140, 141subsub4d 10302 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − (2↑𝑁)) − ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) = (𝐴 − ((2↑𝑁) + ((𝐴 − (2↑𝑁)) mod (2↑𝑁)))))
143 1cnd 9935 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → 1 ∈ ℂ)
14416recnd 9947 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − 1) mod (2↑𝑁)) ∈ ℂ)
145139, 143, 144subsub4d 10302 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − 1) − ((𝐴 − 1) mod (2↑𝑁))) = (𝐴 − (1 + ((𝐴 − 1) mod (2↑𝑁)))))
146138, 142, 1453brtr4d 4615 . . 3 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − (2↑𝑁)) − ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) < ((𝐴 − 1) − ((𝐴 − 1) mod (2↑𝑁))))
14712, 17, 10, 146ltdiv1dd 11805 . 2 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((𝐴 − (2↑𝑁)) − ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) / (2↑𝑁)) < (((𝐴 − 1) − ((𝐴 − 1) mod (2↑𝑁))) / (2↑𝑁)))
1487recnd 9947 . . . . 5 (𝑁 ∈ ℕ → (2↑𝑁) ∈ ℂ)
1491483ad2ant3 1077 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2↑𝑁) ∈ ℂ)
15067a1i 11 . . . . . 6 (𝑁 ∈ ℕ → 2 ≠ 0)
15179, 150, 5expne0d 12876 . . . . 5 (𝑁 ∈ ℕ → (2↑𝑁) ≠ 0)
1521513ad2ant3 1077 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2↑𝑁) ≠ 0)
153 divsub1dir 42101 . . . . 5 ((𝐴 ∈ ℂ ∧ (2↑𝑁) ∈ ℂ ∧ (2↑𝑁) ≠ 0) → ((𝐴 / (2↑𝑁)) − 1) = ((𝐴 − (2↑𝑁)) / (2↑𝑁)))
154153fveq2d 6107 . . . 4 ((𝐴 ∈ ℂ ∧ (2↑𝑁) ∈ ℂ ∧ (2↑𝑁) ≠ 0) → (⌊‘((𝐴 / (2↑𝑁)) − 1)) = (⌊‘((𝐴 − (2↑𝑁)) / (2↑𝑁))))
155139, 149, 152, 154syl3anc 1318 . . 3 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((𝐴 / (2↑𝑁)) − 1)) = (⌊‘((𝐴 − (2↑𝑁)) / (2↑𝑁))))
156 fldivmod 42107 . . . 4 (((𝐴 − (2↑𝑁)) ∈ ℝ ∧ (2↑𝑁) ∈ ℝ+) → (⌊‘((𝐴 − (2↑𝑁)) / (2↑𝑁))) = (((𝐴 − (2↑𝑁)) − ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) / (2↑𝑁)))
1579, 10, 156syl2anc 691 . . 3 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((𝐴 − (2↑𝑁)) / (2↑𝑁))) = (((𝐴 − (2↑𝑁)) − ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) / (2↑𝑁)))
158155, 157eqtrd 2644 . 2 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((𝐴 / (2↑𝑁)) − 1)) = (((𝐴 − (2↑𝑁)) − ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) / (2↑𝑁)))
159 fldivmod 42107 . . 3 (((𝐴 − 1) ∈ ℝ ∧ (2↑𝑁) ∈ ℝ+) → (⌊‘((𝐴 − 1) / (2↑𝑁))) = (((𝐴 − 1) − ((𝐴 − 1) mod (2↑𝑁))) / (2↑𝑁)))
16015, 10, 159syl2anc 691 . 2 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((𝐴 − 1) / (2↑𝑁))) = (((𝐴 − 1) − ((𝐴 − 1) mod (2↑𝑁))) / (2↑𝑁)))
161147, 158, 1603brtr4d 4615 1 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((𝐴 / (2↑𝑁)) − 1)) < (⌊‘((𝐴 − 1) / (2↑𝑁))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 195  wa 383  w3a 1031   = wceq 1475  wcel 1977  wne 2780  ifcif 4036   class class class wbr 4583  cfv 5804  (class class class)co 6549  cc 9813  cr 9814  0cc0 9815  1c1 9816   + caddc 9818   · cmul 9820   < clt 9953  cmin 10145  -cneg 10146   / cdiv 10563  cn 10897  2c2 10947  0cn0 11169  cz 11254  +crp 11708  cfl 12453   mod cmo 12530  cexp 12722
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847  ax-cnex 9871  ax-resscn 9872  ax-1cn 9873  ax-icn 9874  ax-addcl 9875  ax-addrcl 9876  ax-mulcl 9877  ax-mulrcl 9878  ax-mulcom 9879  ax-addass 9880  ax-mulass 9881  ax-distr 9882  ax-i2m1 9883  ax-1ne0 9884  ax-1rid 9885  ax-rnegex 9886  ax-rrecex 9887  ax-cnre 9888  ax-pre-lttri 9889  ax-pre-lttrn 9890  ax-pre-ltadd 9891  ax-pre-mulgt0 9892  ax-pre-sup 9893
This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3or 1032  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-nel 2783  df-ral 2901  df-rex 2902  df-reu 2903  df-rmo 2904  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-pss 3556  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-tp 4130  df-op 4132  df-uni 4373  df-iun 4457  df-br 4584  df-opab 4644  df-mpt 4645  df-tr 4681  df-eprel 4949  df-id 4953  df-po 4959  df-so 4960  df-fr 4997  df-we 4999  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-pred 5597  df-ord 5643  df-on 5644  df-lim 5645  df-suc 5646  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-riota 6511  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-om 6958  df-1st 7059  df-2nd 7060  df-wrecs 7294  df-recs 7355  df-rdg 7393  df-er 7629  df-en 7842  df-dom 7843  df-sdom 7844  df-sup 8231  df-inf 8232  df-pnf 9955  df-mnf 9956  df-xr 9957  df-ltxr 9958  df-le 9959  df-sub 10147  df-neg 10148  df-div 10564  df-nn 10898  df-2 10956  df-n0 11170  df-z 11255  df-uz 11564  df-rp 11709  df-fz 12198  df-fzo 12335  df-fl 12455  df-mod 12531  df-seq 12664  df-exp 12723
This theorem is referenced by:  dignn0flhalflem2  42208
  Copyright terms: Public domain W3C validator