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

Theorem mbfi1fseqlem3 25759
Description: Lemma for mbfi1fseq 25763. (Contributed by Mario Carneiro, 16-Aug-2014.)
Hypotheses
Ref Expression
mbfi1fseq.1 (𝜑𝐹 ∈ MblFn)
mbfi1fseq.2 (𝜑𝐹:ℝ⟶(0[,)+∞))
mbfi1fseq.3 𝐽 = (𝑚 ∈ ℕ, 𝑦 ∈ ℝ ↦ ((⌊‘((𝐹𝑦) · (2↑𝑚))) / (2↑𝑚)))
mbfi1fseq.4 𝐺 = (𝑚 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (-𝑚[,]𝑚), if((𝑚𝐽𝑥) ≤ 𝑚, (𝑚𝐽𝑥), 𝑚), 0)))
Assertion
Ref Expression
mbfi1fseqlem3 ((𝜑𝐴 ∈ ℕ) → (𝐺𝐴):ℝ⟶ran (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))))
Distinct variable groups:   𝑥,𝑚,𝑦,𝐹   𝑥,𝐺   𝑚,𝐽   𝜑,𝑚,𝑥,𝑦   𝐴,𝑚,𝑥,𝑦
Allowed substitution hints:   𝐺(𝑦,𝑚)   𝐽(𝑥,𝑦)

Proof of Theorem mbfi1fseqlem3
StepHypRef Expression
1 mbfi1fseq.1 . . . 4 (𝜑𝐹 ∈ MblFn)
2 mbfi1fseq.2 . . . 4 (𝜑𝐹:ℝ⟶(0[,)+∞))
3 mbfi1fseq.3 . . . 4 𝐽 = (𝑚 ∈ ℕ, 𝑦 ∈ ℝ ↦ ((⌊‘((𝐹𝑦) · (2↑𝑚))) / (2↑𝑚)))
4 mbfi1fseq.4 . . . 4 𝐺 = (𝑚 ∈ ℕ ↦ (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (-𝑚[,]𝑚), if((𝑚𝐽𝑥) ≤ 𝑚, (𝑚𝐽𝑥), 𝑚), 0)))
51, 2, 3, 4mbfi1fseqlem2 25758 . . 3 (𝐴 ∈ ℕ → (𝐺𝐴) = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (-𝐴[,]𝐴), if((𝐴𝐽𝑥) ≤ 𝐴, (𝐴𝐽𝑥), 𝐴), 0)))
65adantl 485 . 2 ((𝜑𝐴 ∈ ℕ) → (𝐺𝐴) = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (-𝐴[,]𝐴), if((𝐴𝐽𝑥) ≤ 𝐴, (𝐴𝐽𝑥), 𝐴), 0)))
7 rge0ssre 13457 . . . . . . . . . . . . . . . . . 18 (0[,)+∞) ⊆ ℝ
8 simpr 488 . . . . . . . . . . . . . . . . . . 19 ((𝑚 ∈ ℕ ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
9 ffvelcdm 7058 . . . . . . . . . . . . . . . . . . 19 ((𝐹:ℝ⟶(0[,)+∞) ∧ 𝑦 ∈ ℝ) → (𝐹𝑦) ∈ (0[,)+∞))
102, 8, 9syl2an 605 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑦 ∈ ℝ)) → (𝐹𝑦) ∈ (0[,)+∞))
117, 10sselid 3934 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑦 ∈ ℝ)) → (𝐹𝑦) ∈ ℝ)
12 2nn 12288 . . . . . . . . . . . . . . . . . . . 20 2 ∈ ℕ
13 nnnn0 12485 . . . . . . . . . . . . . . . . . . . 20 (𝑚 ∈ ℕ → 𝑚 ∈ ℕ0)
14 nnexpcl 14084 . . . . . . . . . . . . . . . . . . . 20 ((2 ∈ ℕ ∧ 𝑚 ∈ ℕ0) → (2↑𝑚) ∈ ℕ)
1512, 13, 14sylancr 596 . . . . . . . . . . . . . . . . . . 19 (𝑚 ∈ ℕ → (2↑𝑚) ∈ ℕ)
1615ad2antrl 738 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑦 ∈ ℝ)) → (2↑𝑚) ∈ ℕ)
1716nnred 12222 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑦 ∈ ℝ)) → (2↑𝑚) ∈ ℝ)
1811, 17remulcld 11209 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑦 ∈ ℝ)) → ((𝐹𝑦) · (2↑𝑚)) ∈ ℝ)
19 reflcl 13803 . . . . . . . . . . . . . . . 16 (((𝐹𝑦) · (2↑𝑚)) ∈ ℝ → (⌊‘((𝐹𝑦) · (2↑𝑚))) ∈ ℝ)
2018, 19syl 17 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑦 ∈ ℝ)) → (⌊‘((𝐹𝑦) · (2↑𝑚))) ∈ ℝ)
2120, 16nndivred 12264 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑚 ∈ ℕ ∧ 𝑦 ∈ ℝ)) → ((⌊‘((𝐹𝑦) · (2↑𝑚))) / (2↑𝑚)) ∈ ℝ)
2221ralrimivva 3204 . . . . . . . . . . . . 13 (𝜑 → ∀𝑚 ∈ ℕ ∀𝑦 ∈ ℝ ((⌊‘((𝐹𝑦) · (2↑𝑚))) / (2↑𝑚)) ∈ ℝ)
233fmpo 8045 . . . . . . . . . . . . 13 (∀𝑚 ∈ ℕ ∀𝑦 ∈ ℝ ((⌊‘((𝐹𝑦) · (2↑𝑚))) / (2↑𝑚)) ∈ ℝ ↔ 𝐽:(ℕ × ℝ)⟶ℝ)
2422, 23sylib 220 . . . . . . . . . . . 12 (𝜑𝐽:(ℕ × ℝ)⟶ℝ)
25 fovcdm 7562 . . . . . . . . . . . 12 ((𝐽:(ℕ × ℝ)⟶ℝ ∧ 𝐴 ∈ ℕ ∧ 𝑥 ∈ ℝ) → (𝐴𝐽𝑥) ∈ ℝ)
2624, 25syl3an1 1175 . . . . . . . . . . 11 ((𝜑𝐴 ∈ ℕ ∧ 𝑥 ∈ ℝ) → (𝐴𝐽𝑥) ∈ ℝ)
27263expa 1130 . . . . . . . . . 10 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐴𝐽𝑥) ∈ ℝ)
28 nnre 12214 . . . . . . . . . . 11 (𝐴 ∈ ℕ → 𝐴 ∈ ℝ)
2928ad2antlr 737 . . . . . . . . . 10 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝐴 ∈ ℝ)
30 nnnn0 12485 . . . . . . . . . . . . 13 (𝐴 ∈ ℕ → 𝐴 ∈ ℕ0)
31 nnexpcl 14084 . . . . . . . . . . . . 13 ((2 ∈ ℕ ∧ 𝐴 ∈ ℕ0) → (2↑𝐴) ∈ ℕ)
3212, 30, 31sylancr 596 . . . . . . . . . . . 12 (𝐴 ∈ ℕ → (2↑𝐴) ∈ ℕ)
3332ad2antlr 737 . . . . . . . . . . 11 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (2↑𝐴) ∈ ℕ)
34 nnre 12214 . . . . . . . . . . . 12 ((2↑𝐴) ∈ ℕ → (2↑𝐴) ∈ ℝ)
35 nngt0 12241 . . . . . . . . . . . 12 ((2↑𝐴) ∈ ℕ → 0 < (2↑𝐴))
3634, 35jca 519 . . . . . . . . . . 11 ((2↑𝐴) ∈ ℕ → ((2↑𝐴) ∈ ℝ ∧ 0 < (2↑𝐴)))
3733, 36syl 17 . . . . . . . . . 10 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((2↑𝐴) ∈ ℝ ∧ 0 < (2↑𝐴)))
38 lemul1 12040 . . . . . . . . . 10 (((𝐴𝐽𝑥) ∈ ℝ ∧ 𝐴 ∈ ℝ ∧ ((2↑𝐴) ∈ ℝ ∧ 0 < (2↑𝐴))) → ((𝐴𝐽𝑥) ≤ 𝐴 ↔ ((𝐴𝐽𝑥) · (2↑𝐴)) ≤ (𝐴 · (2↑𝐴))))
3927, 29, 37, 38syl3anc 1389 . . . . . . . . 9 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐴𝐽𝑥) ≤ 𝐴 ↔ ((𝐴𝐽𝑥) · (2↑𝐴)) ≤ (𝐴 · (2↑𝐴))))
4039biimpa 480 . . . . . . . 8 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → ((𝐴𝐽𝑥) · (2↑𝐴)) ≤ (𝐴 · (2↑𝐴)))
41 simpr 488 . . . . . . . . . . . . . . . . . . 19 ((𝑚 = 𝐴𝑦 = 𝑥) → 𝑦 = 𝑥)
4241fveq2d 6867 . . . . . . . . . . . . . . . . . 18 ((𝑚 = 𝐴𝑦 = 𝑥) → (𝐹𝑦) = (𝐹𝑥))
43 simpl 486 . . . . . . . . . . . . . . . . . . 19 ((𝑚 = 𝐴𝑦 = 𝑥) → 𝑚 = 𝐴)
4443oveq2d 7408 . . . . . . . . . . . . . . . . . 18 ((𝑚 = 𝐴𝑦 = 𝑥) → (2↑𝑚) = (2↑𝐴))
4542, 44oveq12d 7410 . . . . . . . . . . . . . . . . 17 ((𝑚 = 𝐴𝑦 = 𝑥) → ((𝐹𝑦) · (2↑𝑚)) = ((𝐹𝑥) · (2↑𝐴)))
4645fveq2d 6867 . . . . . . . . . . . . . . . 16 ((𝑚 = 𝐴𝑦 = 𝑥) → (⌊‘((𝐹𝑦) · (2↑𝑚))) = (⌊‘((𝐹𝑥) · (2↑𝐴))))
4746, 44oveq12d 7410 . . . . . . . . . . . . . . 15 ((𝑚 = 𝐴𝑦 = 𝑥) → ((⌊‘((𝐹𝑦) · (2↑𝑚))) / (2↑𝑚)) = ((⌊‘((𝐹𝑥) · (2↑𝐴))) / (2↑𝐴)))
48 ovex 7425 . . . . . . . . . . . . . . 15 ((⌊‘((𝐹𝑥) · (2↑𝐴))) / (2↑𝐴)) ∈ V
4947, 3, 48ovmpoa 7547 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℕ ∧ 𝑥 ∈ ℝ) → (𝐴𝐽𝑥) = ((⌊‘((𝐹𝑥) · (2↑𝐴))) / (2↑𝐴)))
5049ad4ant23 763 . . . . . . . . . . . . 13 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (𝐴𝐽𝑥) = ((⌊‘((𝐹𝑥) · (2↑𝐴))) / (2↑𝐴)))
5150oveq1d 7407 . . . . . . . . . . . 12 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → ((𝐴𝐽𝑥) · (2↑𝐴)) = (((⌊‘((𝐹𝑥) · (2↑𝐴))) / (2↑𝐴)) · (2↑𝐴)))
522adantr 484 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝐴 ∈ ℕ) → 𝐹:ℝ⟶(0[,)+∞))
5352ffvelcdmda 7061 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹𝑥) ∈ (0[,)+∞))
54 elrege0 13455 . . . . . . . . . . . . . . . . . . 19 ((𝐹𝑥) ∈ (0[,)+∞) ↔ ((𝐹𝑥) ∈ ℝ ∧ 0 ≤ (𝐹𝑥)))
5553, 54sylib 220 . . . . . . . . . . . . . . . . . 18 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹𝑥) ∈ ℝ ∧ 0 ≤ (𝐹𝑥)))
5655simpld 498 . . . . . . . . . . . . . . . . 17 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐹𝑥) ∈ ℝ)
5733nnred 12222 . . . . . . . . . . . . . . . . 17 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (2↑𝐴) ∈ ℝ)
5856, 57remulcld 11209 . . . . . . . . . . . . . . . 16 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐹𝑥) · (2↑𝐴)) ∈ ℝ)
5933nnnn0d 12539 . . . . . . . . . . . . . . . . . 18 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (2↑𝐴) ∈ ℕ0)
6059nn0ge0d 12542 . . . . . . . . . . . . . . . . 17 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 0 ≤ (2↑𝐴))
61 mulge0 11702 . . . . . . . . . . . . . . . . 17 ((((𝐹𝑥) ∈ ℝ ∧ 0 ≤ (𝐹𝑥)) ∧ ((2↑𝐴) ∈ ℝ ∧ 0 ≤ (2↑𝐴))) → 0 ≤ ((𝐹𝑥) · (2↑𝐴)))
6255, 57, 60, 61syl12anc 847 . . . . . . . . . . . . . . . 16 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 0 ≤ ((𝐹𝑥) · (2↑𝐴)))
63 flge0nn0 13827 . . . . . . . . . . . . . . . 16 ((((𝐹𝑥) · (2↑𝐴)) ∈ ℝ ∧ 0 ≤ ((𝐹𝑥) · (2↑𝐴))) → (⌊‘((𝐹𝑥) · (2↑𝐴))) ∈ ℕ0)
6458, 62, 63syl2anc 593 . . . . . . . . . . . . . . 15 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (⌊‘((𝐹𝑥) · (2↑𝐴))) ∈ ℕ0)
6564adantr 484 . . . . . . . . . . . . . 14 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (⌊‘((𝐹𝑥) · (2↑𝐴))) ∈ ℕ0)
6665nn0cnd 12541 . . . . . . . . . . . . 13 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (⌊‘((𝐹𝑥) · (2↑𝐴))) ∈ ℂ)
6733adantr 484 . . . . . . . . . . . . . 14 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (2↑𝐴) ∈ ℕ)
6867nncnd 12223 . . . . . . . . . . . . 13 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (2↑𝐴) ∈ ℂ)
6967nnne0d 12260 . . . . . . . . . . . . 13 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (2↑𝐴) ≠ 0)
7066, 68, 69divcan1d 11965 . . . . . . . . . . . 12 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (((⌊‘((𝐹𝑥) · (2↑𝐴))) / (2↑𝐴)) · (2↑𝐴)) = (⌊‘((𝐹𝑥) · (2↑𝐴))))
7151, 70eqtrd 2796 . . . . . . . . . . 11 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → ((𝐴𝐽𝑥) · (2↑𝐴)) = (⌊‘((𝐹𝑥) · (2↑𝐴))))
7271, 65eqeltrd 2861 . . . . . . . . . 10 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → ((𝐴𝐽𝑥) · (2↑𝐴)) ∈ ℕ0)
73 nn0uz 12874 . . . . . . . . . 10 0 = (ℤ‘0)
7472, 73eleqtrdi 2871 . . . . . . . . 9 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → ((𝐴𝐽𝑥) · (2↑𝐴)) ∈ (ℤ‘0))
75 nnmulcl 12231 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ (2↑𝐴) ∈ ℕ) → (𝐴 · (2↑𝐴)) ∈ ℕ)
7632, 75mpdan 697 . . . . . . . . . . . 12 (𝐴 ∈ ℕ → (𝐴 · (2↑𝐴)) ∈ ℕ)
7776ad2antlr 737 . . . . . . . . . . 11 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐴 · (2↑𝐴)) ∈ ℕ)
7877adantr 484 . . . . . . . . . 10 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (𝐴 · (2↑𝐴)) ∈ ℕ)
7978nnzd 12591 . . . . . . . . 9 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (𝐴 · (2↑𝐴)) ∈ ℤ)
80 elfz5 13518 . . . . . . . . 9 ((((𝐴𝐽𝑥) · (2↑𝐴)) ∈ (ℤ‘0) ∧ (𝐴 · (2↑𝐴)) ∈ ℤ) → (((𝐴𝐽𝑥) · (2↑𝐴)) ∈ (0...(𝐴 · (2↑𝐴))) ↔ ((𝐴𝐽𝑥) · (2↑𝐴)) ≤ (𝐴 · (2↑𝐴))))
8174, 79, 80syl2anc 593 . . . . . . . 8 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (((𝐴𝐽𝑥) · (2↑𝐴)) ∈ (0...(𝐴 · (2↑𝐴))) ↔ ((𝐴𝐽𝑥) · (2↑𝐴)) ≤ (𝐴 · (2↑𝐴))))
8240, 81mpbird 259 . . . . . . 7 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → ((𝐴𝐽𝑥) · (2↑𝐴)) ∈ (0...(𝐴 · (2↑𝐴))))
83 oveq1 7399 . . . . . . . 8 (𝑚 = ((𝐴𝐽𝑥) · (2↑𝐴)) → (𝑚 / (2↑𝐴)) = (((𝐴𝐽𝑥) · (2↑𝐴)) / (2↑𝐴)))
84 eqid 2761 . . . . . . . 8 (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))) = (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))
85 ovex 7425 . . . . . . . 8 (((𝐴𝐽𝑥) · (2↑𝐴)) / (2↑𝐴)) ∈ V
8683, 84, 85fvmpt 6971 . . . . . . 7 (((𝐴𝐽𝑥) · (2↑𝐴)) ∈ (0...(𝐴 · (2↑𝐴))) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘((𝐴𝐽𝑥) · (2↑𝐴))) = (((𝐴𝐽𝑥) · (2↑𝐴)) / (2↑𝐴)))
8782, 86syl 17 . . . . . 6 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘((𝐴𝐽𝑥) · (2↑𝐴))) = (((𝐴𝐽𝑥) · (2↑𝐴)) / (2↑𝐴)))
8827adantr 484 . . . . . . . 8 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (𝐴𝐽𝑥) ∈ ℝ)
8988recnd 11207 . . . . . . 7 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (𝐴𝐽𝑥) ∈ ℂ)
9089, 68, 69divcan4d 11970 . . . . . 6 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (((𝐴𝐽𝑥) · (2↑𝐴)) / (2↑𝐴)) = (𝐴𝐽𝑥))
9187, 90eqtrd 2796 . . . . 5 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘((𝐴𝐽𝑥) · (2↑𝐴))) = (𝐴𝐽𝑥))
92 elfznn0 13622 . . . . . . . . . . . 12 (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) → 𝑚 ∈ ℕ0)
9392nn0red 12540 . . . . . . . . . . 11 (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) → 𝑚 ∈ ℝ)
9432adantl 485 . . . . . . . . . . 11 ((𝜑𝐴 ∈ ℕ) → (2↑𝐴) ∈ ℕ)
95 nndivre 12251 . . . . . . . . . . 11 ((𝑚 ∈ ℝ ∧ (2↑𝐴) ∈ ℕ) → (𝑚 / (2↑𝐴)) ∈ ℝ)
9693, 94, 95syl2anr 606 . . . . . . . . . 10 (((𝜑𝐴 ∈ ℕ) ∧ 𝑚 ∈ (0...(𝐴 · (2↑𝐴)))) → (𝑚 / (2↑𝐴)) ∈ ℝ)
9796fmpttd 7092 . . . . . . . . 9 ((𝜑𝐴 ∈ ℕ) → (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))):(0...(𝐴 · (2↑𝐴)))⟶ℝ)
9897ffnd 6688 . . . . . . . 8 ((𝜑𝐴 ∈ ℕ) → (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))) Fn (0...(𝐴 · (2↑𝐴))))
9998adantr 484 . . . . . . 7 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))) Fn (0...(𝐴 · (2↑𝐴))))
10099adantr 484 . . . . . 6 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))) Fn (0...(𝐴 · (2↑𝐴))))
101 fnfvelrn 7057 . . . . . 6 (((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))) Fn (0...(𝐴 · (2↑𝐴))) ∧ ((𝐴𝐽𝑥) · (2↑𝐴)) ∈ (0...(𝐴 · (2↑𝐴)))) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘((𝐴𝐽𝑥) · (2↑𝐴))) ∈ ran (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))))
102100, 82, 101syl2anc 593 . . . . 5 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘((𝐴𝐽𝑥) · (2↑𝐴))) ∈ ran (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))))
10391, 102eqeltrrd 2862 . . . 4 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ (𝐴𝐽𝑥) ≤ 𝐴) → (𝐴𝐽𝑥) ∈ ran (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))))
10477nnnn0d 12539 . . . . . . . . . 10 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐴 · (2↑𝐴)) ∈ ℕ0)
105104, 73eleqtrdi 2871 . . . . . . . . 9 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐴 · (2↑𝐴)) ∈ (ℤ‘0))
106 eluzfz2 13534 . . . . . . . . 9 ((𝐴 · (2↑𝐴)) ∈ (ℤ‘0) → (𝐴 · (2↑𝐴)) ∈ (0...(𝐴 · (2↑𝐴))))
107105, 106syl 17 . . . . . . . 8 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (𝐴 · (2↑𝐴)) ∈ (0...(𝐴 · (2↑𝐴))))
108 oveq1 7399 . . . . . . . . 9 (𝑚 = (𝐴 · (2↑𝐴)) → (𝑚 / (2↑𝐴)) = ((𝐴 · (2↑𝐴)) / (2↑𝐴)))
109 ovex 7425 . . . . . . . . 9 ((𝐴 · (2↑𝐴)) / (2↑𝐴)) ∈ V
110108, 84, 109fvmpt 6971 . . . . . . . 8 ((𝐴 · (2↑𝐴)) ∈ (0...(𝐴 · (2↑𝐴))) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘(𝐴 · (2↑𝐴))) = ((𝐴 · (2↑𝐴)) / (2↑𝐴)))
111107, 110syl 17 . . . . . . 7 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘(𝐴 · (2↑𝐴))) = ((𝐴 · (2↑𝐴)) / (2↑𝐴)))
11229recnd 11207 . . . . . . . 8 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝐴 ∈ ℂ)
11333nncnd 12223 . . . . . . . 8 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (2↑𝐴) ∈ ℂ)
11433nnne0d 12260 . . . . . . . 8 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (2↑𝐴) ≠ 0)
115112, 113, 114divcan4d 11970 . . . . . . 7 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝐴 · (2↑𝐴)) / (2↑𝐴)) = 𝐴)
116111, 115eqtrd 2796 . . . . . 6 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘(𝐴 · (2↑𝐴))) = 𝐴)
117 fnfvelrn 7057 . . . . . . 7 (((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))) Fn (0...(𝐴 · (2↑𝐴))) ∧ (𝐴 · (2↑𝐴)) ∈ (0...(𝐴 · (2↑𝐴)))) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘(𝐴 · (2↑𝐴))) ∈ ran (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))))
11899, 107, 117syl2anc 593 . . . . . 6 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘(𝐴 · (2↑𝐴))) ∈ ran (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))))
119116, 118eqeltrrd 2862 . . . . 5 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 𝐴 ∈ ran (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))))
120119adantr 484 . . . 4 ((((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) ∧ ¬ (𝐴𝐽𝑥) ≤ 𝐴) → 𝐴 ∈ ran (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))))
121103, 120ifclda 4515 . . 3 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → if((𝐴𝐽𝑥) ≤ 𝐴, (𝐴𝐽𝑥), 𝐴) ∈ ran (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))))
122 eluzfz1 13533 . . . . . . 7 ((𝐴 · (2↑𝐴)) ∈ (ℤ‘0) → 0 ∈ (0...(𝐴 · (2↑𝐴))))
123105, 122syl 17 . . . . . 6 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 0 ∈ (0...(𝐴 · (2↑𝐴))))
124 oveq1 7399 . . . . . . 7 (𝑚 = 0 → (𝑚 / (2↑𝐴)) = (0 / (2↑𝐴)))
125 ovex 7425 . . . . . . 7 (0 / (2↑𝐴)) ∈ V
126124, 84, 125fvmpt 6971 . . . . . 6 (0 ∈ (0...(𝐴 · (2↑𝐴))) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘0) = (0 / (2↑𝐴)))
127123, 126syl 17 . . . . 5 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘0) = (0 / (2↑𝐴)))
128 nncn 12215 . . . . . . 7 ((2↑𝐴) ∈ ℕ → (2↑𝐴) ∈ ℂ)
129 nnne0 12244 . . . . . . 7 ((2↑𝐴) ∈ ℕ → (2↑𝐴) ≠ 0)
130128, 129div0d 11963 . . . . . 6 ((2↑𝐴) ∈ ℕ → (0 / (2↑𝐴)) = 0)
13133, 130syl 17 . . . . 5 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → (0 / (2↑𝐴)) = 0)
132127, 131eqtrd 2796 . . . 4 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘0) = 0)
133 fnfvelrn 7057 . . . . 5 (((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))) Fn (0...(𝐴 · (2↑𝐴))) ∧ 0 ∈ (0...(𝐴 · (2↑𝐴)))) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘0) ∈ ran (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))))
13499, 123, 133syl2anc 593 . . . 4 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → ((𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴)))‘0) ∈ ran (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))))
135132, 134eqeltrrd 2862 . . 3 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → 0 ∈ ran (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))))
136121, 135ifcld 4526 . 2 (((𝜑𝐴 ∈ ℕ) ∧ 𝑥 ∈ ℝ) → if(𝑥 ∈ (-𝐴[,]𝐴), if((𝐴𝐽𝑥) ≤ 𝐴, (𝐴𝐽𝑥), 𝐴), 0) ∈ ran (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))))
1376, 136fmpt3d 7093 1 ((𝜑𝐴 ∈ ℕ) → (𝐺𝐴):ℝ⟶ran (𝑚 ∈ (0...(𝐴 · (2↑𝐴))) ↦ (𝑚 / (2↑𝐴))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 399   = wceq 1559  wcel 2141  wral 3075  ifcif 4479   class class class wbr 5099  cmpt 5180   × cxp 5643  ran crn 5646   Fn wfn 6512  wf 6513  cfv 6517  (class class class)co 7392  cmpo 7394  cr 11069  0cc0 11070   · cmul 11075  +∞cpnf 11210   < clt 11213  cle 11214  -cneg 11412   / cdiv 11841  cn 12207  2c2 12269  0cn0 12478  cz 12565  cuz 12836  [,)cico 13348  [,]cicc 13349  ...cfz 13509  cfl 13797  cexp 14071  MblFncmbf 25656
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1814  ax-4 1828  ax-5 1929  ax-6 1986  ax-7 2027  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-rep 5226  ax-sep 5245  ax-nul 5255  ax-pow 5321  ax-pr 5389  ax-un 7714  ax-cnex 11126  ax-resscn 11127  ax-1cn 11128  ax-icn 11129  ax-addcl 11130  ax-addrcl 11131  ax-mulcl 11132  ax-mulrcl 11133  ax-mulcom 11134  ax-addass 11135  ax-mulass 11136  ax-distr 11137  ax-i2m1 11138  ax-1ne0 11139  ax-1rid 11140  ax-rnegex 11141  ax-rrecex 11142  ax-cnre 11143  ax-pre-lttri 11144  ax-pre-lttrn 11145  ax-pre-ltadd 11146  ax-pre-mulgt0 11147  ax-pre-sup 11148
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1098  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3061  df-ral 3076  df-rex 3086  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3455  df-sbc 3745  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4582  df-pr 4584  df-op 4588  df-uni 4865  df-iun 4950  df-br 5100  df-opab 5162  df-mpt 5181  df-tr 5207  df-id 5540  df-eprel 5545  df-po 5553  df-so 5554  df-fr 5598  df-we 5600  df-xp 5651  df-rel 5652  df-cnv 5653  df-co 5654  df-dm 5655  df-rn 5656  df-res 5657  df-ima 5658  df-pred 6284  df-ord 6345  df-on 6346  df-lim 6347  df-suc 6348  df-iota 6473  df-fun 6519  df-fn 6520  df-f 6521  df-f1 6522  df-fo 6523  df-f1o 6524  df-fv 6525  df-riota 7349  df-ov 7395  df-oprab 7396  df-mpo 7397  df-om 7843  df-1st 7966  df-2nd 7967  df-frecs 8257  df-wrecs 8288  df-recs 8337  df-rdg 8376  df-er 8673  df-en 8924  df-dom 8925  df-sdom 8926  df-sup 9385  df-inf 9386  df-pnf 11215  df-mnf 11216  df-xr 11217  df-ltxr 11218  df-le 11219  df-sub 11413  df-neg 11414  df-div 11842  df-nn 12208  df-2 12277  df-n0 12479  df-z 12566  df-uz 12837  df-ico 13352  df-fz 13510  df-fl 13799  df-seq 14012  df-exp 14072
This theorem is referenced by:  mbfi1fseqlem4  25760
  Copyright terms: Public domain W3C validator