Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  stirlinglem5 Structured version   Visualization version   GIF version

Theorem stirlinglem5 38971
Description: If 𝑇 is between 0 and 1, then a series (without alternating negative and positive terms) is given that converges to log (1+T)/(1-T) . (Contributed by Glauco Siliprandi, 29-Jun-2017.)
Hypotheses
Ref Expression
stirlinglem5.1 𝐷 = (𝑗 ∈ ℕ ↦ ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)))
stirlinglem5.2 𝐸 = (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗))
stirlinglem5.3 𝐹 = (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) + ((𝑇𝑗) / 𝑗)))
stirlinglem5.4 𝐻 = (𝑗 ∈ ℕ0 ↦ (2 · ((1 / ((2 · 𝑗) + 1)) · (𝑇↑((2 · 𝑗) + 1)))))
stirlinglem5.5 𝐺 = (𝑗 ∈ ℕ0 ↦ ((2 · 𝑗) + 1))
stirlinglem5.6 (𝜑𝑇 ∈ ℝ+)
stirlinglem5.7 (𝜑 → (abs‘𝑇) < 1)
Assertion
Ref Expression
stirlinglem5 (𝜑 → seq0( + , 𝐻) ⇝ (log‘((1 + 𝑇) / (1 − 𝑇))))
Distinct variable groups:   𝜑,𝑗   𝑇,𝑗
Allowed substitution hints:   𝐷(𝑗)   𝐸(𝑗)   𝐹(𝑗)   𝐺(𝑗)   𝐻(𝑗)

Proof of Theorem stirlinglem5
Dummy variables 𝑖 𝑘 𝑛 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 nnuz 11599 . . . . 5 ℕ = (ℤ‘1)
2 1zzd 11285 . . . . 5 (𝜑 → 1 ∈ ℤ)
3 stirlinglem5.1 . . . . . . . . 9 𝐷 = (𝑗 ∈ ℕ ↦ ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)))
43a1i 11 . . . . . . . 8 (𝜑𝐷 = (𝑗 ∈ ℕ ↦ ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗))))
5 1cnd 9935 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → 1 ∈ ℂ)
65negcld 10258 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → -1 ∈ ℂ)
7 nnm1nn0 11211 . . . . . . . . . . . . 13 (𝑗 ∈ ℕ → (𝑗 − 1) ∈ ℕ0)
87adantl 481 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (𝑗 − 1) ∈ ℕ0)
96, 8expcld 12870 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (-1↑(𝑗 − 1)) ∈ ℂ)
10 nncn 10905 . . . . . . . . . . . 12 (𝑗 ∈ ℕ → 𝑗 ∈ ℂ)
1110adantl 481 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℂ)
12 stirlinglem5.6 . . . . . . . . . . . . . . 15 (𝜑𝑇 ∈ ℝ+)
1312rpred 11748 . . . . . . . . . . . . . 14 (𝜑𝑇 ∈ ℝ)
1413recnd 9947 . . . . . . . . . . . . 13 (𝜑𝑇 ∈ ℂ)
1514adantr 480 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → 𝑇 ∈ ℂ)
16 nnnn0 11176 . . . . . . . . . . . . 13 (𝑗 ∈ ℕ → 𝑗 ∈ ℕ0)
1716adantl 481 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℕ0)
1815, 17expcld 12870 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (𝑇𝑗) ∈ ℂ)
19 nnne0 10930 . . . . . . . . . . . 12 (𝑗 ∈ ℕ → 𝑗 ≠ 0)
2019adantl 481 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → 𝑗 ≠ 0)
219, 11, 18, 20div32d 10703 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (((-1↑(𝑗 − 1)) / 𝑗) · (𝑇𝑗)) = ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)))
225, 15pncan2d 10273 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → ((1 + 𝑇) − 1) = 𝑇)
2322eqcomd 2616 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → 𝑇 = ((1 + 𝑇) − 1))
2423oveq1d 6564 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (𝑇𝑗) = (((1 + 𝑇) − 1)↑𝑗))
2524oveq2d 6565 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (((-1↑(𝑗 − 1)) / 𝑗) · (𝑇𝑗)) = (((-1↑(𝑗 − 1)) / 𝑗) · (((1 + 𝑇) − 1)↑𝑗)))
2621, 25eqtr3d 2646 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) = (((-1↑(𝑗 − 1)) / 𝑗) · (((1 + 𝑇) − 1)↑𝑗)))
2726mpteq2dva 4672 . . . . . . . 8 (𝜑 → (𝑗 ∈ ℕ ↦ ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗))) = (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) / 𝑗) · (((1 + 𝑇) − 1)↑𝑗))))
284, 27eqtrd 2644 . . . . . . 7 (𝜑𝐷 = (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) / 𝑗) · (((1 + 𝑇) − 1)↑𝑗))))
2928seqeq3d 12671 . . . . . 6 (𝜑 → seq1( + , 𝐷) = seq1( + , (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) / 𝑗) · (((1 + 𝑇) − 1)↑𝑗)))))
30 1cnd 9935 . . . . . . . . . 10 (𝜑 → 1 ∈ ℂ)
3130, 14addcld 9938 . . . . . . . . . 10 (𝜑 → (1 + 𝑇) ∈ ℂ)
32 eqid 2610 . . . . . . . . . . 11 (abs ∘ − ) = (abs ∘ − )
3332cnmetdval 22384 . . . . . . . . . 10 ((1 ∈ ℂ ∧ (1 + 𝑇) ∈ ℂ) → (1(abs ∘ − )(1 + 𝑇)) = (abs‘(1 − (1 + 𝑇))))
3430, 31, 33syl2anc 691 . . . . . . . . 9 (𝜑 → (1(abs ∘ − )(1 + 𝑇)) = (abs‘(1 − (1 + 𝑇))))
35 1m1e0 10966 . . . . . . . . . . . . . 14 (1 − 1) = 0
3635a1i 11 . . . . . . . . . . . . 13 (𝜑 → (1 − 1) = 0)
3736oveq1d 6564 . . . . . . . . . . . 12 (𝜑 → ((1 − 1) − 𝑇) = (0 − 𝑇))
3830, 30, 14subsub4d 10302 . . . . . . . . . . . 12 (𝜑 → ((1 − 1) − 𝑇) = (1 − (1 + 𝑇)))
39 df-neg 10148 . . . . . . . . . . . . . 14 -𝑇 = (0 − 𝑇)
4039eqcomi 2619 . . . . . . . . . . . . 13 (0 − 𝑇) = -𝑇
4140a1i 11 . . . . . . . . . . . 12 (𝜑 → (0 − 𝑇) = -𝑇)
4237, 38, 413eqtr3d 2652 . . . . . . . . . . 11 (𝜑 → (1 − (1 + 𝑇)) = -𝑇)
4342fveq2d 6107 . . . . . . . . . 10 (𝜑 → (abs‘(1 − (1 + 𝑇))) = (abs‘-𝑇))
4414absnegd 14036 . . . . . . . . . . 11 (𝜑 → (abs‘-𝑇) = (abs‘𝑇))
45 stirlinglem5.7 . . . . . . . . . . 11 (𝜑 → (abs‘𝑇) < 1)
4644, 45eqbrtrd 4605 . . . . . . . . . 10 (𝜑 → (abs‘-𝑇) < 1)
4743, 46eqbrtrd 4605 . . . . . . . . 9 (𝜑 → (abs‘(1 − (1 + 𝑇))) < 1)
4834, 47eqbrtrd 4605 . . . . . . . 8 (𝜑 → (1(abs ∘ − )(1 + 𝑇)) < 1)
49 cnxmet 22386 . . . . . . . . . 10 (abs ∘ − ) ∈ (∞Met‘ℂ)
5049a1i 11 . . . . . . . . 9 (𝜑 → (abs ∘ − ) ∈ (∞Met‘ℂ))
51 1red 9934 . . . . . . . . . 10 (𝜑 → 1 ∈ ℝ)
5251rexrd 9968 . . . . . . . . 9 (𝜑 → 1 ∈ ℝ*)
53 elbl2 22005 . . . . . . . . 9 ((((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 1 ∈ ℝ*) ∧ (1 ∈ ℂ ∧ (1 + 𝑇) ∈ ℂ)) → ((1 + 𝑇) ∈ (1(ball‘(abs ∘ − ))1) ↔ (1(abs ∘ − )(1 + 𝑇)) < 1))
5450, 52, 30, 31, 53syl22anc 1319 . . . . . . . 8 (𝜑 → ((1 + 𝑇) ∈ (1(ball‘(abs ∘ − ))1) ↔ (1(abs ∘ − )(1 + 𝑇)) < 1))
5548, 54mpbird 246 . . . . . . 7 (𝜑 → (1 + 𝑇) ∈ (1(ball‘(abs ∘ − ))1))
56 eqid 2610 . . . . . . . 8 (1(ball‘(abs ∘ − ))1) = (1(ball‘(abs ∘ − ))1)
5756logtayl2 24208 . . . . . . 7 ((1 + 𝑇) ∈ (1(ball‘(abs ∘ − ))1) → seq1( + , (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) / 𝑗) · (((1 + 𝑇) − 1)↑𝑗)))) ⇝ (log‘(1 + 𝑇)))
5855, 57syl 17 . . . . . 6 (𝜑 → seq1( + , (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) / 𝑗) · (((1 + 𝑇) − 1)↑𝑗)))) ⇝ (log‘(1 + 𝑇)))
5929, 58eqbrtrd 4605 . . . . 5 (𝜑 → seq1( + , 𝐷) ⇝ (log‘(1 + 𝑇)))
60 seqex 12665 . . . . . 6 seq1( + , 𝐹) ∈ V
6160a1i 11 . . . . 5 (𝜑 → seq1( + , 𝐹) ∈ V)
62 stirlinglem5.2 . . . . . . . 8 𝐸 = (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗))
6362a1i 11 . . . . . . 7 (𝜑𝐸 = (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗)))
6463seqeq3d 12671 . . . . . 6 (𝜑 → seq1( + , 𝐸) = seq1( + , (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗))))
65 logtayl 24206 . . . . . . 7 ((𝑇 ∈ ℂ ∧ (abs‘𝑇) < 1) → seq1( + , (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗))) ⇝ -(log‘(1 − 𝑇)))
6614, 45, 65syl2anc 691 . . . . . 6 (𝜑 → seq1( + , (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗))) ⇝ -(log‘(1 − 𝑇)))
6764, 66eqbrtrd 4605 . . . . 5 (𝜑 → seq1( + , 𝐸) ⇝ -(log‘(1 − 𝑇)))
68 simpr 476 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℕ)
6968, 1syl6eleq 2698 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ (ℤ‘1))
703a1i 11 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝐷 = (𝑗 ∈ ℕ ↦ ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗))))
71 oveq1 6556 . . . . . . . . . . 11 (𝑗 = 𝑛 → (𝑗 − 1) = (𝑛 − 1))
7271oveq2d 6565 . . . . . . . . . 10 (𝑗 = 𝑛 → (-1↑(𝑗 − 1)) = (-1↑(𝑛 − 1)))
73 oveq2 6557 . . . . . . . . . . 11 (𝑗 = 𝑛 → (𝑇𝑗) = (𝑇𝑛))
74 id 22 . . . . . . . . . . 11 (𝑗 = 𝑛𝑗 = 𝑛)
7573, 74oveq12d 6567 . . . . . . . . . 10 (𝑗 = 𝑛 → ((𝑇𝑗) / 𝑗) = ((𝑇𝑛) / 𝑛))
7672, 75oveq12d 6567 . . . . . . . . 9 (𝑗 = 𝑛 → ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) = ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)))
7776adantl 481 . . . . . . . 8 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) ∧ 𝑗 = 𝑛) → ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) = ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)))
78 elfznn 12241 . . . . . . . . 9 (𝑛 ∈ (1...𝑘) → 𝑛 ∈ ℕ)
7978adantl 481 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 ∈ ℕ)
80 1cnd 9935 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → 1 ∈ ℂ)
8180negcld 10258 . . . . . . . . . . 11 (𝑛 ∈ ℕ → -1 ∈ ℂ)
82 nnm1nn0 11211 . . . . . . . . . . 11 (𝑛 ∈ ℕ → (𝑛 − 1) ∈ ℕ0)
8381, 82expcld 12870 . . . . . . . . . 10 (𝑛 ∈ ℕ → (-1↑(𝑛 − 1)) ∈ ℂ)
8479, 83syl 17 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (-1↑(𝑛 − 1)) ∈ ℂ)
8514ad2antrr 758 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑇 ∈ ℂ)
8679nnnn0d 11228 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 ∈ ℕ0)
8785, 86expcld 12870 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝑇𝑛) ∈ ℂ)
8879nncnd 10913 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 ∈ ℂ)
8979nnne0d 10942 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 ≠ 0)
9087, 88, 89divcld 10680 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → ((𝑇𝑛) / 𝑛) ∈ ℂ)
9184, 90mulcld 9939 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) ∈ ℂ)
9270, 77, 79, 91fvmptd 6197 . . . . . . 7 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝐷𝑛) = ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)))
9392, 91eqeltrd 2688 . . . . . 6 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝐷𝑛) ∈ ℂ)
94 addcl 9897 . . . . . . 7 ((𝑛 ∈ ℂ ∧ 𝑖 ∈ ℂ) → (𝑛 + 𝑖) ∈ ℂ)
9594adantl 481 . . . . . 6 (((𝜑𝑘 ∈ ℕ) ∧ (𝑛 ∈ ℂ ∧ 𝑖 ∈ ℂ)) → (𝑛 + 𝑖) ∈ ℂ)
9669, 93, 95seqcl 12683 . . . . 5 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐷)‘𝑘) ∈ ℂ)
9762a1i 11 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝐸 = (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗)))
9875adantl 481 . . . . . . . 8 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) ∧ 𝑗 = 𝑛) → ((𝑇𝑗) / 𝑗) = ((𝑇𝑛) / 𝑛))
9997, 98, 79, 90fvmptd 6197 . . . . . . 7 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝐸𝑛) = ((𝑇𝑛) / 𝑛))
10099, 90eqeltrd 2688 . . . . . 6 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝐸𝑛) ∈ ℂ)
10169, 100, 95seqcl 12683 . . . . 5 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐸)‘𝑘) ∈ ℂ)
102 simpll 786 . . . . . . 7 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝜑)
103 stirlinglem5.3 . . . . . . . . . 10 𝐹 = (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) + ((𝑇𝑗) / 𝑗)))
104103a1i 11 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → 𝐹 = (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) + ((𝑇𝑗) / 𝑗))))
10576, 75oveq12d 6567 . . . . . . . . . 10 (𝑗 = 𝑛 → (((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) + ((𝑇𝑗) / 𝑗)) = (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)))
106105adantl 481 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑗 = 𝑛) → (((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) + ((𝑇𝑗) / 𝑗)) = (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)))
107 simpr 476 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
10883adantl 481 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → (-1↑(𝑛 − 1)) ∈ ℂ)
10914adantr 480 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → 𝑇 ∈ ℂ)
110107nnnn0d 11228 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → 𝑛 ∈ ℕ0)
111109, 110expcld 12870 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → (𝑇𝑛) ∈ ℂ)
112107nncnd 10913 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
113107nnne0d 10942 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → 𝑛 ≠ 0)
114111, 112, 113divcld 10680 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → ((𝑇𝑛) / 𝑛) ∈ ℂ)
115108, 114mulcld 9939 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) ∈ ℂ)
116115, 114addcld 9938 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)) ∈ ℂ)
117104, 106, 107, 116fvmptd 6197 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) = (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)))
1183a1i 11 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → 𝐷 = (𝑗 ∈ ℕ ↦ ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗))))
11976adantl 481 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑗 = 𝑛) → ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) = ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)))
120118, 119, 107, 115fvmptd 6197 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝐷𝑛) = ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)))
121120eqcomd 2616 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) = (𝐷𝑛))
12262a1i 11 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → 𝐸 = (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗)))
12375adantl 481 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑗 = 𝑛) → ((𝑇𝑗) / 𝑗) = ((𝑇𝑛) / 𝑛))
124122, 123, 107, 114fvmptd 6197 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝐸𝑛) = ((𝑇𝑛) / 𝑛))
125124eqcomd 2616 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → ((𝑇𝑛) / 𝑛) = (𝐸𝑛))
126121, 125oveq12d 6567 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)) = ((𝐷𝑛) + (𝐸𝑛)))
127117, 126eqtrd 2644 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) = ((𝐷𝑛) + (𝐸𝑛)))
128102, 79, 127syl2anc 691 . . . . . 6 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝐹𝑛) = ((𝐷𝑛) + (𝐸𝑛)))
12969, 93, 100, 128seradd 12705 . . . . 5 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐹)‘𝑘) = ((seq1( + , 𝐷)‘𝑘) + (seq1( + , 𝐸)‘𝑘)))
1301, 2, 59, 61, 67, 96, 101, 129climadd 14210 . . . 4 (𝜑 → seq1( + , 𝐹) ⇝ ((log‘(1 + 𝑇)) + -(log‘(1 − 𝑇))))
131 1rp 11712 . . . . . . . . 9 1 ∈ ℝ+
132131a1i 11 . . . . . . . 8 (𝜑 → 1 ∈ ℝ+)
133132, 12rpaddcld 11763 . . . . . . 7 (𝜑 → (1 + 𝑇) ∈ ℝ+)
134133rpne0d 11753 . . . . . 6 (𝜑 → (1 + 𝑇) ≠ 0)
13531, 134logcld 24121 . . . . 5 (𝜑 → (log‘(1 + 𝑇)) ∈ ℂ)
13630, 14subcld 10271 . . . . . 6 (𝜑 → (1 − 𝑇) ∈ ℂ)
13713, 51absltd 14016 . . . . . . . . . 10 (𝜑 → ((abs‘𝑇) < 1 ↔ (-1 < 𝑇𝑇 < 1)))
13845, 137mpbid 221 . . . . . . . . 9 (𝜑 → (-1 < 𝑇𝑇 < 1))
139138simprd 478 . . . . . . . 8 (𝜑𝑇 < 1)
14013, 139gtned 10051 . . . . . . 7 (𝜑 → 1 ≠ 𝑇)
14130, 14, 140subne0d 10280 . . . . . 6 (𝜑 → (1 − 𝑇) ≠ 0)
142136, 141logcld 24121 . . . . 5 (𝜑 → (log‘(1 − 𝑇)) ∈ ℂ)
143135, 142negsubd 10277 . . . 4 (𝜑 → ((log‘(1 + 𝑇)) + -(log‘(1 − 𝑇))) = ((log‘(1 + 𝑇)) − (log‘(1 − 𝑇))))
144130, 143breqtrd 4609 . . 3 (𝜑 → seq1( + , 𝐹) ⇝ ((log‘(1 + 𝑇)) − (log‘(1 − 𝑇))))
145 nn0uz 11598 . . . 4 0 = (ℤ‘0)
146 0zd 11266 . . . 4 (𝜑 → 0 ∈ ℤ)
147 stirlinglem5.5 . . . . . 6 𝐺 = (𝑗 ∈ ℕ0 ↦ ((2 · 𝑗) + 1))
148 2nn0 11186 . . . . . . . . 9 2 ∈ ℕ0
149148a1i 11 . . . . . . . 8 (𝑗 ∈ ℕ0 → 2 ∈ ℕ0)
150 id 22 . . . . . . . 8 (𝑗 ∈ ℕ0𝑗 ∈ ℕ0)
151149, 150nn0mulcld 11233 . . . . . . 7 (𝑗 ∈ ℕ0 → (2 · 𝑗) ∈ ℕ0)
152 nn0p1nn 11209 . . . . . . 7 ((2 · 𝑗) ∈ ℕ0 → ((2 · 𝑗) + 1) ∈ ℕ)
153151, 152syl 17 . . . . . 6 (𝑗 ∈ ℕ0 → ((2 · 𝑗) + 1) ∈ ℕ)
154147, 153fmpti 6291 . . . . 5 𝐺:ℕ0⟶ℕ
155154a1i 11 . . . 4 (𝜑𝐺:ℕ0⟶ℕ)
156 2re 10967 . . . . . . . . 9 2 ∈ ℝ
157156a1i 11 . . . . . . . 8 (𝑘 ∈ ℕ0 → 2 ∈ ℝ)
158 nn0re 11178 . . . . . . . 8 (𝑘 ∈ ℕ0𝑘 ∈ ℝ)
159157, 158remulcld 9949 . . . . . . 7 (𝑘 ∈ ℕ0 → (2 · 𝑘) ∈ ℝ)
160 1red 9934 . . . . . . . . 9 (𝑘 ∈ ℕ0 → 1 ∈ ℝ)
161158, 160readdcld 9948 . . . . . . . 8 (𝑘 ∈ ℕ0 → (𝑘 + 1) ∈ ℝ)
162157, 161remulcld 9949 . . . . . . 7 (𝑘 ∈ ℕ0 → (2 · (𝑘 + 1)) ∈ ℝ)
163 2rp 11713 . . . . . . . . 9 2 ∈ ℝ+
164163a1i 11 . . . . . . . 8 (𝑘 ∈ ℕ0 → 2 ∈ ℝ+)
165158ltp1d 10833 . . . . . . . 8 (𝑘 ∈ ℕ0𝑘 < (𝑘 + 1))
166158, 161, 164, 165ltmul2dd 11804 . . . . . . 7 (𝑘 ∈ ℕ0 → (2 · 𝑘) < (2 · (𝑘 + 1)))
167159, 162, 160, 166ltadd1dd 10517 . . . . . 6 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) < ((2 · (𝑘 + 1)) + 1))
168147a1i 11 . . . . . . 7 (𝑘 ∈ ℕ0𝐺 = (𝑗 ∈ ℕ0 ↦ ((2 · 𝑗) + 1)))
169 simpr 476 . . . . . . . . 9 ((𝑘 ∈ ℕ0𝑗 = 𝑘) → 𝑗 = 𝑘)
170169oveq2d 6565 . . . . . . . 8 ((𝑘 ∈ ℕ0𝑗 = 𝑘) → (2 · 𝑗) = (2 · 𝑘))
171170oveq1d 6564 . . . . . . 7 ((𝑘 ∈ ℕ0𝑗 = 𝑘) → ((2 · 𝑗) + 1) = ((2 · 𝑘) + 1))
172 id 22 . . . . . . 7 (𝑘 ∈ ℕ0𝑘 ∈ ℕ0)
173 2cnd 10970 . . . . . . . . 9 (𝑘 ∈ ℕ0 → 2 ∈ ℂ)
174 nn0cn 11179 . . . . . . . . 9 (𝑘 ∈ ℕ0𝑘 ∈ ℂ)
175173, 174mulcld 9939 . . . . . . . 8 (𝑘 ∈ ℕ0 → (2 · 𝑘) ∈ ℂ)
176 1cnd 9935 . . . . . . . 8 (𝑘 ∈ ℕ0 → 1 ∈ ℂ)
177175, 176addcld 9938 . . . . . . 7 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℂ)
178168, 171, 172, 177fvmptd 6197 . . . . . 6 (𝑘 ∈ ℕ0 → (𝐺𝑘) = ((2 · 𝑘) + 1))
179 simpr 476 . . . . . . . . 9 ((𝑘 ∈ ℕ0𝑗 = (𝑘 + 1)) → 𝑗 = (𝑘 + 1))
180179oveq2d 6565 . . . . . . . 8 ((𝑘 ∈ ℕ0𝑗 = (𝑘 + 1)) → (2 · 𝑗) = (2 · (𝑘 + 1)))
181180oveq1d 6564 . . . . . . 7 ((𝑘 ∈ ℕ0𝑗 = (𝑘 + 1)) → ((2 · 𝑗) + 1) = ((2 · (𝑘 + 1)) + 1))
182 peano2nn0 11210 . . . . . . 7 (𝑘 ∈ ℕ0 → (𝑘 + 1) ∈ ℕ0)
183174, 176addcld 9938 . . . . . . . . 9 (𝑘 ∈ ℕ0 → (𝑘 + 1) ∈ ℂ)
184173, 183mulcld 9939 . . . . . . . 8 (𝑘 ∈ ℕ0 → (2 · (𝑘 + 1)) ∈ ℂ)
185184, 176addcld 9938 . . . . . . 7 (𝑘 ∈ ℕ0 → ((2 · (𝑘 + 1)) + 1) ∈ ℂ)
186168, 181, 182, 185fvmptd 6197 . . . . . 6 (𝑘 ∈ ℕ0 → (𝐺‘(𝑘 + 1)) = ((2 · (𝑘 + 1)) + 1))
187167, 178, 1863brtr4d 4615 . . . . 5 (𝑘 ∈ ℕ0 → (𝐺𝑘) < (𝐺‘(𝑘 + 1)))
188187adantl 481 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (𝐺𝑘) < (𝐺‘(𝑘 + 1)))
189 eldifi 3694 . . . . . . 7 (𝑛 ∈ (ℕ ∖ ran 𝐺) → 𝑛 ∈ ℕ)
190189adantl 481 . . . . . 6 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → 𝑛 ∈ ℕ)
191 1cnd 9935 . . . . . . . . . . 11 (𝑛 ∈ (ℕ ∖ ran 𝐺) → 1 ∈ ℂ)
192191negcld 10258 . . . . . . . . . 10 (𝑛 ∈ (ℕ ∖ ran 𝐺) → -1 ∈ ℂ)
193189, 82syl 17 . . . . . . . . . 10 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (𝑛 − 1) ∈ ℕ0)
194192, 193expcld 12870 . . . . . . . . 9 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (-1↑(𝑛 − 1)) ∈ ℂ)
195194adantl 481 . . . . . . . 8 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (-1↑(𝑛 − 1)) ∈ ℂ)
19614adantr 480 . . . . . . . . . 10 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → 𝑇 ∈ ℂ)
197190nnnn0d 11228 . . . . . . . . . 10 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → 𝑛 ∈ ℕ0)
198196, 197expcld 12870 . . . . . . . . 9 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (𝑇𝑛) ∈ ℂ)
199190nncnd 10913 . . . . . . . . 9 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → 𝑛 ∈ ℂ)
200190nnne0d 10942 . . . . . . . . 9 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → 𝑛 ≠ 0)
201198, 199, 200divcld 10680 . . . . . . . 8 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → ((𝑇𝑛) / 𝑛) ∈ ℂ)
202195, 201mulcld 9939 . . . . . . 7 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) ∈ ℂ)
203202, 201addcld 9938 . . . . . 6 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)) ∈ ℂ)
204105, 103fvmptg 6189 . . . . . 6 ((𝑛 ∈ ℕ ∧ (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)) ∈ ℂ) → (𝐹𝑛) = (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)))
205190, 203, 204syl2anc 691 . . . . 5 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (𝐹𝑛) = (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)))
206 eldifn 3695 . . . . . . . . . . . 12 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ¬ 𝑛 ∈ ran 𝐺)
207 0nn0 11184 . . . . . . . . . . . . . . . 16 0 ∈ ℕ0
208 1nn0 11185 . . . . . . . . . . . . . . . . 17 1 ∈ ℕ0
209148, 208num0h 11385 . . . . . . . . . . . . . . . 16 1 = ((2 · 0) + 1)
210 oveq2 6557 . . . . . . . . . . . . . . . . . . 19 (𝑗 = 0 → (2 · 𝑗) = (2 · 0))
211210oveq1d 6564 . . . . . . . . . . . . . . . . . 18 (𝑗 = 0 → ((2 · 𝑗) + 1) = ((2 · 0) + 1))
212211eqeq2d 2620 . . . . . . . . . . . . . . . . 17 (𝑗 = 0 → (1 = ((2 · 𝑗) + 1) ↔ 1 = ((2 · 0) + 1)))
213212rspcev 3282 . . . . . . . . . . . . . . . 16 ((0 ∈ ℕ0 ∧ 1 = ((2 · 0) + 1)) → ∃𝑗 ∈ ℕ0 1 = ((2 · 𝑗) + 1))
214207, 209, 213mp2an 704 . . . . . . . . . . . . . . 15 𝑗 ∈ ℕ0 1 = ((2 · 𝑗) + 1)
215 ax-1cn 9873 . . . . . . . . . . . . . . . 16 1 ∈ ℂ
216147elrnmpt 5293 . . . . . . . . . . . . . . . 16 (1 ∈ ℂ → (1 ∈ ran 𝐺 ↔ ∃𝑗 ∈ ℕ0 1 = ((2 · 𝑗) + 1)))
217215, 216ax-mp 5 . . . . . . . . . . . . . . 15 (1 ∈ ran 𝐺 ↔ ∃𝑗 ∈ ℕ0 1 = ((2 · 𝑗) + 1))
218214, 217mpbir 220 . . . . . . . . . . . . . 14 1 ∈ ran 𝐺
219218a1i 11 . . . . . . . . . . . . 13 (𝑛 = 1 → 1 ∈ ran 𝐺)
220 eleq1 2676 . . . . . . . . . . . . 13 (𝑛 = 1 → (𝑛 ∈ ran 𝐺 ↔ 1 ∈ ran 𝐺))
221219, 220mpbird 246 . . . . . . . . . . . 12 (𝑛 = 1 → 𝑛 ∈ ran 𝐺)
222206, 221nsyl 134 . . . . . . . . . . 11 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ¬ 𝑛 = 1)
223 nn1m1nn 10917 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → (𝑛 = 1 ∨ (𝑛 − 1) ∈ ℕ))
224189, 223syl 17 . . . . . . . . . . . 12 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (𝑛 = 1 ∨ (𝑛 − 1) ∈ ℕ))
225224ord 391 . . . . . . . . . . 11 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (¬ 𝑛 = 1 → (𝑛 − 1) ∈ ℕ))
226222, 225mpd 15 . . . . . . . . . 10 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (𝑛 − 1) ∈ ℕ)
227 nfcv 2751 . . . . . . . . . . . . . . . . . 18 𝑗
228 nfmpt1 4675 . . . . . . . . . . . . . . . . . . . 20 𝑗(𝑗 ∈ ℕ0 ↦ ((2 · 𝑗) + 1))
229147, 228nfcxfr 2749 . . . . . . . . . . . . . . . . . . 19 𝑗𝐺
230229nfrn 5289 . . . . . . . . . . . . . . . . . 18 𝑗ran 𝐺
231227, 230nfdif 3693 . . . . . . . . . . . . . . . . 17 𝑗(ℕ ∖ ran 𝐺)
232231nfcri 2745 . . . . . . . . . . . . . . . 16 𝑗 𝑛 ∈ (ℕ ∖ ran 𝐺)
233147elrnmpt 5293 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (𝑛 ∈ ran 𝐺 ↔ ∃𝑗 ∈ ℕ0 𝑛 = ((2 · 𝑗) + 1)))
234206, 233mtbid 313 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ¬ ∃𝑗 ∈ ℕ0 𝑛 = ((2 · 𝑗) + 1))
235 ralnex 2975 . . . . . . . . . . . . . . . . . . . . . . . 24 (∀𝑗 ∈ ℕ0 ¬ 𝑛 = ((2 · 𝑗) + 1) ↔ ¬ ∃𝑗 ∈ ℕ0 𝑛 = ((2 · 𝑗) + 1))
236234, 235sylibr 223 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ∀𝑗 ∈ ℕ0 ¬ 𝑛 = ((2 · 𝑗) + 1))
237236r19.21bi 2916 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℕ0) → ¬ 𝑛 = ((2 · 𝑗) + 1))
238237neqned 2789 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℕ0) → 𝑛 ≠ ((2 · 𝑗) + 1))
239238necomd 2837 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℕ0) → ((2 · 𝑗) + 1) ≠ 𝑛)
240239adantlr 747 . . . . . . . . . . . . . . . . . . 19 (((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℤ) ∧ 𝑗 ∈ ℕ0) → ((2 · 𝑗) + 1) ≠ 𝑛)
241 simplr 788 . . . . . . . . . . . . . . . . . . . 20 (((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℤ) ∧ ¬ 𝑗 ∈ ℕ0) → 𝑗 ∈ ℤ)
242 simpr 476 . . . . . . . . . . . . . . . . . . . 20 (((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℤ) ∧ ¬ 𝑗 ∈ ℕ0) → ¬ 𝑗 ∈ ℕ0)
243189ad2antrr 758 . . . . . . . . . . . . . . . . . . . 20 (((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℤ) ∧ ¬ 𝑗 ∈ ℕ0) → 𝑛 ∈ ℕ)
244156a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 2 ∈ ℝ)
245 simpl 472 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 𝑗 ∈ ℤ)
246245zred 11358 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 𝑗 ∈ ℝ)
247244, 246remulcld 9949 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (2 · 𝑗) ∈ ℝ)
248 0red 9920 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 0 ∈ ℝ)
249 1red 9934 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 1 ∈ ℝ)
250 2cnd 10970 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 2 ∈ ℂ)
251246recnd 9947 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 𝑗 ∈ ℂ)
252250, 251mulcomd 9940 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (2 · 𝑗) = (𝑗 · 2))
253 simpr 476 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ¬ 𝑗 ∈ ℕ0)
254 elnn0z 11267 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑗 ∈ ℕ0 ↔ (𝑗 ∈ ℤ ∧ 0 ≤ 𝑗))
255253, 254sylnib 317 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ¬ (𝑗 ∈ ℤ ∧ 0 ≤ 𝑗))
256 nan 602 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ¬ (𝑗 ∈ ℤ ∧ 0 ≤ 𝑗)) ↔ (((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) ∧ 𝑗 ∈ ℤ) → ¬ 0 ≤ 𝑗))
257255, 256mpbi 219 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) ∧ 𝑗 ∈ ℤ) → ¬ 0 ≤ 𝑗)
258257anabss1 851 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ¬ 0 ≤ 𝑗)
259246, 248ltnled 10063 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (𝑗 < 0 ↔ ¬ 0 ≤ 𝑗))
260258, 259mpbird 246 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 𝑗 < 0)
261163a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 2 ∈ ℝ+)
262261rpregt0d 11754 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (2 ∈ ℝ ∧ 0 < 2))
263 mulltgt0 38204 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑗 ∈ ℝ ∧ 𝑗 < 0) ∧ (2 ∈ ℝ ∧ 0 < 2)) → (𝑗 · 2) < 0)
264246, 260, 262, 263syl21anc 1317 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (𝑗 · 2) < 0)
265252, 264eqbrtrd 4605 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (2 · 𝑗) < 0)
266247, 248, 249, 265ltadd1dd 10517 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ((2 · 𝑗) + 1) < (0 + 1))
267 1cnd 9935 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 1 ∈ ℂ)
268267addid2d 10116 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (0 + 1) = 1)
269266, 268breqtrd 4609 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ((2 · 𝑗) + 1) < 1)
270247, 249readdcld 9948 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ((2 · 𝑗) + 1) ∈ ℝ)
271270, 249ltnled 10063 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (((2 · 𝑗) + 1) < 1 ↔ ¬ 1 ≤ ((2 · 𝑗) + 1)))
272269, 271mpbid 221 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ¬ 1 ≤ ((2 · 𝑗) + 1))
273 nnge1 10923 . . . . . . . . . . . . . . . . . . . . . . . 24 (((2 · 𝑗) + 1) ∈ ℕ → 1 ≤ ((2 · 𝑗) + 1))
274272, 273nsyl 134 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ¬ ((2 · 𝑗) + 1) ∈ ℕ)
275274adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) ∧ 𝑛 ∈ ℕ) → ¬ ((2 · 𝑗) + 1) ∈ ℕ)
276 simpr 476 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℕ ∧ ((2 · 𝑗) + 1) = 𝑛) → ((2 · 𝑗) + 1) = 𝑛)
277 simpl 472 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℕ ∧ ((2 · 𝑗) + 1) = 𝑛) → 𝑛 ∈ ℕ)
278276, 277eqeltrd 2688 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑛 ∈ ℕ ∧ ((2 · 𝑗) + 1) = 𝑛) → ((2 · 𝑗) + 1) ∈ ℕ)
279278adantll 746 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) ∧ 𝑛 ∈ ℕ) ∧ ((2 · 𝑗) + 1) = 𝑛) → ((2 · 𝑗) + 1) ∈ ℕ)
280275, 279mtand 689 . . . . . . . . . . . . . . . . . . . . 21 (((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) ∧ 𝑛 ∈ ℕ) → ¬ ((2 · 𝑗) + 1) = 𝑛)
281280neqned 2789 . . . . . . . . . . . . . . . . . . . 20 (((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) ∧ 𝑛 ∈ ℕ) → ((2 · 𝑗) + 1) ≠ 𝑛)
282241, 242, 243, 281syl21anc 1317 . . . . . . . . . . . . . . . . . . 19 (((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℤ) ∧ ¬ 𝑗 ∈ ℕ0) → ((2 · 𝑗) + 1) ≠ 𝑛)
283240, 282pm2.61dan 828 . . . . . . . . . . . . . . . . . 18 ((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℤ) → ((2 · 𝑗) + 1) ≠ 𝑛)
284283neneqd 2787 . . . . . . . . . . . . . . . . 17 ((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℤ) → ¬ ((2 · 𝑗) + 1) = 𝑛)
285284ex 449 . . . . . . . . . . . . . . . 16 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (𝑗 ∈ ℤ → ¬ ((2 · 𝑗) + 1) = 𝑛))
286232, 285ralrimi 2940 . . . . . . . . . . . . . . 15 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ∀𝑗 ∈ ℤ ¬ ((2 · 𝑗) + 1) = 𝑛)
287 ralnex 2975 . . . . . . . . . . . . . . 15 (∀𝑗 ∈ ℤ ¬ ((2 · 𝑗) + 1) = 𝑛 ↔ ¬ ∃𝑗 ∈ ℤ ((2 · 𝑗) + 1) = 𝑛)
288286, 287sylib 207 . . . . . . . . . . . . . 14 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ¬ ∃𝑗 ∈ ℤ ((2 · 𝑗) + 1) = 𝑛)
289189nnzd 11357 . . . . . . . . . . . . . . 15 (𝑛 ∈ (ℕ ∖ ran 𝐺) → 𝑛 ∈ ℤ)
290 odd2np1 14903 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℤ → (¬ 2 ∥ 𝑛 ↔ ∃𝑗 ∈ ℤ ((2 · 𝑗) + 1) = 𝑛))
291289, 290syl 17 . . . . . . . . . . . . . 14 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (¬ 2 ∥ 𝑛 ↔ ∃𝑗 ∈ ℤ ((2 · 𝑗) + 1) = 𝑛))
292288, 291mtbird 314 . . . . . . . . . . . . 13 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ¬ ¬ 2 ∥ 𝑛)
293292notnotrd 127 . . . . . . . . . . . 12 (𝑛 ∈ (ℕ ∖ ran 𝐺) → 2 ∥ 𝑛)
294189nncnd 10913 . . . . . . . . . . . . 13 (𝑛 ∈ (ℕ ∖ ran 𝐺) → 𝑛 ∈ ℂ)
295294, 191npcand 10275 . . . . . . . . . . . 12 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ((𝑛 − 1) + 1) = 𝑛)
296293, 295breqtrrd 4611 . . . . . . . . . . 11 (𝑛 ∈ (ℕ ∖ ran 𝐺) → 2 ∥ ((𝑛 − 1) + 1))
297193nn0zd 11356 . . . . . . . . . . . 12 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (𝑛 − 1) ∈ ℤ)
298 oddp1even 14906 . . . . . . . . . . . 12 ((𝑛 − 1) ∈ ℤ → (¬ 2 ∥ (𝑛 − 1) ↔ 2 ∥ ((𝑛 − 1) + 1)))
299297, 298syl 17 . . . . . . . . . . 11 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (¬ 2 ∥ (𝑛 − 1) ↔ 2 ∥ ((𝑛 − 1) + 1)))
300296, 299mpbird 246 . . . . . . . . . 10 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ¬ 2 ∥ (𝑛 − 1))
301 oexpneg 14907 . . . . . . . . . 10 ((1 ∈ ℂ ∧ (𝑛 − 1) ∈ ℕ ∧ ¬ 2 ∥ (𝑛 − 1)) → (-1↑(𝑛 − 1)) = -(1↑(𝑛 − 1)))
302191, 226, 300, 301syl3anc 1318 . . . . . . . . 9 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (-1↑(𝑛 − 1)) = -(1↑(𝑛 − 1)))
303 1exp 12751 . . . . . . . . . . 11 ((𝑛 − 1) ∈ ℤ → (1↑(𝑛 − 1)) = 1)
304297, 303syl 17 . . . . . . . . . 10 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (1↑(𝑛 − 1)) = 1)
305304negeqd 10154 . . . . . . . . 9 (𝑛 ∈ (ℕ ∖ ran 𝐺) → -(1↑(𝑛 − 1)) = -1)
306302, 305eqtrd 2644 . . . . . . . 8 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (-1↑(𝑛 − 1)) = -1)
307306adantl 481 . . . . . . 7 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (-1↑(𝑛 − 1)) = -1)
308307oveq1d 6564 . . . . . 6 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) = (-1 · ((𝑇𝑛) / 𝑛)))
309308oveq1d 6564 . . . . 5 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)) = ((-1 · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)))
310201mulm1d 10361 . . . . . . 7 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (-1 · ((𝑇𝑛) / 𝑛)) = -((𝑇𝑛) / 𝑛))
311310oveq1d 6564 . . . . . 6 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → ((-1 · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)) = (-((𝑇𝑛) / 𝑛) + ((𝑇𝑛) / 𝑛)))
312201negcld 10258 . . . . . . 7 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → -((𝑇𝑛) / 𝑛) ∈ ℂ)
313312, 201addcomd 10117 . . . . . 6 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (-((𝑇𝑛) / 𝑛) + ((𝑇𝑛) / 𝑛)) = (((𝑇𝑛) / 𝑛) + -((𝑇𝑛) / 𝑛)))
314201negidd 10261 . . . . . 6 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (((𝑇𝑛) / 𝑛) + -((𝑇𝑛) / 𝑛)) = 0)
315311, 313, 3143eqtrd 2648 . . . . 5 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → ((-1 · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)) = 0)
316205, 309, 3153eqtrd 2648 . . . 4 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (𝐹𝑛) = 0)
317117, 116eqeltrd 2688 . . . 4 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) ∈ ℂ)
318103a1i 11 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → 𝐹 = (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) + ((𝑇𝑗) / 𝑗))))
319 simpr 476 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = ((2 · 𝑘) + 1)) → 𝑗 = ((2 · 𝑘) + 1))
320319oveq1d 6564 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = ((2 · 𝑘) + 1)) → (𝑗 − 1) = (((2 · 𝑘) + 1) − 1))
321320oveq2d 6565 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = ((2 · 𝑘) + 1)) → (-1↑(𝑗 − 1)) = (-1↑(((2 · 𝑘) + 1) − 1)))
322319oveq2d 6565 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = ((2 · 𝑘) + 1)) → (𝑇𝑗) = (𝑇↑((2 · 𝑘) + 1)))
323322, 319oveq12d 6567 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = ((2 · 𝑘) + 1)) → ((𝑇𝑗) / 𝑗) = ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)))
324321, 323oveq12d 6567 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = ((2 · 𝑘) + 1)) → ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) = ((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
325324, 323oveq12d 6567 . . . . . . 7 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = ((2 · 𝑘) + 1)) → (((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) + ((𝑇𝑗) / 𝑗)) = (((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) + ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
326148a1i 11 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → 2 ∈ ℕ0)
327 simpr 476 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → 𝑘 ∈ ℕ0)
328326, 327nn0mulcld 11233 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℕ0)
329 nn0p1nn 11209 . . . . . . . 8 ((2 · 𝑘) ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ)
330328, 329syl 17 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ∈ ℕ)
331176negcld 10258 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → -1 ∈ ℂ)
332175, 176pncand 10272 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (((2 · 𝑘) + 1) − 1) = (2 · 𝑘))
333148a1i 11 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 → 2 ∈ ℕ0)
334333, 172nn0mulcld 11233 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (2 · 𝑘) ∈ ℕ0)
335332, 334eqeltrd 2688 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (((2 · 𝑘) + 1) − 1) ∈ ℕ0)
336331, 335expcld 12870 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → (-1↑(((2 · 𝑘) + 1) − 1)) ∈ ℂ)
337336adantl 481 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → (-1↑(((2 · 𝑘) + 1) − 1)) ∈ ℂ)
33814adantr 480 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → 𝑇 ∈ ℂ)
339208a1i 11 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → 1 ∈ ℕ0)
340328, 339nn0addcld 11232 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ∈ ℕ0)
341338, 340expcld 12870 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ0) → (𝑇↑((2 · 𝑘) + 1)) ∈ ℂ)
342 2cnd 10970 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → 2 ∈ ℂ)
343174adantl 481 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → 𝑘 ∈ ℂ)
344342, 343mulcld 9939 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℂ)
345 1cnd 9935 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → 1 ∈ ℂ)
346344, 345addcld 9938 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ∈ ℂ)
347 0red 9920 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → 0 ∈ ℝ)
348156a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ0) → 2 ∈ ℝ)
349158adantl 481 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ0) → 𝑘 ∈ ℝ)
350348, 349remulcld 9949 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℝ)
351 1red 9934 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → 1 ∈ ℝ)
352 0le2 10988 . . . . . . . . . . . . . 14 0 ≤ 2
353352a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ0) → 0 ≤ 2)
354327nn0ge0d 11231 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ0) → 0 ≤ 𝑘)
355348, 349, 353, 354mulge0d 10483 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → 0 ≤ (2 · 𝑘))
356 0lt1 10429 . . . . . . . . . . . . 13 0 < 1
357356a1i 11 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → 0 < 1)
358350, 351, 355, 357addgegt0d 10480 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → 0 < ((2 · 𝑘) + 1))
359347, 358gtned 10051 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ≠ 0)
360341, 346, 359divcld 10680 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)) ∈ ℂ)
361337, 360mulcld 9939 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → ((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) ∈ ℂ)
362361, 360addcld 9938 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → (((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) + ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) ∈ ℂ)
363318, 325, 330, 362fvmptd 6197 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (𝐹‘((2 · 𝑘) + 1)) = (((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) + ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
364332adantl 481 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → (((2 · 𝑘) + 1) − 1) = (2 · 𝑘))
365364oveq2d 6565 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → (-1↑(((2 · 𝑘) + 1) − 1)) = (-1↑(2 · 𝑘)))
366 nn0z 11277 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0𝑘 ∈ ℤ)
367 m1expeven 12769 . . . . . . . . . . . . 13 (𝑘 ∈ ℤ → (-1↑(2 · 𝑘)) = 1)
368366, 367syl 17 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (-1↑(2 · 𝑘)) = 1)
369368adantl 481 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → (-1↑(2 · 𝑘)) = 1)
370365, 369eqtrd 2644 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ0) → (-1↑(((2 · 𝑘) + 1) − 1)) = 1)
371370oveq1d 6564 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → ((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (1 · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
372360mulid2d 9937 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → (1 · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)))
373371, 372eqtrd 2644 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → ((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)))
374373oveq1d 6564 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → (((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) + ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)) + ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
3753602timesd 11152 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → (2 · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)) + ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
376341, 346, 359divrec2d 10684 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)) = ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1))))
377376oveq2d 6565 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → (2 · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (2 · ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1)))))
378374, 375, 3773eqtr2d 2650 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) + ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (2 · ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1)))))
379363, 378eqtr2d 2645 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → (2 · ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1)))) = (𝐹‘((2 · 𝑘) + 1)))
380 stirlinglem5.4 . . . . . . 7 𝐻 = (𝑗 ∈ ℕ0 ↦ (2 · ((1 / ((2 · 𝑗) + 1)) · (𝑇↑((2 · 𝑗) + 1)))))
381380a1i 11 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → 𝐻 = (𝑗 ∈ ℕ0 ↦ (2 · ((1 / ((2 · 𝑗) + 1)) · (𝑇↑((2 · 𝑗) + 1))))))
382 simpr 476 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = 𝑘) → 𝑗 = 𝑘)
383382oveq2d 6565 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = 𝑘) → (2 · 𝑗) = (2 · 𝑘))
384383oveq1d 6564 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = 𝑘) → ((2 · 𝑗) + 1) = ((2 · 𝑘) + 1))
385384oveq2d 6565 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = 𝑘) → (1 / ((2 · 𝑗) + 1)) = (1 / ((2 · 𝑘) + 1)))
386384oveq2d 6565 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = 𝑘) → (𝑇↑((2 · 𝑗) + 1)) = (𝑇↑((2 · 𝑘) + 1)))
387385, 386oveq12d 6567 . . . . . . 7 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = 𝑘) → ((1 / ((2 · 𝑗) + 1)) · (𝑇↑((2 · 𝑗) + 1))) = ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1))))
388387oveq2d 6565 . . . . . 6 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = 𝑘) → (2 · ((1 / ((2 · 𝑗) + 1)) · (𝑇↑((2 · 𝑗) + 1)))) = (2 · ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1)))))
389346, 359reccld 10673 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → (1 / ((2 · 𝑘) + 1)) ∈ ℂ)
390389, 341mulcld 9939 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1))) ∈ ℂ)
391342, 390mulcld 9939 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (2 · ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1)))) ∈ ℂ)
392381, 388, 327, 391fvmptd 6197 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → (𝐻𝑘) = (2 · ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1)))))
393208a1i 11 . . . . . . . . 9 (𝑘 ∈ ℕ0 → 1 ∈ ℕ0)
394334, 393nn0addcld 11232 . . . . . . . 8 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ0)
395168, 171, 172, 394fvmptd 6197 . . . . . . 7 (𝑘 ∈ ℕ0 → (𝐺𝑘) = ((2 · 𝑘) + 1))
396395adantl 481 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (𝐺𝑘) = ((2 · 𝑘) + 1))
397396fveq2d 6107 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → (𝐹‘(𝐺𝑘)) = (𝐹‘((2 · 𝑘) + 1)))
398379, 392, 3973eqtr4d 2654 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (𝐻𝑘) = (𝐹‘(𝐺𝑘)))
399145, 1, 146, 2, 155, 188, 316, 317, 398isercoll2 14247 . . 3 (𝜑 → (seq0( + , 𝐻) ⇝ ((log‘(1 + 𝑇)) − (log‘(1 − 𝑇))) ↔ seq1( + , 𝐹) ⇝ ((log‘(1 + 𝑇)) − (log‘(1 − 𝑇)))))
400144, 399mpbird 246 . 2 (𝜑 → seq0( + , 𝐻) ⇝ ((log‘(1 + 𝑇)) − (log‘(1 − 𝑇))))
40151, 13resubcld 10337 . . . 4 (𝜑 → (1 − 𝑇) ∈ ℝ)
40214subidd 10259 . . . . . 6 (𝜑 → (𝑇𝑇) = 0)
403402eqcomd 2616 . . . . 5 (𝜑 → 0 = (𝑇𝑇))
40413, 51, 13, 139ltsub1dd 10518 . . . . 5 (𝜑 → (𝑇𝑇) < (1 − 𝑇))
405403, 404eqbrtrd 4605 . . . 4 (𝜑 → 0 < (1 − 𝑇))
406401, 405elrpd 11745 . . 3 (𝜑 → (1 − 𝑇) ∈ ℝ+)
407133, 406relogdivd 24176 . 2 (𝜑 → (log‘((1 + 𝑇) / (1 − 𝑇))) = ((log‘(1 + 𝑇)) − (log‘(1 − 𝑇))))
408400, 407breqtrrd 4611 1 (𝜑 → seq0( + , 𝐻) ⇝ (log‘((1 + 𝑇) / (1 − 𝑇))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 195  wo 382  wa 383   = wceq 1475  wcel 1977  wne 2780  wral 2896  wrex 2897  Vcvv 3173  cdif 3537   class class class wbr 4583  cmpt 4643  ran crn 5039  ccom 5042  wf 5800  cfv 5804  (class class class)co 6549  cc 9813  cr 9814  0cc0 9815  1c1 9816   + caddc 9818   · cmul 9820  *cxr 9952   < clt 9953  cle 9954  cmin 10145  -cneg 10146   / cdiv 10563  cn 10897  2c2 10947  0cn0 11169  cz 11254  cuz 11563  +crp 11708  ...cfz 12197  seqcseq 12663  cexp 12722  abscabs 13822  cli 14063  cdvds 14821  ∞Metcxmt 19552  ballcbl 19554  logclog 24105
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-rep 4699  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847  ax-inf2 8421  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  ax-addf 9894  ax-mulf 9895
This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3or 1032  df-3an 1033  df-tru 1478  df-fal 1481  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-int 4411  df-iun 4457  df-iin 4458  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-se 4998  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-isom 5813  df-riota 6511  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-of 6795  df-om 6958  df-1st 7059  df-2nd 7060  df-supp 7183  df-wrecs 7294  df-recs 7355  df-rdg 7393  df-1o 7447  df-2o 7448  df-oadd 7451  df-er 7629  df-map 7746  df-pm 7747  df-ixp 7795  df-en 7842  df-dom 7843  df-sdom 7844  df-fin 7845  df-fsupp 8159  df-fi 8200  df-sup 8231  df-inf 8232  df-oi 8298  df-card 8648  df-cda 8873  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-3 10957  df-4 10958  df-5 10959  df-6 10960  df-7 10961  df-8 10962  df-9 10963  df-n0 11170  df-xnn0 11241  df-z 11255  df-dec 11370  df-uz 11564  df-q 11665  df-rp 11709  df-xneg 11822  df-xadd 11823  df-xmul 11824  df-ioo 12050  df-ioc 12051  df-ico 12052  df-icc 12053  df-fz 12198  df-fzo 12335  df-fl 12455  df-mod 12531  df-seq 12664  df-exp 12723  df-fac 12923  df-bc 12952  df-hash 12980  df-shft 13655  df-cj 13687  df-re 13688  df-im 13689  df-sqrt 13823  df-abs 13824  df-limsup 14050  df-clim 14067  df-rlim 14068  df-sum 14265  df-ef 14637  df-sin 14639  df-cos 14640  df-tan 14641  df-pi 14642  df-dvds 14822  df-struct 15697  df-ndx 15698  df-slot 15699  df-base 15700  df-sets 15701  df-ress 15702  df-plusg 15781  df-mulr 15782  df-starv 15783  df-sca 15784  df-vsca 15785  df-ip 15786  df-tset 15787  df-ple 15788  df-ds 15791  df-unif 15792  df-hom 15793  df-cco 15794  df-rest 15906  df-topn 15907  df-0g 15925  df-gsum 15926  df-topgen 15927  df-pt 15928  df-prds 15931  df-xrs 15985  df-qtop 15990  df-imas 15991  df-xps 15993  df-mre 16069  df-mrc 16070  df-acs 16072  df-mgm 17065  df-sgrp 17107  df-mnd 17118  df-submnd 17159  df-mulg 17364  df-cntz 17573  df-cmn 18018  df-psmet 19559  df-xmet 19560  df-met 19561  df-bl 19562  df-mopn 19563  df-fbas 19564  df-fg 19565  df-cnfld 19568  df-top 20521  df-bases 20522  df-topon 20523  df-topsp 20524  df-cld 20633  df-ntr 20634  df-cls 20635  df-nei 20712  df-lp 20750  df-perf 20751  df-cn 20841  df-cnp 20842  df-haus 20929  df-cmp 21000  df-tx 21175  df-hmeo 21368  df-fil 21460  df-fm 21552  df-flim 21553  df-flf 21554  df-xms 21935  df-ms 21936  df-tms 21937  df-cncf 22489  df-limc 23436  df-dv 23437  df-ulm 23935  df-log 24107
This theorem is referenced by:  stirlinglem6  38972
  Copyright terms: Public domain W3C validator