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 40295
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 11723 . . . . 5 ℕ = (ℤ‘1)
2 1zzd 11408 . . . . 5 (𝜑 → 1 ∈ ℤ)
3 stirlinglem5.1 . . . . . . . . 9 𝐷 = (𝑗 ∈ ℕ ↦ ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)))
43a1i 11 . . . . . . . 8 (𝜑𝐷 = (𝑗 ∈ ℕ ↦ ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗))))
5 1cnd 10056 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → 1 ∈ ℂ)
65negcld 10379 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → -1 ∈ ℂ)
7 nnm1nn0 11334 . . . . . . . . . . . . 13 (𝑗 ∈ ℕ → (𝑗 − 1) ∈ ℕ0)
87adantl 482 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → (𝑗 − 1) ∈ ℕ0)
96, 8expcld 13008 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (-1↑(𝑗 − 1)) ∈ ℂ)
10 nncn 11028 . . . . . . . . . . . 12 (𝑗 ∈ ℕ → 𝑗 ∈ ℂ)
1110adantl 482 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℂ)
12 stirlinglem5.6 . . . . . . . . . . . . . . 15 (𝜑𝑇 ∈ ℝ+)
1312rpred 11872 . . . . . . . . . . . . . 14 (𝜑𝑇 ∈ ℝ)
1413recnd 10068 . . . . . . . . . . . . 13 (𝜑𝑇 ∈ ℂ)
1514adantr 481 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → 𝑇 ∈ ℂ)
16 nnnn0 11299 . . . . . . . . . . . . 13 (𝑗 ∈ ℕ → 𝑗 ∈ ℕ0)
1716adantl 482 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → 𝑗 ∈ ℕ0)
1815, 17expcld 13008 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (𝑇𝑗) ∈ ℂ)
19 nnne0 11053 . . . . . . . . . . . 12 (𝑗 ∈ ℕ → 𝑗 ≠ 0)
2019adantl 482 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → 𝑗 ≠ 0)
219, 11, 18, 20div32d 10824 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (((-1↑(𝑗 − 1)) / 𝑗) · (𝑇𝑗)) = ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)))
225, 15pncan2d 10394 . . . . . . . . . . . . 13 ((𝜑𝑗 ∈ ℕ) → ((1 + 𝑇) − 1) = 𝑇)
2322eqcomd 2628 . . . . . . . . . . . 12 ((𝜑𝑗 ∈ ℕ) → 𝑇 = ((1 + 𝑇) − 1))
2423oveq1d 6665 . . . . . . . . . . 11 ((𝜑𝑗 ∈ ℕ) → (𝑇𝑗) = (((1 + 𝑇) − 1)↑𝑗))
2524oveq2d 6666 . . . . . . . . . 10 ((𝜑𝑗 ∈ ℕ) → (((-1↑(𝑗 − 1)) / 𝑗) · (𝑇𝑗)) = (((-1↑(𝑗 − 1)) / 𝑗) · (((1 + 𝑇) − 1)↑𝑗)))
2621, 25eqtr3d 2658 . . . . . . . . 9 ((𝜑𝑗 ∈ ℕ) → ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) = (((-1↑(𝑗 − 1)) / 𝑗) · (((1 + 𝑇) − 1)↑𝑗)))
2726mpteq2dva 4744 . . . . . . . 8 (𝜑 → (𝑗 ∈ ℕ ↦ ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗))) = (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) / 𝑗) · (((1 + 𝑇) − 1)↑𝑗))))
284, 27eqtrd 2656 . . . . . . 7 (𝜑𝐷 = (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) / 𝑗) · (((1 + 𝑇) − 1)↑𝑗))))
2928seqeq3d 12809 . . . . . 6 (𝜑 → seq1( + , 𝐷) = seq1( + , (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) / 𝑗) · (((1 + 𝑇) − 1)↑𝑗)))))
30 1cnd 10056 . . . . . . . . . 10 (𝜑 → 1 ∈ ℂ)
3130, 14addcld 10059 . . . . . . . . . 10 (𝜑 → (1 + 𝑇) ∈ ℂ)
32 eqid 2622 . . . . . . . . . . 11 (abs ∘ − ) = (abs ∘ − )
3332cnmetdval 22574 . . . . . . . . . 10 ((1 ∈ ℂ ∧ (1 + 𝑇) ∈ ℂ) → (1(abs ∘ − )(1 + 𝑇)) = (abs‘(1 − (1 + 𝑇))))
3430, 31, 33syl2anc 693 . . . . . . . . 9 (𝜑 → (1(abs ∘ − )(1 + 𝑇)) = (abs‘(1 − (1 + 𝑇))))
35 1m1e0 11089 . . . . . . . . . . . . . 14 (1 − 1) = 0
3635a1i 11 . . . . . . . . . . . . 13 (𝜑 → (1 − 1) = 0)
3736oveq1d 6665 . . . . . . . . . . . 12 (𝜑 → ((1 − 1) − 𝑇) = (0 − 𝑇))
3830, 30, 14subsub4d 10423 . . . . . . . . . . . 12 (𝜑 → ((1 − 1) − 𝑇) = (1 − (1 + 𝑇)))
39 df-neg 10269 . . . . . . . . . . . . . 14 -𝑇 = (0 − 𝑇)
4039eqcomi 2631 . . . . . . . . . . . . 13 (0 − 𝑇) = -𝑇
4140a1i 11 . . . . . . . . . . . 12 (𝜑 → (0 − 𝑇) = -𝑇)
4237, 38, 413eqtr3d 2664 . . . . . . . . . . 11 (𝜑 → (1 − (1 + 𝑇)) = -𝑇)
4342fveq2d 6195 . . . . . . . . . 10 (𝜑 → (abs‘(1 − (1 + 𝑇))) = (abs‘-𝑇))
4414absnegd 14188 . . . . . . . . . . 11 (𝜑 → (abs‘-𝑇) = (abs‘𝑇))
45 stirlinglem5.7 . . . . . . . . . . 11 (𝜑 → (abs‘𝑇) < 1)
4644, 45eqbrtrd 4675 . . . . . . . . . 10 (𝜑 → (abs‘-𝑇) < 1)
4743, 46eqbrtrd 4675 . . . . . . . . 9 (𝜑 → (abs‘(1 − (1 + 𝑇))) < 1)
4834, 47eqbrtrd 4675 . . . . . . . 8 (𝜑 → (1(abs ∘ − )(1 + 𝑇)) < 1)
49 cnxmet 22576 . . . . . . . . . 10 (abs ∘ − ) ∈ (∞Met‘ℂ)
5049a1i 11 . . . . . . . . 9 (𝜑 → (abs ∘ − ) ∈ (∞Met‘ℂ))
51 1red 10055 . . . . . . . . . 10 (𝜑 → 1 ∈ ℝ)
5251rexrd 10089 . . . . . . . . 9 (𝜑 → 1 ∈ ℝ*)
53 elbl2 22195 . . . . . . . . 9 ((((abs ∘ − ) ∈ (∞Met‘ℂ) ∧ 1 ∈ ℝ*) ∧ (1 ∈ ℂ ∧ (1 + 𝑇) ∈ ℂ)) → ((1 + 𝑇) ∈ (1(ball‘(abs ∘ − ))1) ↔ (1(abs ∘ − )(1 + 𝑇)) < 1))
5450, 52, 30, 31, 53syl22anc 1327 . . . . . . . 8 (𝜑 → ((1 + 𝑇) ∈ (1(ball‘(abs ∘ − ))1) ↔ (1(abs ∘ − )(1 + 𝑇)) < 1))
5548, 54mpbird 247 . . . . . . 7 (𝜑 → (1 + 𝑇) ∈ (1(ball‘(abs ∘ − ))1))
56 eqid 2622 . . . . . . . 8 (1(ball‘(abs ∘ − ))1) = (1(ball‘(abs ∘ − ))1)
5756logtayl2 24408 . . . . . . 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 4675 . . . . 5 (𝜑 → seq1( + , 𝐷) ⇝ (log‘(1 + 𝑇)))
60 seqex 12803 . . . . . 6 seq1( + , 𝐹) ∈ V
6160a1i 11 . . . . 5 (𝜑 → seq1( + , 𝐹) ∈ V)
62 stirlinglem5.2 . . . . . . . 8 𝐸 = (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗))
6362a1i 11 . . . . . . 7 (𝜑𝐸 = (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗)))
6463seqeq3d 12809 . . . . . 6 (𝜑 → seq1( + , 𝐸) = seq1( + , (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗))))
65 logtayl 24406 . . . . . . 7 ((𝑇 ∈ ℂ ∧ (abs‘𝑇) < 1) → seq1( + , (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗))) ⇝ -(log‘(1 − 𝑇)))
6614, 45, 65syl2anc 693 . . . . . 6 (𝜑 → seq1( + , (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗))) ⇝ -(log‘(1 − 𝑇)))
6764, 66eqbrtrd 4675 . . . . 5 (𝜑 → seq1( + , 𝐸) ⇝ -(log‘(1 − 𝑇)))
68 simpr 477 . . . . . . 7 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ ℕ)
6968, 1syl6eleq 2711 . . . . . 6 ((𝜑𝑘 ∈ ℕ) → 𝑘 ∈ (ℤ‘1))
703a1i 11 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝐷 = (𝑗 ∈ ℕ ↦ ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗))))
71 oveq1 6657 . . . . . . . . . . 11 (𝑗 = 𝑛 → (𝑗 − 1) = (𝑛 − 1))
7271oveq2d 6666 . . . . . . . . . 10 (𝑗 = 𝑛 → (-1↑(𝑗 − 1)) = (-1↑(𝑛 − 1)))
73 oveq2 6658 . . . . . . . . . . 11 (𝑗 = 𝑛 → (𝑇𝑗) = (𝑇𝑛))
74 id 22 . . . . . . . . . . 11 (𝑗 = 𝑛𝑗 = 𝑛)
7573, 74oveq12d 6668 . . . . . . . . . 10 (𝑗 = 𝑛 → ((𝑇𝑗) / 𝑗) = ((𝑇𝑛) / 𝑛))
7672, 75oveq12d 6668 . . . . . . . . 9 (𝑗 = 𝑛 → ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) = ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)))
7776adantl 482 . . . . . . . 8 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) ∧ 𝑗 = 𝑛) → ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) = ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)))
78 elfznn 12370 . . . . . . . . 9 (𝑛 ∈ (1...𝑘) → 𝑛 ∈ ℕ)
7978adantl 482 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 ∈ ℕ)
80 1cnd 10056 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → 1 ∈ ℂ)
8180negcld 10379 . . . . . . . . . . 11 (𝑛 ∈ ℕ → -1 ∈ ℂ)
82 nnm1nn0 11334 . . . . . . . . . . 11 (𝑛 ∈ ℕ → (𝑛 − 1) ∈ ℕ0)
8381, 82expcld 13008 . . . . . . . . . 10 (𝑛 ∈ ℕ → (-1↑(𝑛 − 1)) ∈ ℂ)
8479, 83syl 17 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (-1↑(𝑛 − 1)) ∈ ℂ)
8514ad2antrr 762 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑇 ∈ ℂ)
8679nnnn0d 11351 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 ∈ ℕ0)
8785, 86expcld 13008 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝑇𝑛) ∈ ℂ)
8879nncnd 11036 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 ∈ ℂ)
8979nnne0d 11065 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝑛 ≠ 0)
9087, 88, 89divcld 10801 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → ((𝑇𝑛) / 𝑛) ∈ ℂ)
9184, 90mulcld 10060 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) ∈ ℂ)
9270, 77, 79, 91fvmptd 6288 . . . . . . 7 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝐷𝑛) = ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)))
9392, 91eqeltrd 2701 . . . . . 6 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝐷𝑛) ∈ ℂ)
94 addcl 10018 . . . . . . 7 ((𝑛 ∈ ℂ ∧ 𝑖 ∈ ℂ) → (𝑛 + 𝑖) ∈ ℂ)
9594adantl 482 . . . . . 6 (((𝜑𝑘 ∈ ℕ) ∧ (𝑛 ∈ ℂ ∧ 𝑖 ∈ ℂ)) → (𝑛 + 𝑖) ∈ ℂ)
9669, 93, 95seqcl 12821 . . . . 5 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐷)‘𝑘) ∈ ℂ)
9762a1i 11 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝐸 = (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗)))
9875adantl 482 . . . . . . . 8 ((((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) ∧ 𝑗 = 𝑛) → ((𝑇𝑗) / 𝑗) = ((𝑇𝑛) / 𝑛))
9997, 98, 79, 90fvmptd 6288 . . . . . . 7 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝐸𝑛) = ((𝑇𝑛) / 𝑛))
10099, 90eqeltrd 2701 . . . . . 6 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝐸𝑛) ∈ ℂ)
10169, 100, 95seqcl 12821 . . . . 5 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐸)‘𝑘) ∈ ℂ)
102 simpll 790 . . . . . . 7 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → 𝜑)
103 stirlinglem5.3 . . . . . . . . . 10 𝐹 = (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) + ((𝑇𝑗) / 𝑗)))
104103a1i 11 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → 𝐹 = (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) + ((𝑇𝑗) / 𝑗))))
10576, 75oveq12d 6668 . . . . . . . . . 10 (𝑗 = 𝑛 → (((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) + ((𝑇𝑗) / 𝑗)) = (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)))
106105adantl 482 . . . . . . . . 9 (((𝜑𝑛 ∈ ℕ) ∧ 𝑗 = 𝑛) → (((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) + ((𝑇𝑗) / 𝑗)) = (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)))
107 simpr 477 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
10883adantl 482 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → (-1↑(𝑛 − 1)) ∈ ℂ)
10914adantr 481 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → 𝑇 ∈ ℂ)
110107nnnn0d 11351 . . . . . . . . . . . . 13 ((𝜑𝑛 ∈ ℕ) → 𝑛 ∈ ℕ0)
111109, 110expcld 13008 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → (𝑇𝑛) ∈ ℂ)
112107nncnd 11036 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → 𝑛 ∈ ℂ)
113107nnne0d 11065 . . . . . . . . . . . 12 ((𝜑𝑛 ∈ ℕ) → 𝑛 ≠ 0)
114111, 112, 113divcld 10801 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → ((𝑇𝑛) / 𝑛) ∈ ℂ)
115108, 114mulcld 10060 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) ∈ ℂ)
116115, 114addcld 10059 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)) ∈ ℂ)
117104, 106, 107, 116fvmptd 6288 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) = (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)))
1183a1i 11 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → 𝐷 = (𝑗 ∈ ℕ ↦ ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗))))
11976adantl 482 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑗 = 𝑛) → ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) = ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)))
120118, 119, 107, 115fvmptd 6288 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝐷𝑛) = ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)))
121120eqcomd 2628 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) = (𝐷𝑛))
12262a1i 11 . . . . . . . . . . 11 ((𝜑𝑛 ∈ ℕ) → 𝐸 = (𝑗 ∈ ℕ ↦ ((𝑇𝑗) / 𝑗)))
12375adantl 482 . . . . . . . . . . 11 (((𝜑𝑛 ∈ ℕ) ∧ 𝑗 = 𝑛) → ((𝑇𝑗) / 𝑗) = ((𝑇𝑛) / 𝑛))
124122, 123, 107, 114fvmptd 6288 . . . . . . . . . 10 ((𝜑𝑛 ∈ ℕ) → (𝐸𝑛) = ((𝑇𝑛) / 𝑛))
125124eqcomd 2628 . . . . . . . . 9 ((𝜑𝑛 ∈ ℕ) → ((𝑇𝑛) / 𝑛) = (𝐸𝑛))
126121, 125oveq12d 6668 . . . . . . . 8 ((𝜑𝑛 ∈ ℕ) → (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)) = ((𝐷𝑛) + (𝐸𝑛)))
127117, 126eqtrd 2656 . . . . . . 7 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) = ((𝐷𝑛) + (𝐸𝑛)))
128102, 79, 127syl2anc 693 . . . . . 6 (((𝜑𝑘 ∈ ℕ) ∧ 𝑛 ∈ (1...𝑘)) → (𝐹𝑛) = ((𝐷𝑛) + (𝐸𝑛)))
12969, 93, 100, 128seradd 12843 . . . . 5 ((𝜑𝑘 ∈ ℕ) → (seq1( + , 𝐹)‘𝑘) = ((seq1( + , 𝐷)‘𝑘) + (seq1( + , 𝐸)‘𝑘)))
1301, 2, 59, 61, 67, 96, 101, 129climadd 14362 . . . 4 (𝜑 → seq1( + , 𝐹) ⇝ ((log‘(1 + 𝑇)) + -(log‘(1 − 𝑇))))
131 1rp 11836 . . . . . . . . 9 1 ∈ ℝ+
132131a1i 11 . . . . . . . 8 (𝜑 → 1 ∈ ℝ+)
133132, 12rpaddcld 11887 . . . . . . 7 (𝜑 → (1 + 𝑇) ∈ ℝ+)
134133rpne0d 11877 . . . . . 6 (𝜑 → (1 + 𝑇) ≠ 0)
13531, 134logcld 24317 . . . . 5 (𝜑 → (log‘(1 + 𝑇)) ∈ ℂ)
13630, 14subcld 10392 . . . . . 6 (𝜑 → (1 − 𝑇) ∈ ℂ)
13713, 51absltd 14168 . . . . . . . . . 10 (𝜑 → ((abs‘𝑇) < 1 ↔ (-1 < 𝑇𝑇 < 1)))
13845, 137mpbid 222 . . . . . . . . 9 (𝜑 → (-1 < 𝑇𝑇 < 1))
139138simprd 479 . . . . . . . 8 (𝜑𝑇 < 1)
14013, 139gtned 10172 . . . . . . 7 (𝜑 → 1 ≠ 𝑇)
14130, 14, 140subne0d 10401 . . . . . 6 (𝜑 → (1 − 𝑇) ≠ 0)
142136, 141logcld 24317 . . . . 5 (𝜑 → (log‘(1 − 𝑇)) ∈ ℂ)
143135, 142negsubd 10398 . . . 4 (𝜑 → ((log‘(1 + 𝑇)) + -(log‘(1 − 𝑇))) = ((log‘(1 + 𝑇)) − (log‘(1 − 𝑇))))
144130, 143breqtrd 4679 . . 3 (𝜑 → seq1( + , 𝐹) ⇝ ((log‘(1 + 𝑇)) − (log‘(1 − 𝑇))))
145 nn0uz 11722 . . . 4 0 = (ℤ‘0)
146 0zd 11389 . . . 4 (𝜑 → 0 ∈ ℤ)
147 stirlinglem5.5 . . . . . 6 𝐺 = (𝑗 ∈ ℕ0 ↦ ((2 · 𝑗) + 1))
148 2nn0 11309 . . . . . . . . 9 2 ∈ ℕ0
149148a1i 11 . . . . . . . 8 (𝑗 ∈ ℕ0 → 2 ∈ ℕ0)
150 id 22 . . . . . . . 8 (𝑗 ∈ ℕ0𝑗 ∈ ℕ0)
151149, 150nn0mulcld 11356 . . . . . . 7 (𝑗 ∈ ℕ0 → (2 · 𝑗) ∈ ℕ0)
152 nn0p1nn 11332 . . . . . . 7 ((2 · 𝑗) ∈ ℕ0 → ((2 · 𝑗) + 1) ∈ ℕ)
153151, 152syl 17 . . . . . 6 (𝑗 ∈ ℕ0 → ((2 · 𝑗) + 1) ∈ ℕ)
154147, 153fmpti 6383 . . . . 5 𝐺:ℕ0⟶ℕ
155154a1i 11 . . . 4 (𝜑𝐺:ℕ0⟶ℕ)
156 2re 11090 . . . . . . . . 9 2 ∈ ℝ
157156a1i 11 . . . . . . . 8 (𝑘 ∈ ℕ0 → 2 ∈ ℝ)
158 nn0re 11301 . . . . . . . 8 (𝑘 ∈ ℕ0𝑘 ∈ ℝ)
159157, 158remulcld 10070 . . . . . . 7 (𝑘 ∈ ℕ0 → (2 · 𝑘) ∈ ℝ)
160 1red 10055 . . . . . . . . 9 (𝑘 ∈ ℕ0 → 1 ∈ ℝ)
161158, 160readdcld 10069 . . . . . . . 8 (𝑘 ∈ ℕ0 → (𝑘 + 1) ∈ ℝ)
162157, 161remulcld 10070 . . . . . . 7 (𝑘 ∈ ℕ0 → (2 · (𝑘 + 1)) ∈ ℝ)
163 2rp 11837 . . . . . . . . 9 2 ∈ ℝ+
164163a1i 11 . . . . . . . 8 (𝑘 ∈ ℕ0 → 2 ∈ ℝ+)
165158ltp1d 10954 . . . . . . . 8 (𝑘 ∈ ℕ0𝑘 < (𝑘 + 1))
166158, 161, 164, 165ltmul2dd 11928 . . . . . . 7 (𝑘 ∈ ℕ0 → (2 · 𝑘) < (2 · (𝑘 + 1)))
167159, 162, 160, 166ltadd1dd 10638 . . . . . 6 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) < ((2 · (𝑘 + 1)) + 1))
168147a1i 11 . . . . . . 7 (𝑘 ∈ ℕ0𝐺 = (𝑗 ∈ ℕ0 ↦ ((2 · 𝑗) + 1)))
169 simpr 477 . . . . . . . . 9 ((𝑘 ∈ ℕ0𝑗 = 𝑘) → 𝑗 = 𝑘)
170169oveq2d 6666 . . . . . . . 8 ((𝑘 ∈ ℕ0𝑗 = 𝑘) → (2 · 𝑗) = (2 · 𝑘))
171170oveq1d 6665 . . . . . . 7 ((𝑘 ∈ ℕ0𝑗 = 𝑘) → ((2 · 𝑗) + 1) = ((2 · 𝑘) + 1))
172 id 22 . . . . . . 7 (𝑘 ∈ ℕ0𝑘 ∈ ℕ0)
173 2cnd 11093 . . . . . . . . 9 (𝑘 ∈ ℕ0 → 2 ∈ ℂ)
174 nn0cn 11302 . . . . . . . . 9 (𝑘 ∈ ℕ0𝑘 ∈ ℂ)
175173, 174mulcld 10060 . . . . . . . 8 (𝑘 ∈ ℕ0 → (2 · 𝑘) ∈ ℂ)
176 1cnd 10056 . . . . . . . 8 (𝑘 ∈ ℕ0 → 1 ∈ ℂ)
177175, 176addcld 10059 . . . . . . 7 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℂ)
178168, 171, 172, 177fvmptd 6288 . . . . . 6 (𝑘 ∈ ℕ0 → (𝐺𝑘) = ((2 · 𝑘) + 1))
179 simpr 477 . . . . . . . . 9 ((𝑘 ∈ ℕ0𝑗 = (𝑘 + 1)) → 𝑗 = (𝑘 + 1))
180179oveq2d 6666 . . . . . . . 8 ((𝑘 ∈ ℕ0𝑗 = (𝑘 + 1)) → (2 · 𝑗) = (2 · (𝑘 + 1)))
181180oveq1d 6665 . . . . . . 7 ((𝑘 ∈ ℕ0𝑗 = (𝑘 + 1)) → ((2 · 𝑗) + 1) = ((2 · (𝑘 + 1)) + 1))
182 peano2nn0 11333 . . . . . . 7 (𝑘 ∈ ℕ0 → (𝑘 + 1) ∈ ℕ0)
183174, 176addcld 10059 . . . . . . . . 9 (𝑘 ∈ ℕ0 → (𝑘 + 1) ∈ ℂ)
184173, 183mulcld 10060 . . . . . . . 8 (𝑘 ∈ ℕ0 → (2 · (𝑘 + 1)) ∈ ℂ)
185184, 176addcld 10059 . . . . . . 7 (𝑘 ∈ ℕ0 → ((2 · (𝑘 + 1)) + 1) ∈ ℂ)
186168, 181, 182, 185fvmptd 6288 . . . . . 6 (𝑘 ∈ ℕ0 → (𝐺‘(𝑘 + 1)) = ((2 · (𝑘 + 1)) + 1))
187167, 178, 1863brtr4d 4685 . . . . 5 (𝑘 ∈ ℕ0 → (𝐺𝑘) < (𝐺‘(𝑘 + 1)))
188187adantl 482 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (𝐺𝑘) < (𝐺‘(𝑘 + 1)))
189 eldifi 3732 . . . . . . 7 (𝑛 ∈ (ℕ ∖ ran 𝐺) → 𝑛 ∈ ℕ)
190189adantl 482 . . . . . 6 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → 𝑛 ∈ ℕ)
191 1cnd 10056 . . . . . . . . . . 11 (𝑛 ∈ (ℕ ∖ ran 𝐺) → 1 ∈ ℂ)
192191negcld 10379 . . . . . . . . . 10 (𝑛 ∈ (ℕ ∖ ran 𝐺) → -1 ∈ ℂ)
193189, 82syl 17 . . . . . . . . . 10 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (𝑛 − 1) ∈ ℕ0)
194192, 193expcld 13008 . . . . . . . . 9 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (-1↑(𝑛 − 1)) ∈ ℂ)
195194adantl 482 . . . . . . . 8 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (-1↑(𝑛 − 1)) ∈ ℂ)
19614adantr 481 . . . . . . . . . 10 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → 𝑇 ∈ ℂ)
197190nnnn0d 11351 . . . . . . . . . 10 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → 𝑛 ∈ ℕ0)
198196, 197expcld 13008 . . . . . . . . 9 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (𝑇𝑛) ∈ ℂ)
199190nncnd 11036 . . . . . . . . 9 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → 𝑛 ∈ ℂ)
200190nnne0d 11065 . . . . . . . . 9 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → 𝑛 ≠ 0)
201198, 199, 200divcld 10801 . . . . . . . 8 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → ((𝑇𝑛) / 𝑛) ∈ ℂ)
202195, 201mulcld 10060 . . . . . . 7 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) ∈ ℂ)
203202, 201addcld 10059 . . . . . 6 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)) ∈ ℂ)
204105, 103fvmptg 6280 . . . . . 6 ((𝑛 ∈ ℕ ∧ (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)) ∈ ℂ) → (𝐹𝑛) = (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)))
205190, 203, 204syl2anc 693 . . . . 5 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (𝐹𝑛) = (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)))
206 eldifn 3733 . . . . . . . . . . . 12 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ¬ 𝑛 ∈ ran 𝐺)
207 0nn0 11307 . . . . . . . . . . . . . . . 16 0 ∈ ℕ0
208 1nn0 11308 . . . . . . . . . . . . . . . . 17 1 ∈ ℕ0
209148, 208num0h 11509 . . . . . . . . . . . . . . . 16 1 = ((2 · 0) + 1)
210 oveq2 6658 . . . . . . . . . . . . . . . . . . 19 (𝑗 = 0 → (2 · 𝑗) = (2 · 0))
211210oveq1d 6665 . . . . . . . . . . . . . . . . . 18 (𝑗 = 0 → ((2 · 𝑗) + 1) = ((2 · 0) + 1))
212211eqeq2d 2632 . . . . . . . . . . . . . . . . 17 (𝑗 = 0 → (1 = ((2 · 𝑗) + 1) ↔ 1 = ((2 · 0) + 1)))
213212rspcev 3309 . . . . . . . . . . . . . . . 16 ((0 ∈ ℕ0 ∧ 1 = ((2 · 0) + 1)) → ∃𝑗 ∈ ℕ0 1 = ((2 · 𝑗) + 1))
214207, 209, 213mp2an 708 . . . . . . . . . . . . . . 15 𝑗 ∈ ℕ0 1 = ((2 · 𝑗) + 1)
215 ax-1cn 9994 . . . . . . . . . . . . . . . 16 1 ∈ ℂ
216147elrnmpt 5372 . . . . . . . . . . . . . . . 16 (1 ∈ ℂ → (1 ∈ ran 𝐺 ↔ ∃𝑗 ∈ ℕ0 1 = ((2 · 𝑗) + 1)))
217215, 216ax-mp 5 . . . . . . . . . . . . . . 15 (1 ∈ ran 𝐺 ↔ ∃𝑗 ∈ ℕ0 1 = ((2 · 𝑗) + 1))
218214, 217mpbir 221 . . . . . . . . . . . . . 14 1 ∈ ran 𝐺
219218a1i 11 . . . . . . . . . . . . 13 (𝑛 = 1 → 1 ∈ ran 𝐺)
220 eleq1 2689 . . . . . . . . . . . . 13 (𝑛 = 1 → (𝑛 ∈ ran 𝐺 ↔ 1 ∈ ran 𝐺))
221219, 220mpbird 247 . . . . . . . . . . . 12 (𝑛 = 1 → 𝑛 ∈ ran 𝐺)
222206, 221nsyl 135 . . . . . . . . . . 11 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ¬ 𝑛 = 1)
223 nn1m1nn 11040 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ → (𝑛 = 1 ∨ (𝑛 − 1) ∈ ℕ))
224189, 223syl 17 . . . . . . . . . . . 12 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (𝑛 = 1 ∨ (𝑛 − 1) ∈ ℕ))
225224ord 392 . . . . . . . . . . 11 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (¬ 𝑛 = 1 → (𝑛 − 1) ∈ ℕ))
226222, 225mpd 15 . . . . . . . . . 10 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (𝑛 − 1) ∈ ℕ)
227 nfcv 2764 . . . . . . . . . . . . . . . . . 18 𝑗
228 nfmpt1 4747 . . . . . . . . . . . . . . . . . . . 20 𝑗(𝑗 ∈ ℕ0 ↦ ((2 · 𝑗) + 1))
229147, 228nfcxfr 2762 . . . . . . . . . . . . . . . . . . 19 𝑗𝐺
230229nfrn 5368 . . . . . . . . . . . . . . . . . 18 𝑗ran 𝐺
231227, 230nfdif 3731 . . . . . . . . . . . . . . . . 17 𝑗(ℕ ∖ ran 𝐺)
232231nfcri 2758 . . . . . . . . . . . . . . . 16 𝑗 𝑛 ∈ (ℕ ∖ ran 𝐺)
233147elrnmpt 5372 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (𝑛 ∈ ran 𝐺 ↔ ∃𝑗 ∈ ℕ0 𝑛 = ((2 · 𝑗) + 1)))
234206, 233mtbid 314 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ¬ ∃𝑗 ∈ ℕ0 𝑛 = ((2 · 𝑗) + 1))
235 ralnex 2992 . . . . . . . . . . . . . . . . . . . . . . . 24 (∀𝑗 ∈ ℕ0 ¬ 𝑛 = ((2 · 𝑗) + 1) ↔ ¬ ∃𝑗 ∈ ℕ0 𝑛 = ((2 · 𝑗) + 1))
236234, 235sylibr 224 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ∀𝑗 ∈ ℕ0 ¬ 𝑛 = ((2 · 𝑗) + 1))
237236r19.21bi 2932 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℕ0) → ¬ 𝑛 = ((2 · 𝑗) + 1))
238237neqned 2801 . . . . . . . . . . . . . . . . . . . . 21 ((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℕ0) → 𝑛 ≠ ((2 · 𝑗) + 1))
239238necomd 2849 . . . . . . . . . . . . . . . . . . . 20 ((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℕ0) → ((2 · 𝑗) + 1) ≠ 𝑛)
240239adantlr 751 . . . . . . . . . . . . . . . . . . 19 (((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℤ) ∧ 𝑗 ∈ ℕ0) → ((2 · 𝑗) + 1) ≠ 𝑛)
241 simplr 792 . . . . . . . . . . . . . . . . . . . 20 (((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℤ) ∧ ¬ 𝑗 ∈ ℕ0) → 𝑗 ∈ ℤ)
242 simpr 477 . . . . . . . . . . . . . . . . . . . 20 (((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℤ) ∧ ¬ 𝑗 ∈ ℕ0) → ¬ 𝑗 ∈ ℕ0)
243189ad2antrr 762 . . . . . . . . . . . . . . . . . . . 20 (((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℤ) ∧ ¬ 𝑗 ∈ ℕ0) → 𝑛 ∈ ℕ)
244156a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 2 ∈ ℝ)
245 simpl 473 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 𝑗 ∈ ℤ)
246245zred 11482 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 𝑗 ∈ ℝ)
247244, 246remulcld 10070 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (2 · 𝑗) ∈ ℝ)
248 0red 10041 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 0 ∈ ℝ)
249 1red 10055 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 1 ∈ ℝ)
250 2cnd 11093 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 2 ∈ ℂ)
251246recnd 10068 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 𝑗 ∈ ℂ)
252250, 251mulcomd 10061 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (2 · 𝑗) = (𝑗 · 2))
253 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ¬ 𝑗 ∈ ℕ0)
254 elnn0z 11390 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑗 ∈ ℕ0 ↔ (𝑗 ∈ ℤ ∧ 0 ≤ 𝑗))
255253, 254sylnib 318 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ¬ (𝑗 ∈ ℤ ∧ 0 ≤ 𝑗))
256 nan 604 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ¬ (𝑗 ∈ ℤ ∧ 0 ≤ 𝑗)) ↔ (((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) ∧ 𝑗 ∈ ℤ) → ¬ 0 ≤ 𝑗))
257255, 256mpbi 220 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) ∧ 𝑗 ∈ ℤ) → ¬ 0 ≤ 𝑗)
258257anabss1 855 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ¬ 0 ≤ 𝑗)
259246, 248ltnled 10184 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (𝑗 < 0 ↔ ¬ 0 ≤ 𝑗))
260258, 259mpbird 247 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 𝑗 < 0)
261163a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 2 ∈ ℝ+)
262261rpregt0d 11878 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (2 ∈ ℝ ∧ 0 < 2))
263 mulltgt0 39181 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑗 ∈ ℝ ∧ 𝑗 < 0) ∧ (2 ∈ ℝ ∧ 0 < 2)) → (𝑗 · 2) < 0)
264246, 260, 262, 263syl21anc 1325 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (𝑗 · 2) < 0)
265252, 264eqbrtrd 4675 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (2 · 𝑗) < 0)
266247, 248, 249, 265ltadd1dd 10638 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ((2 · 𝑗) + 1) < (0 + 1))
267 1cnd 10056 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → 1 ∈ ℂ)
268267addid2d 10237 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (0 + 1) = 1)
269266, 268breqtrd 4679 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ((2 · 𝑗) + 1) < 1)
270247, 249readdcld 10069 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ((2 · 𝑗) + 1) ∈ ℝ)
271270, 249ltnled 10184 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → (((2 · 𝑗) + 1) < 1 ↔ ¬ 1 ≤ ((2 · 𝑗) + 1)))
272269, 271mpbid 222 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ¬ 1 ≤ ((2 · 𝑗) + 1))
273 nnge1 11046 . . . . . . . . . . . . . . . . . . . . . . . 24 (((2 · 𝑗) + 1) ∈ ℕ → 1 ≤ ((2 · 𝑗) + 1))
274272, 273nsyl 135 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) → ¬ ((2 · 𝑗) + 1) ∈ ℕ)
275274adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) ∧ 𝑛 ∈ ℕ) → ¬ ((2 · 𝑗) + 1) ∈ ℕ)
276 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℕ ∧ ((2 · 𝑗) + 1) = 𝑛) → ((2 · 𝑗) + 1) = 𝑛)
277 simpl 473 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑛 ∈ ℕ ∧ ((2 · 𝑗) + 1) = 𝑛) → 𝑛 ∈ ℕ)
278276, 277eqeltrd 2701 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑛 ∈ ℕ ∧ ((2 · 𝑗) + 1) = 𝑛) → ((2 · 𝑗) + 1) ∈ ℕ)
279278adantll 750 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) ∧ 𝑛 ∈ ℕ) ∧ ((2 · 𝑗) + 1) = 𝑛) → ((2 · 𝑗) + 1) ∈ ℕ)
280275, 279mtand 691 . . . . . . . . . . . . . . . . . . . . 21 (((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) ∧ 𝑛 ∈ ℕ) → ¬ ((2 · 𝑗) + 1) = 𝑛)
281280neqned 2801 . . . . . . . . . . . . . . . . . . . 20 (((𝑗 ∈ ℤ ∧ ¬ 𝑗 ∈ ℕ0) ∧ 𝑛 ∈ ℕ) → ((2 · 𝑗) + 1) ≠ 𝑛)
282241, 242, 243, 281syl21anc 1325 . . . . . . . . . . . . . . . . . . 19 (((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℤ) ∧ ¬ 𝑗 ∈ ℕ0) → ((2 · 𝑗) + 1) ≠ 𝑛)
283240, 282pm2.61dan 832 . . . . . . . . . . . . . . . . . 18 ((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℤ) → ((2 · 𝑗) + 1) ≠ 𝑛)
284283neneqd 2799 . . . . . . . . . . . . . . . . 17 ((𝑛 ∈ (ℕ ∖ ran 𝐺) ∧ 𝑗 ∈ ℤ) → ¬ ((2 · 𝑗) + 1) = 𝑛)
285284ex 450 . . . . . . . . . . . . . . . 16 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (𝑗 ∈ ℤ → ¬ ((2 · 𝑗) + 1) = 𝑛))
286232, 285ralrimi 2957 . . . . . . . . . . . . . . 15 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ∀𝑗 ∈ ℤ ¬ ((2 · 𝑗) + 1) = 𝑛)
287 ralnex 2992 . . . . . . . . . . . . . . 15 (∀𝑗 ∈ ℤ ¬ ((2 · 𝑗) + 1) = 𝑛 ↔ ¬ ∃𝑗 ∈ ℤ ((2 · 𝑗) + 1) = 𝑛)
288286, 287sylib 208 . . . . . . . . . . . . . 14 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ¬ ∃𝑗 ∈ ℤ ((2 · 𝑗) + 1) = 𝑛)
289189nnzd 11481 . . . . . . . . . . . . . . 15 (𝑛 ∈ (ℕ ∖ ran 𝐺) → 𝑛 ∈ ℤ)
290 odd2np1 15065 . . . . . . . . . . . . . . 15 (𝑛 ∈ ℤ → (¬ 2 ∥ 𝑛 ↔ ∃𝑗 ∈ ℤ ((2 · 𝑗) + 1) = 𝑛))
291289, 290syl 17 . . . . . . . . . . . . . 14 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (¬ 2 ∥ 𝑛 ↔ ∃𝑗 ∈ ℤ ((2 · 𝑗) + 1) = 𝑛))
292288, 291mtbird 315 . . . . . . . . . . . . 13 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ¬ ¬ 2 ∥ 𝑛)
293292notnotrd 128 . . . . . . . . . . . 12 (𝑛 ∈ (ℕ ∖ ran 𝐺) → 2 ∥ 𝑛)
294189nncnd 11036 . . . . . . . . . . . . 13 (𝑛 ∈ (ℕ ∖ ran 𝐺) → 𝑛 ∈ ℂ)
295294, 191npcand 10396 . . . . . . . . . . . 12 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ((𝑛 − 1) + 1) = 𝑛)
296293, 295breqtrrd 4681 . . . . . . . . . . 11 (𝑛 ∈ (ℕ ∖ ran 𝐺) → 2 ∥ ((𝑛 − 1) + 1))
297193nn0zd 11480 . . . . . . . . . . . 12 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (𝑛 − 1) ∈ ℤ)
298 oddp1even 15068 . . . . . . . . . . . 12 ((𝑛 − 1) ∈ ℤ → (¬ 2 ∥ (𝑛 − 1) ↔ 2 ∥ ((𝑛 − 1) + 1)))
299297, 298syl 17 . . . . . . . . . . 11 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (¬ 2 ∥ (𝑛 − 1) ↔ 2 ∥ ((𝑛 − 1) + 1)))
300296, 299mpbird 247 . . . . . . . . . 10 (𝑛 ∈ (ℕ ∖ ran 𝐺) → ¬ 2 ∥ (𝑛 − 1))
301 oexpneg 15069 . . . . . . . . . 10 ((1 ∈ ℂ ∧ (𝑛 − 1) ∈ ℕ ∧ ¬ 2 ∥ (𝑛 − 1)) → (-1↑(𝑛 − 1)) = -(1↑(𝑛 − 1)))
302191, 226, 300, 301syl3anc 1326 . . . . . . . . 9 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (-1↑(𝑛 − 1)) = -(1↑(𝑛 − 1)))
303 1exp 12889 . . . . . . . . . . 11 ((𝑛 − 1) ∈ ℤ → (1↑(𝑛 − 1)) = 1)
304297, 303syl 17 . . . . . . . . . 10 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (1↑(𝑛 − 1)) = 1)
305304negeqd 10275 . . . . . . . . 9 (𝑛 ∈ (ℕ ∖ ran 𝐺) → -(1↑(𝑛 − 1)) = -1)
306302, 305eqtrd 2656 . . . . . . . 8 (𝑛 ∈ (ℕ ∖ ran 𝐺) → (-1↑(𝑛 − 1)) = -1)
307306adantl 482 . . . . . . 7 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (-1↑(𝑛 − 1)) = -1)
308307oveq1d 6665 . . . . . 6 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → ((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) = (-1 · ((𝑇𝑛) / 𝑛)))
309308oveq1d 6665 . . . . 5 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (((-1↑(𝑛 − 1)) · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)) = ((-1 · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)))
310201mulm1d 10482 . . . . . . 7 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (-1 · ((𝑇𝑛) / 𝑛)) = -((𝑇𝑛) / 𝑛))
311310oveq1d 6665 . . . . . 6 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → ((-1 · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)) = (-((𝑇𝑛) / 𝑛) + ((𝑇𝑛) / 𝑛)))
312201negcld 10379 . . . . . . 7 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → -((𝑇𝑛) / 𝑛) ∈ ℂ)
313312, 201addcomd 10238 . . . . . 6 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (-((𝑇𝑛) / 𝑛) + ((𝑇𝑛) / 𝑛)) = (((𝑇𝑛) / 𝑛) + -((𝑇𝑛) / 𝑛)))
314201negidd 10382 . . . . . 6 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (((𝑇𝑛) / 𝑛) + -((𝑇𝑛) / 𝑛)) = 0)
315311, 313, 3143eqtrd 2660 . . . . 5 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → ((-1 · ((𝑇𝑛) / 𝑛)) + ((𝑇𝑛) / 𝑛)) = 0)
316205, 309, 3153eqtrd 2660 . . . 4 ((𝜑𝑛 ∈ (ℕ ∖ ran 𝐺)) → (𝐹𝑛) = 0)
317117, 116eqeltrd 2701 . . . 4 ((𝜑𝑛 ∈ ℕ) → (𝐹𝑛) ∈ ℂ)
318103a1i 11 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → 𝐹 = (𝑗 ∈ ℕ ↦ (((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) + ((𝑇𝑗) / 𝑗))))
319 simpr 477 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = ((2 · 𝑘) + 1)) → 𝑗 = ((2 · 𝑘) + 1))
320319oveq1d 6665 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = ((2 · 𝑘) + 1)) → (𝑗 − 1) = (((2 · 𝑘) + 1) − 1))
321320oveq2d 6666 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = ((2 · 𝑘) + 1)) → (-1↑(𝑗 − 1)) = (-1↑(((2 · 𝑘) + 1) − 1)))
322319oveq2d 6666 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = ((2 · 𝑘) + 1)) → (𝑇𝑗) = (𝑇↑((2 · 𝑘) + 1)))
323322, 319oveq12d 6668 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = ((2 · 𝑘) + 1)) → ((𝑇𝑗) / 𝑗) = ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)))
324321, 323oveq12d 6668 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = ((2 · 𝑘) + 1)) → ((-1↑(𝑗 − 1)) · ((𝑇𝑗) / 𝑗)) = ((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
325324, 323oveq12d 6668 . . . . . . 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 477 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → 𝑘 ∈ ℕ0)
328326, 327nn0mulcld 11356 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℕ0)
329 nn0p1nn 11332 . . . . . . . 8 ((2 · 𝑘) ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ)
330328, 329syl 17 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ∈ ℕ)
331176negcld 10379 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → -1 ∈ ℂ)
332175, 176pncand 10393 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (((2 · 𝑘) + 1) − 1) = (2 · 𝑘))
333148a1i 11 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0 → 2 ∈ ℕ0)
334333, 172nn0mulcld 11356 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (2 · 𝑘) ∈ ℕ0)
335332, 334eqeltrd 2701 . . . . . . . . . . 11 (𝑘 ∈ ℕ0 → (((2 · 𝑘) + 1) − 1) ∈ ℕ0)
336331, 335expcld 13008 . . . . . . . . . 10 (𝑘 ∈ ℕ0 → (-1↑(((2 · 𝑘) + 1) − 1)) ∈ ℂ)
337336adantl 482 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → (-1↑(((2 · 𝑘) + 1) − 1)) ∈ ℂ)
33814adantr 481 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → 𝑇 ∈ ℂ)
339208a1i 11 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → 1 ∈ ℕ0)
340328, 339nn0addcld 11355 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ∈ ℕ0)
341338, 340expcld 13008 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ0) → (𝑇↑((2 · 𝑘) + 1)) ∈ ℂ)
342 2cnd 11093 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → 2 ∈ ℂ)
343174adantl 482 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → 𝑘 ∈ ℂ)
344342, 343mulcld 10060 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℂ)
345 1cnd 10056 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → 1 ∈ ℂ)
346344, 345addcld 10059 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ∈ ℂ)
347 0red 10041 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → 0 ∈ ℝ)
348156a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ0) → 2 ∈ ℝ)
349158adantl 482 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ0) → 𝑘 ∈ ℝ)
350348, 349remulcld 10070 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → (2 · 𝑘) ∈ ℝ)
351 1red 10055 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → 1 ∈ ℝ)
352 0le2 11111 . . . . . . . . . . . . . 14 0 ≤ 2
353352a1i 11 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ0) → 0 ≤ 2)
354327nn0ge0d 11354 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ ℕ0) → 0 ≤ 𝑘)
355348, 349, 353, 354mulge0d 10604 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → 0 ≤ (2 · 𝑘))
356 0lt1 10550 . . . . . . . . . . . . 13 0 < 1
357356a1i 11 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → 0 < 1)
358350, 351, 355, 357addgegt0d 10601 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → 0 < ((2 · 𝑘) + 1))
359347, 358gtned 10172 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ0) → ((2 · 𝑘) + 1) ≠ 0)
360341, 346, 359divcld 10801 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)) ∈ ℂ)
361337, 360mulcld 10060 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → ((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) ∈ ℂ)
362361, 360addcld 10059 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → (((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) + ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) ∈ ℂ)
363318, 325, 330, 362fvmptd 6288 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (𝐹‘((2 · 𝑘) + 1)) = (((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) + ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
364332adantl 482 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ ℕ0) → (((2 · 𝑘) + 1) − 1) = (2 · 𝑘))
365364oveq2d 6666 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → (-1↑(((2 · 𝑘) + 1) − 1)) = (-1↑(2 · 𝑘)))
366 nn0z 11400 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ0𝑘 ∈ ℤ)
367 m1expeven 12907 . . . . . . . . . . . . 13 (𝑘 ∈ ℤ → (-1↑(2 · 𝑘)) = 1)
368366, 367syl 17 . . . . . . . . . . . 12 (𝑘 ∈ ℕ0 → (-1↑(2 · 𝑘)) = 1)
369368adantl 482 . . . . . . . . . . 11 ((𝜑𝑘 ∈ ℕ0) → (-1↑(2 · 𝑘)) = 1)
370365, 369eqtrd 2656 . . . . . . . . . 10 ((𝜑𝑘 ∈ ℕ0) → (-1↑(((2 · 𝑘) + 1) − 1)) = 1)
371370oveq1d 6665 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → ((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (1 · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
372360mulid2d 10058 . . . . . . . . 9 ((𝜑𝑘 ∈ ℕ0) → (1 · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)))
373371, 372eqtrd 2656 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → ((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)))
374373oveq1d 6665 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → (((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) + ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)) + ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
3753602timesd 11275 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → (2 · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)) + ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))))
376341, 346, 359divrec2d 10805 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1)) = ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1))))
377376oveq2d 6666 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → (2 · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (2 · ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1)))))
378374, 375, 3773eqtr2d 2662 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (((-1↑(((2 · 𝑘) + 1) − 1)) · ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) + ((𝑇↑((2 · 𝑘) + 1)) / ((2 · 𝑘) + 1))) = (2 · ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1)))))
379363, 378eqtr2d 2657 . . . . 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 477 . . . . . . . . . . 11 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = 𝑘) → 𝑗 = 𝑘)
383382oveq2d 6666 . . . . . . . . . 10 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = 𝑘) → (2 · 𝑗) = (2 · 𝑘))
384383oveq1d 6665 . . . . . . . . 9 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = 𝑘) → ((2 · 𝑗) + 1) = ((2 · 𝑘) + 1))
385384oveq2d 6666 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = 𝑘) → (1 / ((2 · 𝑗) + 1)) = (1 / ((2 · 𝑘) + 1)))
386384oveq2d 6666 . . . . . . . 8 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = 𝑘) → (𝑇↑((2 · 𝑗) + 1)) = (𝑇↑((2 · 𝑘) + 1)))
387385, 386oveq12d 6668 . . . . . . 7 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = 𝑘) → ((1 / ((2 · 𝑗) + 1)) · (𝑇↑((2 · 𝑗) + 1))) = ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1))))
388387oveq2d 6666 . . . . . 6 (((𝜑𝑘 ∈ ℕ0) ∧ 𝑗 = 𝑘) → (2 · ((1 / ((2 · 𝑗) + 1)) · (𝑇↑((2 · 𝑗) + 1)))) = (2 · ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1)))))
389346, 359reccld 10794 . . . . . . . 8 ((𝜑𝑘 ∈ ℕ0) → (1 / ((2 · 𝑘) + 1)) ∈ ℂ)
390389, 341mulcld 10060 . . . . . . 7 ((𝜑𝑘 ∈ ℕ0) → ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1))) ∈ ℂ)
391342, 390mulcld 10060 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (2 · ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1)))) ∈ ℂ)
392381, 388, 327, 391fvmptd 6288 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → (𝐻𝑘) = (2 · ((1 / ((2 · 𝑘) + 1)) · (𝑇↑((2 · 𝑘) + 1)))))
393208a1i 11 . . . . . . . . 9 (𝑘 ∈ ℕ0 → 1 ∈ ℕ0)
394334, 393nn0addcld 11355 . . . . . . . 8 (𝑘 ∈ ℕ0 → ((2 · 𝑘) + 1) ∈ ℕ0)
395168, 171, 172, 394fvmptd 6288 . . . . . . 7 (𝑘 ∈ ℕ0 → (𝐺𝑘) = ((2 · 𝑘) + 1))
396395adantl 482 . . . . . 6 ((𝜑𝑘 ∈ ℕ0) → (𝐺𝑘) = ((2 · 𝑘) + 1))
397396fveq2d 6195 . . . . 5 ((𝜑𝑘 ∈ ℕ0) → (𝐹‘(𝐺𝑘)) = (𝐹‘((2 · 𝑘) + 1)))
398379, 392, 3973eqtr4d 2666 . . . 4 ((𝜑𝑘 ∈ ℕ0) → (𝐻𝑘) = (𝐹‘(𝐺𝑘)))
399145, 1, 146, 2, 155, 188, 316, 317, 398isercoll2 14399 . . 3 (𝜑 → (seq0( + , 𝐻) ⇝ ((log‘(1 + 𝑇)) − (log‘(1 − 𝑇))) ↔ seq1( + , 𝐹) ⇝ ((log‘(1 + 𝑇)) − (log‘(1 − 𝑇)))))
400144, 399mpbird 247 . 2 (𝜑 → seq0( + , 𝐻) ⇝ ((log‘(1 + 𝑇)) − (log‘(1 − 𝑇))))
40151, 13resubcld 10458 . . . 4 (𝜑 → (1 − 𝑇) ∈ ℝ)
40214subidd 10380 . . . . . 6 (𝜑 → (𝑇𝑇) = 0)
403402eqcomd 2628 . . . . 5 (𝜑 → 0 = (𝑇𝑇))
40413, 51, 13, 139ltsub1dd 10639 . . . . 5 (𝜑 → (𝑇𝑇) < (1 − 𝑇))
405403, 404eqbrtrd 4675 . . . 4 (𝜑 → 0 < (1 − 𝑇))
406401, 405elrpd 11869 . . 3 (𝜑 → (1 − 𝑇) ∈ ℝ+)
407133, 406relogdivd 24372 . 2 (𝜑 → (log‘((1 + 𝑇) / (1 − 𝑇))) = ((log‘(1 + 𝑇)) − (log‘(1 − 𝑇))))
408400, 407breqtrrd 4681 1 (𝜑 → seq0( + , 𝐻) ⇝ (log‘((1 + 𝑇) / (1 − 𝑇))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wo 383  wa 384   = wceq 1483  wcel 1990  wne 2794  wral 2912  wrex 2913  Vcvv 3200  cdif 3571   class class class wbr 4653  cmpt 4729  ran crn 5115  ccom 5118  wf 5884  cfv 5888  (class class class)co 6650  cc 9934  cr 9935  0cc0 9936  1c1 9937   + caddc 9939   · cmul 9941  *cxr 10073   < clt 10074  cle 10075  cmin 10266  -cneg 10267   / cdiv 10684  cn 11020  2c2 11070  0cn0 11292  cz 11377  cuz 11687  +crp 11832  ...cfz 12326  seqcseq 12801  cexp 12860  abscabs 13974  cli 14215  cdvds 14983  ∞Metcxmt 19731  ballcbl 19733  logclog 24301
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-rep 4771  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949  ax-inf2 8538  ax-cnex 9992  ax-resscn 9993  ax-1cn 9994  ax-icn 9995  ax-addcl 9996  ax-addrcl 9997  ax-mulcl 9998  ax-mulrcl 9999  ax-mulcom 10000  ax-addass 10001  ax-mulass 10002  ax-distr 10003  ax-i2m1 10004  ax-1ne0 10005  ax-1rid 10006  ax-rnegex 10007  ax-rrecex 10008  ax-cnre 10009  ax-pre-lttri 10010  ax-pre-lttrn 10011  ax-pre-ltadd 10012  ax-pre-mulgt0 10013  ax-pre-sup 10014  ax-addf 10015  ax-mulf 10016
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-fal 1489  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-nel 2898  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-pss 3590  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-tp 4182  df-op 4184  df-uni 4437  df-int 4476  df-iun 4522  df-iin 4523  df-br 4654  df-opab 4713  df-mpt 4730  df-tr 4753  df-id 5024  df-eprel 5029  df-po 5035  df-so 5036  df-fr 5073  df-se 5074  df-we 5075  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-res 5126  df-ima 5127  df-pred 5680  df-ord 5726  df-on 5727  df-lim 5728  df-suc 5729  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-isom 5897  df-riota 6611  df-ov 6653  df-oprab 6654  df-mpt2 6655  df-of 6897  df-om 7066  df-1st 7168  df-2nd 7169  df-supp 7296  df-wrecs 7407  df-recs 7468  df-rdg 7506  df-1o 7560  df-2o 7561  df-oadd 7564  df-er 7742  df-map 7859  df-pm 7860  df-ixp 7909  df-en 7956  df-dom 7957  df-sdom 7958  df-fin 7959  df-fsupp 8276  df-fi 8317  df-sup 8348  df-inf 8349  df-oi 8415  df-card 8765  df-cda 8990  df-pnf 10076  df-mnf 10077  df-xr 10078  df-ltxr 10079  df-le 10080  df-sub 10268  df-neg 10269  df-div 10685  df-nn 11021  df-2 11079  df-3 11080  df-4 11081  df-5 11082  df-6 11083  df-7 11084  df-8 11085  df-9 11086  df-n0 11293  df-xnn0 11364  df-z 11378  df-dec 11494  df-uz 11688  df-q 11789  df-rp 11833  df-xneg 11946  df-xadd 11947  df-xmul 11948  df-ioo 12179  df-ioc 12180  df-ico 12181  df-icc 12182  df-fz 12327  df-fzo 12466  df-fl 12593  df-mod 12669  df-seq 12802  df-exp 12861  df-fac 13061  df-bc 13090  df-hash 13118  df-shft 13807  df-cj 13839  df-re 13840  df-im 13841  df-sqrt 13975  df-abs 13976  df-limsup 14202  df-clim 14219  df-rlim 14220  df-sum 14417  df-ef 14798  df-sin 14800  df-cos 14801  df-tan 14802  df-pi 14803  df-dvds 14984  df-struct 15859  df-ndx 15860  df-slot 15861  df-base 15863  df-sets 15864  df-ress 15865  df-plusg 15954  df-mulr 15955  df-starv 15956  df-sca 15957  df-vsca 15958  df-ip 15959  df-tset 15960  df-ple 15961  df-ds 15964  df-unif 15965  df-hom 15966  df-cco 15967  df-rest 16083  df-topn 16084  df-0g 16102  df-gsum 16103  df-topgen 16104  df-pt 16105  df-prds 16108  df-xrs 16162  df-qtop 16167  df-imas 16168  df-xps 16170  df-mre 16246  df-mrc 16247  df-acs 16249  df-mgm 17242  df-sgrp 17284  df-mnd 17295  df-submnd 17336  df-mulg 17541  df-cntz 17750  df-cmn 18195  df-psmet 19738  df-xmet 19739  df-met 19740  df-bl 19741  df-mopn 19742  df-fbas 19743  df-fg 19744  df-cnfld 19747  df-top 20699  df-topon 20716  df-topsp 20737  df-bases 20750  df-cld 20823  df-ntr 20824  df-cls 20825  df-nei 20902  df-lp 20940  df-perf 20941  df-cn 21031  df-cnp 21032  df-haus 21119  df-cmp 21190  df-tx 21365  df-hmeo 21558  df-fil 21650  df-fm 21742  df-flim 21743  df-flf 21744  df-xms 22125  df-ms 22126  df-tms 22127  df-cncf 22681  df-limc 23630  df-dv 23631  df-ulm 24131  df-log 24303
This theorem is referenced by:  stirlinglem6  40296
  Copyright terms: Public domain W3C validator