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 49106
Description: Lemma 1 for dignn0flhalf 49109. (Contributed by AV, 7-Jun-2012.)
Assertion
Ref Expression
dignn0flhalflem1 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((𝐴 / (2↑𝑁)) − 1)) < (⌊‘((𝐴 − 1) / (2↑𝑁))))

Proof of Theorem dignn0flhalflem1
StepHypRef Expression
1 zre 12522 . . . . . 6 (𝐴 ∈ ℤ → 𝐴 ∈ ℝ)
213ad2ant1 1134 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝐴 ∈ ℝ)
3 2rp 12941 . . . . . . . . 9 2 ∈ ℝ+
43a1i 11 . . . . . . . 8 (𝑁 ∈ ℕ → 2 ∈ ℝ+)
5 nnz 12539 . . . . . . . 8 (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
64, 5rpexpcld 14203 . . . . . . 7 (𝑁 ∈ ℕ → (2↑𝑁) ∈ ℝ+)
76rpred 12980 . . . . . 6 (𝑁 ∈ ℕ → (2↑𝑁) ∈ ℝ)
873ad2ant3 1136 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2↑𝑁) ∈ ℝ)
92, 8resubcld 11572 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝐴 − (2↑𝑁)) ∈ ℝ)
1063ad2ant3 1136 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2↑𝑁) ∈ ℝ+)
119, 10modcld 13828 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − (2↑𝑁)) mod (2↑𝑁)) ∈ ℝ)
129, 11resubcld 11572 . . 3 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − (2↑𝑁)) − ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) ∈ ℝ)
13 peano2zm 12564 . . . . . 6 (𝐴 ∈ ℤ → (𝐴 − 1) ∈ ℤ)
1413zred 12627 . . . . 5 (𝐴 ∈ ℤ → (𝐴 − 1) ∈ ℝ)
15143ad2ant1 1134 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝐴 − 1) ∈ ℝ)
1615, 10modcld 13828 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − 1) mod (2↑𝑁)) ∈ ℝ)
1715, 16resubcld 11572 . . 3 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − 1) − ((𝐴 − 1) mod (2↑𝑁))) ∈ ℝ)
18 1red 11139 . . . . . 6 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → 1 ∈ ℝ)
1918, 16readdcld 11168 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (1 + ((𝐴 − 1) mod (2↑𝑁))) ∈ ℝ)
208, 11readdcld 11168 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((2↑𝑁) + ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) ∈ ℝ)
21 2nn 12248 . . . . . . . . . . . . . 14 2 ∈ ℕ
2221a1i 11 . . . . . . . . . . . . 13 (𝑁 ∈ ℕ → 2 ∈ ℕ)
23 nnnn0 12438 . . . . . . . . . . . . 13 (𝑁 ∈ ℕ → 𝑁 ∈ ℕ0)
2422, 23nnexpcld 14201 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → (2↑𝑁) ∈ ℕ)
2524anim2i 618 . . . . . . . . . . 11 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝐴 ∈ ℤ ∧ (2↑𝑁) ∈ ℕ))
26253adant2 1132 . . . . . . . . . 10 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝐴 ∈ ℤ ∧ (2↑𝑁) ∈ ℕ))
27 m1modmmod 47827 . . . . . . . . . 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 12539 . . . . . . . . . . . . . . . 16 (((𝐴 − 1) / 2) ∈ ℕ → ((𝐴 − 1) / 2) ∈ ℤ)
3029a1i 11 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((𝐴 − 1) / 2) ∈ ℕ → ((𝐴 − 1) / 2) ∈ ℤ))
31 zcn 12523 . . . . . . . . . . . . . . . . . . 19 (𝐴 ∈ ℤ → 𝐴 ∈ ℂ)
32 xp1d2m1eqxm1d2 12425 . . . . . . . . . . . . . . . . . . . 20 (𝐴 ∈ ℂ → (((𝐴 + 1) / 2) − 1) = ((𝐴 − 1) / 2))
3332eqcomd 2743 . . . . . . . . . . . . . . . . . . 19 (𝐴 ∈ ℂ → ((𝐴 − 1) / 2) = (((𝐴 + 1) / 2) − 1))
3431, 33syl 17 . . . . . . . . . . . . . . . . . 18 (𝐴 ∈ ℤ → ((𝐴 − 1) / 2) = (((𝐴 + 1) / 2) − 1))
3534adantr 480 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 − 1) / 2) = (((𝐴 + 1) / 2) − 1))
3635eleq1d 2822 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((𝐴 − 1) / 2) ∈ ℤ ↔ (((𝐴 + 1) / 2) − 1) ∈ ℤ))
37 peano2z 12562 . . . . . . . . . . . . . . . . 17 ((((𝐴 + 1) / 2) − 1) ∈ ℤ → ((((𝐴 + 1) / 2) − 1) + 1) ∈ ℤ)
3831adantr 480 . . . . . . . . . . . . . . . . . . . . 21 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 𝐴 ∈ ℂ)
39 1cnd 11133 . . . . . . . . . . . . . . . . . . . . 21 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 1 ∈ ℂ)
4038, 39addcld 11158 . . . . . . . . . . . . . . . . . . . 20 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝐴 + 1) ∈ ℂ)
4140halfcld 12416 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 + 1) / 2) ∈ ℂ)
4241, 39npcand 11503 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((((𝐴 + 1) / 2) − 1) + 1) = ((𝐴 + 1) / 2))
4342eleq1d 2822 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((((𝐴 + 1) / 2) − 1) + 1) ∈ ℤ ↔ ((𝐴 + 1) / 2) ∈ ℤ))
4437, 43imbitrid 244 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((((𝐴 + 1) / 2) − 1) ∈ ℤ → ((𝐴 + 1) / 2) ∈ ℤ))
4536, 44sylbid 240 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((𝐴 − 1) / 2) ∈ ℤ → ((𝐴 + 1) / 2) ∈ ℤ))
46 mod0 13829 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℝ ∧ (2↑𝑁) ∈ ℝ+) → ((𝐴 mod (2↑𝑁)) = 0 ↔ (𝐴 / (2↑𝑁)) ∈ ℤ))
471, 6, 46syl2an 597 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 mod (2↑𝑁)) = 0 ↔ (𝐴 / (2↑𝑁)) ∈ ℤ))
4822nnzd 12544 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑁 ∈ ℕ → 2 ∈ ℤ)
49 nnm1nn0 12472 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℕ0)
50 zexpcl 14032 . . . . . . . . . . . . . . . . . . . . . . . 24 ((2 ∈ ℤ ∧ (𝑁 − 1) ∈ ℕ0) → (2↑(𝑁 − 1)) ∈ ℤ)
5148, 49, 50syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑁 ∈ ℕ → (2↑(𝑁 − 1)) ∈ ℤ)
5251adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (2↑(𝑁 − 1)) ∈ ℤ)
5352adantr 480 . . . . . . . . . . . . . . . . . . . . 21 (((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) ∧ (𝐴 / (2↑𝑁)) ∈ ℤ) → (2↑(𝑁 − 1)) ∈ ℤ)
54 simpr 484 . . . . . . . . . . . . . . . . . . . . 21 (((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) ∧ (𝐴 / (2↑𝑁)) ∈ ℤ) → (𝐴 / (2↑𝑁)) ∈ ℤ)
5553, 54zmulcld 12633 . . . . . . . . . . . . . . . . . . . 20 (((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) ∧ (𝐴 / (2↑𝑁)) ∈ ℤ) → ((2↑(𝑁 − 1)) · (𝐴 / (2↑𝑁))) ∈ ℤ)
5655ex 412 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 / (2↑𝑁)) ∈ ℤ → ((2↑(𝑁 − 1)) · (𝐴 / (2↑𝑁))) ∈ ℤ))
575adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 𝑁 ∈ ℤ)
5857zcnd 12628 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 𝑁 ∈ ℂ)
5939negcld 11486 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → -1 ∈ ℂ)
6058, 39negsubd 11505 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑁 + -1) = (𝑁 − 1))
6160eqcomd 2743 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝑁 − 1) = (𝑁 + -1))
6258, 59, 61mvrladdd 11557 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝑁 − 1) − 𝑁) = -1)
6362oveq2d 7377 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (2↑((𝑁 − 1) − 𝑁)) = (2↑-1))
64 2cnd 12253 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 2 ∈ ℂ)
65 2ne0 12279 . . . . . . . . . . . . . . . . . . . . . . . . 25 2 ≠ 0
6665a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 2 ≠ 0)
67 1zzd 12552 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑁 ∈ ℕ → 1 ∈ ℤ)
685, 67zsubcld 12632 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑁 ∈ ℕ → (𝑁 − 1) ∈ ℤ)
6968, 5jca 511 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑁 ∈ ℕ → ((𝑁 − 1) ∈ ℤ ∧ 𝑁 ∈ ℤ))
7069adantl 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝑁 − 1) ∈ ℤ ∧ 𝑁 ∈ ℤ))
71 expsub 14066 . . . . . . . . . . . . . . . . . . . . . . . 24 (((2 ∈ ℂ ∧ 2 ≠ 0) ∧ ((𝑁 − 1) ∈ ℤ ∧ 𝑁 ∈ ℤ)) → (2↑((𝑁 − 1) − 𝑁)) = ((2↑(𝑁 − 1)) / (2↑𝑁)))
7264, 66, 70, 71syl21anc 838 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (2↑((𝑁 − 1) − 𝑁)) = ((2↑(𝑁 − 1)) / (2↑𝑁)))
73 expn1 14027 . . . . . . . . . . . . . . . . . . . . . . . 24 (2 ∈ ℂ → (2↑-1) = (1 / 2))
7464, 73syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (2↑-1) = (1 / 2))
7563, 72, 743eqtr3d 2780 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((2↑(𝑁 − 1)) / (2↑𝑁)) = (1 / 2))
7675oveq2d 7377 . . . . . . . . . . . . . . . . . . . . 21 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝐴 · ((2↑(𝑁 − 1)) / (2↑𝑁))) = (𝐴 · (1 / 2)))
77 2cnd 12253 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑁 ∈ ℕ → 2 ∈ ℂ)
7877, 49expcld 14102 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑁 ∈ ℕ → (2↑(𝑁 − 1)) ∈ ℂ)
7978adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (2↑(𝑁 − 1)) ∈ ℂ)
803a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → 2 ∈ ℝ+)
8180, 57rpexpcld 14203 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (2↑𝑁) ∈ ℝ+)
8281rpcnne0d 12989 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((2↑𝑁) ∈ ℂ ∧ (2↑𝑁) ≠ 0))
83 div12 11825 . . . . . . . . . . . . . . . . . . . . . 22 (((2↑(𝑁 − 1)) ∈ ℂ ∧ 𝐴 ∈ ℂ ∧ ((2↑𝑁) ∈ ℂ ∧ (2↑𝑁) ≠ 0)) → ((2↑(𝑁 − 1)) · (𝐴 / (2↑𝑁))) = (𝐴 · ((2↑(𝑁 − 1)) / (2↑𝑁))))
8479, 38, 82, 83syl3anc 1374 . . . . . . . . . . . . . . . . . . . . 21 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((2↑(𝑁 − 1)) · (𝐴 / (2↑𝑁))) = (𝐴 · ((2↑(𝑁 − 1)) / (2↑𝑁))))
8538, 64, 66divrecd 11928 . . . . . . . . . . . . . . . . . . . . 21 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (𝐴 / 2) = (𝐴 · (1 / 2)))
8676, 84, 853eqtr4d 2782 . . . . . . . . . . . . . . . . . . . 20 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((2↑(𝑁 − 1)) · (𝐴 / (2↑𝑁))) = (𝐴 / 2))
8786eleq1d 2822 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((2↑(𝑁 − 1)) · (𝐴 / (2↑𝑁))) ∈ ℤ ↔ (𝐴 / 2) ∈ ℤ))
8856, 87sylibd 239 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 / (2↑𝑁)) ∈ ℤ → (𝐴 / 2) ∈ ℤ))
8947, 88sylbid 240 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 mod (2↑𝑁)) = 0 → (𝐴 / 2) ∈ ℤ))
90 zeo2 12610 . . . . . . . . . . . . . . . . . 18 (𝐴 ∈ ℤ → ((𝐴 / 2) ∈ ℤ ↔ ¬ ((𝐴 + 1) / 2) ∈ ℤ))
9190adantr 480 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 / 2) ∈ ℤ ↔ ¬ ((𝐴 + 1) / 2) ∈ ℤ))
9289, 91sylibd 239 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝐴 mod (2↑𝑁)) = 0 → ¬ ((𝐴 + 1) / 2) ∈ ℤ))
9392necon2ad 2948 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((𝐴 + 1) / 2) ∈ ℤ → (𝐴 mod (2↑𝑁)) ≠ 0))
9430, 45, 933syld 60 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((𝐴 − 1) / 2) ∈ ℕ → (𝐴 mod (2↑𝑁)) ≠ 0))
9594ex 412 . . . . . . . . . . . . 13 (𝐴 ∈ ℤ → (𝑁 ∈ ℕ → (((𝐴 − 1) / 2) ∈ ℕ → (𝐴 mod (2↑𝑁)) ≠ 0)))
9695com23 86 . . . . . . . . . . . 12 (𝐴 ∈ ℤ → (((𝐴 − 1) / 2) ∈ ℕ → (𝑁 ∈ ℕ → (𝐴 mod (2↑𝑁)) ≠ 0)))
97963imp 1111 . . . . . . . . . . 11 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝐴 mod (2↑𝑁)) ≠ 0)
9897neneqd 2938 . . . . . . . . . 10 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ¬ (𝐴 mod (2↑𝑁)) = 0)
9998iffalsed 4478 . . . . . . . . 9 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → if((𝐴 mod (2↑𝑁)) = 0, ((2↑𝑁) − 1), -1) = -1)
10028, 99eqtrd 2772 . . . . . . . 8 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((𝐴 − 1) mod (2↑𝑁)) − (𝐴 mod (2↑𝑁))) = -1)
101 neg1lt0 12141 . . . . . . . . . 10 -1 < 0
102 2re 12249 . . . . . . . . . . . . 13 2 ∈ ℝ
103 1lt2 12341 . . . . . . . . . . . . 13 1 < 2
104 expgt1 14056 . . . . . . . . . . . . 13 ((2 ∈ ℝ ∧ 𝑁 ∈ ℕ ∧ 1 < 2) → 1 < (2↑𝑁))
105102, 103, 104mp3an13 1455 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → 1 < (2↑𝑁))
106 1red 11139 . . . . . . . . . . . . 13 (𝑁 ∈ ℕ → 1 ∈ ℝ)
107106, 7posdifd 11731 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → (1 < (2↑𝑁) ↔ 0 < ((2↑𝑁) − 1)))
108105, 107mpbid 232 . . . . . . . . . . 11 (𝑁 ∈ ℕ → 0 < ((2↑𝑁) − 1))
109106renegcld 11571 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → -1 ∈ ℝ)
110 0red 11141 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → 0 ∈ ℝ)
1117, 106resubcld 11572 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → ((2↑𝑁) − 1) ∈ ℝ)
112 lttr 11216 . . . . . . . . . . . 12 ((-1 ∈ ℝ ∧ 0 ∈ ℝ ∧ ((2↑𝑁) − 1) ∈ ℝ) → ((-1 < 0 ∧ 0 < ((2↑𝑁) − 1)) → -1 < ((2↑𝑁) − 1)))
113109, 110, 111, 112syl3anc 1374 . . . . . . . . . . 11 (𝑁 ∈ ℕ → ((-1 < 0 ∧ 0 < ((2↑𝑁) − 1)) → -1 < ((2↑𝑁) − 1)))
114108, 113mpan2d 695 . . . . . . . . . 10 (𝑁 ∈ ℕ → (-1 < 0 → -1 < ((2↑𝑁) − 1)))
115101, 114mpi 20 . . . . . . . . 9 (𝑁 ∈ ℕ → -1 < ((2↑𝑁) − 1))
1161153ad2ant3 1136 . . . . . . . 8 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → -1 < ((2↑𝑁) − 1))
117100, 116eqbrtrd 5108 . . . . . . 7 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((𝐴 − 1) mod (2↑𝑁)) − (𝐴 mod (2↑𝑁))) < ((2↑𝑁) − 1))
1182, 10modcld 13828 . . . . . . . 8 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝐴 mod (2↑𝑁)) ∈ ℝ)
119 ltsubadd2b 49007 . . . . . . . 8 (((1 ∈ ℝ ∧ (2↑𝑁) ∈ ℝ) ∧ ((𝐴 mod (2↑𝑁)) ∈ ℝ ∧ ((𝐴 − 1) mod (2↑𝑁)) ∈ ℝ)) → ((((𝐴 − 1) mod (2↑𝑁)) − (𝐴 mod (2↑𝑁))) < ((2↑𝑁) − 1) ↔ (1 + ((𝐴 − 1) mod (2↑𝑁))) < ((2↑𝑁) + (𝐴 mod (2↑𝑁)))))
12018, 8, 118, 16, 119syl22anc 839 . . . . . . 7 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((((𝐴 − 1) mod (2↑𝑁)) − (𝐴 mod (2↑𝑁))) < ((2↑𝑁) − 1) ↔ (1 + ((𝐴 − 1) mod (2↑𝑁))) < ((2↑𝑁) + (𝐴 mod (2↑𝑁)))))
121117, 120mpbid 232 . . . . . 6 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (1 + ((𝐴 − 1) mod (2↑𝑁))) < ((2↑𝑁) + (𝐴 mod (2↑𝑁))))
122 modid0 13850 . . . . . . . . . . . 12 ((2↑𝑁) ∈ ℝ+ → ((2↑𝑁) mod (2↑𝑁)) = 0)
12310, 122syl 17 . . . . . . . . . . 11 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((2↑𝑁) mod (2↑𝑁)) = 0)
124123oveq2d 7377 . . . . . . . . . 10 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 mod (2↑𝑁)) − ((2↑𝑁) mod (2↑𝑁))) = ((𝐴 mod (2↑𝑁)) − 0))
125118recnd 11167 . . . . . . . . . . 11 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝐴 mod (2↑𝑁)) ∈ ℂ)
126125subid1d 11488 . . . . . . . . . 10 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 mod (2↑𝑁)) − 0) = (𝐴 mod (2↑𝑁)))
127124, 126eqtrd 2772 . . . . . . . . 9 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 mod (2↑𝑁)) − ((2↑𝑁) mod (2↑𝑁))) = (𝐴 mod (2↑𝑁)))
128127oveq1d 7376 . . . . . . . 8 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((𝐴 mod (2↑𝑁)) − ((2↑𝑁) mod (2↑𝑁))) mod (2↑𝑁)) = ((𝐴 mod (2↑𝑁)) mod (2↑𝑁)))
129 modsubmodmod 13886 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ (2↑𝑁) ∈ ℝ ∧ (2↑𝑁) ∈ ℝ+) → (((𝐴 mod (2↑𝑁)) − ((2↑𝑁) mod (2↑𝑁))) mod (2↑𝑁)) = ((𝐴 − (2↑𝑁)) mod (2↑𝑁)))
1302, 8, 10, 129syl3anc 1374 . . . . . . . 8 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((𝐴 mod (2↑𝑁)) − ((2↑𝑁) mod (2↑𝑁))) mod (2↑𝑁)) = ((𝐴 − (2↑𝑁)) mod (2↑𝑁)))
131 modabs2 13858 . . . . . . . . 9 ((𝐴 ∈ ℝ ∧ (2↑𝑁) ∈ ℝ+) → ((𝐴 mod (2↑𝑁)) mod (2↑𝑁)) = (𝐴 mod (2↑𝑁)))
1322, 10, 131syl2anc 585 . . . . . . . 8 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 mod (2↑𝑁)) mod (2↑𝑁)) = (𝐴 mod (2↑𝑁)))
133128, 130, 1323eqtr3d 2780 . . . . . . 7 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − (2↑𝑁)) mod (2↑𝑁)) = (𝐴 mod (2↑𝑁)))
134133oveq2d 7377 . . . . . 6 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((2↑𝑁) + ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) = ((2↑𝑁) + (𝐴 mod (2↑𝑁))))
135121, 134breqtrrd 5114 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (1 + ((𝐴 − 1) mod (2↑𝑁))) < ((2↑𝑁) + ((𝐴 − (2↑𝑁)) mod (2↑𝑁))))
13619, 20, 2, 135ltsub2dd 11757 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝐴 − ((2↑𝑁) + ((𝐴 − (2↑𝑁)) mod (2↑𝑁)))) < (𝐴 − (1 + ((𝐴 − 1) mod (2↑𝑁)))))
137313ad2ant1 1134 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝐴 ∈ ℂ)
1388recnd 11167 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2↑𝑁) ∈ ℂ)
13911recnd 11167 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − (2↑𝑁)) mod (2↑𝑁)) ∈ ℂ)
140137, 138, 139subsub4d 11530 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − (2↑𝑁)) − ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) = (𝐴 − ((2↑𝑁) + ((𝐴 − (2↑𝑁)) mod (2↑𝑁)))))
141 1cnd 11133 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → 1 ∈ ℂ)
14216recnd 11167 . . . . 5 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − 1) mod (2↑𝑁)) ∈ ℂ)
143137, 141, 142subsub4d 11530 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − 1) − ((𝐴 − 1) mod (2↑𝑁))) = (𝐴 − (1 + ((𝐴 − 1) mod (2↑𝑁)))))
144136, 140, 1433brtr4d 5118 . . 3 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 − (2↑𝑁)) − ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) < ((𝐴 − 1) − ((𝐴 − 1) mod (2↑𝑁))))
14512, 17, 10, 144ltdiv1dd 13037 . 2 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((𝐴 − (2↑𝑁)) − ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) / (2↑𝑁)) < (((𝐴 − 1) − ((𝐴 − 1) mod (2↑𝑁))) / (2↑𝑁)))
1467recnd 11167 . . . . 5 (𝑁 ∈ ℕ → (2↑𝑁) ∈ ℂ)
1471463ad2ant3 1136 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2↑𝑁) ∈ ℂ)
14865a1i 11 . . . . . 6 (𝑁 ∈ ℕ → 2 ≠ 0)
14977, 148, 5expne0d 14108 . . . . 5 (𝑁 ∈ ℕ → (2↑𝑁) ≠ 0)
1501493ad2ant3 1136 . . . 4 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2↑𝑁) ≠ 0)
151 divsub1dir 49008 . . . . 5 ((𝐴 ∈ ℂ ∧ (2↑𝑁) ∈ ℂ ∧ (2↑𝑁) ≠ 0) → ((𝐴 / (2↑𝑁)) − 1) = ((𝐴 − (2↑𝑁)) / (2↑𝑁)))
152151fveq2d 6839 . . . 4 ((𝐴 ∈ ℂ ∧ (2↑𝑁) ∈ ℂ ∧ (2↑𝑁) ≠ 0) → (⌊‘((𝐴 / (2↑𝑁)) − 1)) = (⌊‘((𝐴 − (2↑𝑁)) / (2↑𝑁))))
153137, 147, 150, 152syl3anc 1374 . . 3 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((𝐴 / (2↑𝑁)) − 1)) = (⌊‘((𝐴 − (2↑𝑁)) / (2↑𝑁))))
154 fldivmod 47807 . . . 4 (((𝐴 − (2↑𝑁)) ∈ ℝ ∧ (2↑𝑁) ∈ ℝ+) → (⌊‘((𝐴 − (2↑𝑁)) / (2↑𝑁))) = (((𝐴 − (2↑𝑁)) − ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) / (2↑𝑁)))
1559, 10, 154syl2anc 585 . . 3 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((𝐴 − (2↑𝑁)) / (2↑𝑁))) = (((𝐴 − (2↑𝑁)) − ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) / (2↑𝑁)))
156153, 155eqtrd 2772 . 2 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((𝐴 / (2↑𝑁)) − 1)) = (((𝐴 − (2↑𝑁)) − ((𝐴 − (2↑𝑁)) mod (2↑𝑁))) / (2↑𝑁)))
157 fldivmod 47807 . . 3 (((𝐴 − 1) ∈ ℝ ∧ (2↑𝑁) ∈ ℝ+) → (⌊‘((𝐴 − 1) / (2↑𝑁))) = (((𝐴 − 1) − ((𝐴 − 1) mod (2↑𝑁))) / (2↑𝑁)))
15815, 10, 157syl2anc 585 . 2 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((𝐴 − 1) / (2↑𝑁))) = (((𝐴 − 1) − ((𝐴 − 1) mod (2↑𝑁))) / (2↑𝑁)))
159145, 156, 1583brtr4d 5118 1 ((𝐴 ∈ ℤ ∧ ((𝐴 − 1) / 2) ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((𝐴 / (2↑𝑁)) − 1)) < (⌊‘((𝐴 − 1) / (2↑𝑁))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  w3a 1087   = wceq 1542  wcel 2114  wne 2933  ifcif 4467   class class class wbr 5086  cfv 6493  (class class class)co 7361  cc 11030  cr 11031  0cc0 11032  1c1 11033   + caddc 11035   · cmul 11037   < clt 11173  cmin 11371  -cneg 11372   / cdiv 11801  cn 12168  2c2 12230  0cn0 12431  cz 12518  +crp 12936  cfl 13743   mod cmo 13822  cexp 14017
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 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-sep 5232  ax-nul 5242  ax-pow 5303  ax-pr 5371  ax-un 7683  ax-cnex 11088  ax-resscn 11089  ax-1cn 11090  ax-icn 11091  ax-addcl 11092  ax-addrcl 11093  ax-mulcl 11094  ax-mulrcl 11095  ax-mulcom 11096  ax-addass 11097  ax-mulass 11098  ax-distr 11099  ax-i2m1 11100  ax-1ne0 11101  ax-1rid 11102  ax-rnegex 11103  ax-rrecex 11104  ax-cnre 11105  ax-pre-lttri 11106  ax-pre-lttrn 11107  ax-pre-ltadd 11108  ax-pre-mulgt0 11109  ax-pre-sup 11110
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-we 5580  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 6260  df-ord 6321  df-on 6322  df-lim 6323  df-suc 6324  df-iota 6449  df-fun 6495  df-fn 6496  df-f 6497  df-f1 6498  df-fo 6499  df-f1o 6500  df-fv 6501  df-riota 7318  df-ov 7364  df-oprab 7365  df-mpo 7366  df-om 7812  df-1st 7936  df-2nd 7937  df-frecs 8225  df-wrecs 8256  df-recs 8305  df-rdg 8343  df-er 8637  df-en 8888  df-dom 8889  df-sdom 8890  df-sup 9349  df-inf 9350  df-pnf 11175  df-mnf 11176  df-xr 11177  df-ltxr 11178  df-le 11179  df-sub 11373  df-neg 11374  df-div 11802  df-nn 12169  df-2 12238  df-n0 12432  df-z 12519  df-uz 12783  df-rp 12937  df-fz 13456  df-fzo 13603  df-fl 13745  df-mod 13823  df-seq 13958  df-exp 14018
This theorem is referenced by:  dignn0flhalflem2  49107
  Copyright terms: Public domain W3C validator