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

Theorem etransclem25 42841
Description: 𝑃 factorial divides the 𝑁-th derivative of 𝐹 applied to 𝐽. (Contributed by Glauco Siliprandi, 5-Apr-2020.)
Hypotheses
Ref Expression
etransclem25.p (𝜑𝑃 ∈ ℕ)
etransclem25.m (𝜑𝑀 ∈ ℕ0)
etransclem25.n (𝜑𝑁 ∈ ℕ0)
etransclem25.c (𝜑𝐶:(0...𝑀)⟶(0...𝑁))
etransclem25.sumc (𝜑 → Σ𝑗 ∈ (0...𝑀)(𝐶𝑗) = 𝑁)
etransclem25.t 𝑇 = (((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) · (if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗)))))))
etransclem25.j (𝜑𝐽 ∈ (1...𝑀))
Assertion
Ref Expression
etransclem25 (𝜑 → (!‘𝑃) ∥ 𝑇)
Distinct variable groups:   𝐶,𝑗   𝑗,𝐽   𝑗,𝑀   𝑃,𝑗   𝜑,𝑗
Allowed substitution hints:   𝑇(𝑗)   𝑁(𝑗)

Proof of Theorem etransclem25
StepHypRef Expression
1 etransclem25.p . . . . . . 7 (𝜑𝑃 ∈ ℕ)
21nnnn0d 11943 . . . . . 6 (𝜑𝑃 ∈ ℕ0)
32faccld 13640 . . . . 5 (𝜑 → (!‘𝑃) ∈ ℕ)
43nnzd 12074 . . . 4 (𝜑 → (!‘𝑃) ∈ ℤ)
5 etransclem25.sumc . . . . . . . . . 10 (𝜑 → Σ𝑗 ∈ (0...𝑀)(𝐶𝑗) = 𝑁)
65eqcomd 2828 . . . . . . . . 9 (𝜑𝑁 = Σ𝑗 ∈ (0...𝑀)(𝐶𝑗))
76fveq2d 6656 . . . . . . . 8 (𝜑 → (!‘𝑁) = (!‘Σ𝑗 ∈ (0...𝑀)(𝐶𝑗)))
87oveq1d 7155 . . . . . . 7 (𝜑 → ((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) = ((!‘Σ𝑗 ∈ (0...𝑀)(𝐶𝑗)) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))))
9 nfcv 2979 . . . . . . . 8 𝑗𝐶
10 fzfid 13336 . . . . . . . 8 (𝜑 → (0...𝑀) ∈ Fin)
11 etransclem25.c . . . . . . . . 9 (𝜑𝐶:(0...𝑀)⟶(0...𝑁))
12 nn0ex 11891 . . . . . . . . . . 11 0 ∈ V
13 fzssnn0 41889 . . . . . . . . . . 11 (0...𝑁) ⊆ ℕ0
14 mapss 8440 . . . . . . . . . . 11 ((ℕ0 ∈ V ∧ (0...𝑁) ⊆ ℕ0) → ((0...𝑁) ↑m (0...𝑀)) ⊆ (ℕ0m (0...𝑀)))
1512, 13, 14mp2an 691 . . . . . . . . . 10 ((0...𝑁) ↑m (0...𝑀)) ⊆ (ℕ0m (0...𝑀))
16 ovex 7173 . . . . . . . . . . . 12 (0...𝑁) ∈ V
17 ovexd 7175 . . . . . . . . . . . 12 (𝐶:(0...𝑀)⟶(0...𝑁) → (0...𝑀) ∈ V)
18 elmapg 8406 . . . . . . . . . . . 12 (((0...𝑁) ∈ V ∧ (0...𝑀) ∈ V) → (𝐶 ∈ ((0...𝑁) ↑m (0...𝑀)) ↔ 𝐶:(0...𝑀)⟶(0...𝑁)))
1916, 17, 18sylancr 590 . . . . . . . . . . 11 (𝐶:(0...𝑀)⟶(0...𝑁) → (𝐶 ∈ ((0...𝑁) ↑m (0...𝑀)) ↔ 𝐶:(0...𝑀)⟶(0...𝑁)))
2019ibir 271 . . . . . . . . . 10 (𝐶:(0...𝑀)⟶(0...𝑁) → 𝐶 ∈ ((0...𝑁) ↑m (0...𝑀)))
2115, 20sseldi 3940 . . . . . . . . 9 (𝐶:(0...𝑀)⟶(0...𝑁) → 𝐶 ∈ (ℕ0m (0...𝑀)))
2211, 21syl 17 . . . . . . . 8 (𝜑𝐶 ∈ (ℕ0m (0...𝑀)))
239, 10, 22mccl 42180 . . . . . . 7 (𝜑 → ((!‘Σ𝑗 ∈ (0...𝑀)(𝐶𝑗)) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) ∈ ℕ)
248, 23eqeltrd 2914 . . . . . 6 (𝜑 → ((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) ∈ ℕ)
2524nnzd 12074 . . . . 5 (𝜑 → ((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) ∈ ℤ)
26 etransclem25.m . . . . . 6 (𝜑𝑀 ∈ ℕ0)
27 etransclem25.j . . . . . . 7 (𝜑𝐽 ∈ (1...𝑀))
2827elfzelzd 12903 . . . . . 6 (𝜑𝐽 ∈ ℤ)
291, 26, 11, 28etransclem10 42826 . . . . 5 (𝜑 → if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0))))) ∈ ℤ)
3025, 29zmulcld 12081 . . . 4 (𝜑 → (((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) · if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0)))))) ∈ ℤ)
31 fzfid 13336 . . . . 5 (𝜑 → (1...𝑀) ∈ Fin)
321adantr 484 . . . . . 6 ((𝜑𝑗 ∈ (1...𝑀)) → 𝑃 ∈ ℕ)
3311adantr 484 . . . . . 6 ((𝜑𝑗 ∈ (1...𝑀)) → 𝐶:(0...𝑀)⟶(0...𝑁))
34 0z 11980 . . . . . . . . 9 0 ∈ ℤ
35 fzp1ss 12953 . . . . . . . . 9 (0 ∈ ℤ → ((0 + 1)...𝑀) ⊆ (0...𝑀))
3634, 35ax-mp 5 . . . . . . . 8 ((0 + 1)...𝑀) ⊆ (0...𝑀)
37 id 22 . . . . . . . . 9 (𝑗 ∈ (1...𝑀) → 𝑗 ∈ (1...𝑀))
38 1e0p1 12128 . . . . . . . . . 10 1 = (0 + 1)
3938oveq1i 7150 . . . . . . . . 9 (1...𝑀) = ((0 + 1)...𝑀)
4037, 39eleqtrdi 2924 . . . . . . . 8 (𝑗 ∈ (1...𝑀) → 𝑗 ∈ ((0 + 1)...𝑀))
4136, 40sseldi 3940 . . . . . . 7 (𝑗 ∈ (1...𝑀) → 𝑗 ∈ (0...𝑀))
4241adantl 485 . . . . . 6 ((𝜑𝑗 ∈ (1...𝑀)) → 𝑗 ∈ (0...𝑀))
4328adantr 484 . . . . . 6 ((𝜑𝑗 ∈ (1...𝑀)) → 𝐽 ∈ ℤ)
4432, 33, 42, 43etransclem3 42819 . . . . 5 ((𝜑𝑗 ∈ (1...𝑀)) → if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℤ)
4531, 44fprodzcl 15299 . . . 4 (𝜑 → ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℤ)
464, 30, 453jca 1125 . . 3 (𝜑 → ((!‘𝑃) ∈ ℤ ∧ (((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) · if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0)))))) ∈ ℤ ∧ ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℤ))
4728zcnd 12076 . . . . . . . . . . 11 (𝜑𝐽 ∈ ℂ)
4847subidd 10974 . . . . . . . . . 10 (𝜑 → (𝐽𝐽) = 0)
4948eqcomd 2828 . . . . . . . . 9 (𝜑 → 0 = (𝐽𝐽))
5049oveq1d 7155 . . . . . . . 8 (𝜑 → (0↑(𝑃 − (𝐶𝐽))) = ((𝐽𝐽)↑(𝑃 − (𝐶𝐽))))
5150oveq2d 7156 . . . . . . 7 (𝜑 → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))) = (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · ((𝐽𝐽)↑(𝑃 − (𝐶𝐽)))))
5251ifeq2d 4458 . . . . . 6 (𝜑 → if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) = if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · ((𝐽𝐽)↑(𝑃 − (𝐶𝐽))))))
53 id 22 . . . . . . . . . 10 (𝐽 ∈ (1...𝑀) → 𝐽 ∈ (1...𝑀))
5453, 39eleqtrdi 2924 . . . . . . . . 9 (𝐽 ∈ (1...𝑀) → 𝐽 ∈ ((0 + 1)...𝑀))
5536, 54sseldi 3940 . . . . . . . 8 (𝐽 ∈ (1...𝑀) → 𝐽 ∈ (0...𝑀))
5627, 55syl 17 . . . . . . 7 (𝜑𝐽 ∈ (0...𝑀))
571, 11, 56, 28etransclem3 42819 . . . . . 6 (𝜑 → if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · ((𝐽𝐽)↑(𝑃 − (𝐶𝐽))))) ∈ ℤ)
5852, 57eqeltrd 2914 . . . . 5 (𝜑 → if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) ∈ ℤ)
59 fzfi 13335 . . . . . . 7 (1...𝑀) ∈ Fin
60 diffi 8738 . . . . . . 7 ((1...𝑀) ∈ Fin → ((1...𝑀) ∖ {𝐽}) ∈ Fin)
6159, 60mp1i 13 . . . . . 6 (𝜑 → ((1...𝑀) ∖ {𝐽}) ∈ Fin)
621adantr 484 . . . . . . 7 ((𝜑𝑗 ∈ ((1...𝑀) ∖ {𝐽})) → 𝑃 ∈ ℕ)
6311adantr 484 . . . . . . 7 ((𝜑𝑗 ∈ ((1...𝑀) ∖ {𝐽})) → 𝐶:(0...𝑀)⟶(0...𝑁))
64 eldifi 4078 . . . . . . . . 9 (𝑗 ∈ ((1...𝑀) ∖ {𝐽}) → 𝑗 ∈ (1...𝑀))
6564, 41syl 17 . . . . . . . 8 (𝑗 ∈ ((1...𝑀) ∖ {𝐽}) → 𝑗 ∈ (0...𝑀))
6665adantl 485 . . . . . . 7 ((𝜑𝑗 ∈ ((1...𝑀) ∖ {𝐽})) → 𝑗 ∈ (0...𝑀))
6728adantr 484 . . . . . . 7 ((𝜑𝑗 ∈ ((1...𝑀) ∖ {𝐽})) → 𝐽 ∈ ℤ)
6862, 63, 66, 67etransclem3 42819 . . . . . 6 ((𝜑𝑗 ∈ ((1...𝑀) ∖ {𝐽})) → if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℤ)
6961, 68fprodzcl 15299 . . . . 5 (𝜑 → ∏𝑗 ∈ ((1...𝑀) ∖ {𝐽})if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℤ)
70 dvds0 15616 . . . . . . . . 9 ((!‘𝑃) ∈ ℤ → (!‘𝑃) ∥ 0)
714, 70syl 17 . . . . . . . 8 (𝜑 → (!‘𝑃) ∥ 0)
7271adantr 484 . . . . . . 7 ((𝜑𝑃 < (𝐶𝐽)) → (!‘𝑃) ∥ 0)
73 iftrue 4445 . . . . . . . . 9 (𝑃 < (𝐶𝐽) → if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) = 0)
7473eqcomd 2828 . . . . . . . 8 (𝑃 < (𝐶𝐽) → 0 = if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
7574adantl 485 . . . . . . 7 ((𝜑𝑃 < (𝐶𝐽)) → 0 = if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
7672, 75breqtrd 5068 . . . . . 6 ((𝜑𝑃 < (𝐶𝐽)) → (!‘𝑃) ∥ if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
77 iddvds 15614 . . . . . . . . . 10 ((!‘𝑃) ∈ ℤ → (!‘𝑃) ∥ (!‘𝑃))
784, 77syl 17 . . . . . . . . 9 (𝜑 → (!‘𝑃) ∥ (!‘𝑃))
7978ad2antrr 725 . . . . . . . 8 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ 𝑃 = (𝐶𝐽)) → (!‘𝑃) ∥ (!‘𝑃))
80 iffalse 4448 . . . . . . . . . 10 𝑃 < (𝐶𝐽) → if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) = (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))))
8180ad2antlr 726 . . . . . . . . 9 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ 𝑃 = (𝐶𝐽)) → if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) = (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))))
82 oveq1 7147 . . . . . . . . . . . . . . . . . 18 (𝑃 = (𝐶𝐽) → (𝑃 − (𝐶𝐽)) = ((𝐶𝐽) − (𝐶𝐽)))
8382adantl 485 . . . . . . . . . . . . . . . . 17 ((𝜑𝑃 = (𝐶𝐽)) → (𝑃 − (𝐶𝐽)) = ((𝐶𝐽) − (𝐶𝐽)))
8411, 56ffvelrnd 6834 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝐶𝐽) ∈ (0...𝑁))
8584elfzelzd 12903 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐶𝐽) ∈ ℤ)
8685zcnd 12076 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝐶𝐽) ∈ ℂ)
8786adantr 484 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑃 = (𝐶𝐽)) → (𝐶𝐽) ∈ ℂ)
8887subidd 10974 . . . . . . . . . . . . . . . . 17 ((𝜑𝑃 = (𝐶𝐽)) → ((𝐶𝐽) − (𝐶𝐽)) = 0)
8983, 88eqtrd 2857 . . . . . . . . . . . . . . . 16 ((𝜑𝑃 = (𝐶𝐽)) → (𝑃 − (𝐶𝐽)) = 0)
9089fveq2d 6656 . . . . . . . . . . . . . . 15 ((𝜑𝑃 = (𝐶𝐽)) → (!‘(𝑃 − (𝐶𝐽))) = (!‘0))
91 fac0 13632 . . . . . . . . . . . . . . 15 (!‘0) = 1
9290, 91syl6eq 2873 . . . . . . . . . . . . . 14 ((𝜑𝑃 = (𝐶𝐽)) → (!‘(𝑃 − (𝐶𝐽))) = 1)
9392oveq2d 7156 . . . . . . . . . . . . 13 ((𝜑𝑃 = (𝐶𝐽)) → ((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) = ((!‘𝑃) / 1))
943nncnd 11641 . . . . . . . . . . . . . . 15 (𝜑 → (!‘𝑃) ∈ ℂ)
9594div1d 11397 . . . . . . . . . . . . . 14 (𝜑 → ((!‘𝑃) / 1) = (!‘𝑃))
9695adantr 484 . . . . . . . . . . . . 13 ((𝜑𝑃 = (𝐶𝐽)) → ((!‘𝑃) / 1) = (!‘𝑃))
9793, 96eqtrd 2857 . . . . . . . . . . . 12 ((𝜑𝑃 = (𝐶𝐽)) → ((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) = (!‘𝑃))
9889oveq2d 7156 . . . . . . . . . . . . 13 ((𝜑𝑃 = (𝐶𝐽)) → (0↑(𝑃 − (𝐶𝐽))) = (0↑0))
99 0cnd 10623 . . . . . . . . . . . . . 14 ((𝜑𝑃 = (𝐶𝐽)) → 0 ∈ ℂ)
10099exp0d 13500 . . . . . . . . . . . . 13 ((𝜑𝑃 = (𝐶𝐽)) → (0↑0) = 1)
10198, 100eqtrd 2857 . . . . . . . . . . . 12 ((𝜑𝑃 = (𝐶𝐽)) → (0↑(𝑃 − (𝐶𝐽))) = 1)
10297, 101oveq12d 7158 . . . . . . . . . . 11 ((𝜑𝑃 = (𝐶𝐽)) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))) = ((!‘𝑃) · 1))
10394mulid1d 10647 . . . . . . . . . . . 12 (𝜑 → ((!‘𝑃) · 1) = (!‘𝑃))
104103adantr 484 . . . . . . . . . . 11 ((𝜑𝑃 = (𝐶𝐽)) → ((!‘𝑃) · 1) = (!‘𝑃))
105102, 104eqtrd 2857 . . . . . . . . . 10 ((𝜑𝑃 = (𝐶𝐽)) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))) = (!‘𝑃))
106105adantlr 714 . . . . . . . . 9 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ 𝑃 = (𝐶𝐽)) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))) = (!‘𝑃))
10781, 106eqtr2d 2858 . . . . . . . 8 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ 𝑃 = (𝐶𝐽)) → (!‘𝑃) = if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
10879, 107breqtrd 5068 . . . . . . 7 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ 𝑃 = (𝐶𝐽)) → (!‘𝑃) ∥ if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
10971ad2antrr 725 . . . . . . . 8 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → (!‘𝑃) ∥ 0)
110 simpr 488 . . . . . . . . . . 11 ((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) → ¬ 𝑃 < (𝐶𝐽))
111110adantr 484 . . . . . . . . . 10 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → ¬ 𝑃 < (𝐶𝐽))
112111iffalsed 4450 . . . . . . . . 9 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) = (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))))
113 simpll 766 . . . . . . . . . 10 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → 𝜑)
11485zred 12075 . . . . . . . . . . . 12 (𝜑 → (𝐶𝐽) ∈ ℝ)
115114ad2antrr 725 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → (𝐶𝐽) ∈ ℝ)
1161nnred 11640 . . . . . . . . . . . 12 (𝜑𝑃 ∈ ℝ)
117116ad2antrr 725 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → 𝑃 ∈ ℝ)
118114adantr 484 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) → (𝐶𝐽) ∈ ℝ)
119116adantr 484 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) → 𝑃 ∈ ℝ)
120118, 119, 110nltled 10779 . . . . . . . . . . . 12 ((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) → (𝐶𝐽) ≤ 𝑃)
121120adantr 484 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → (𝐶𝐽) ≤ 𝑃)
122 neqne 3019 . . . . . . . . . . . 12 𝑃 = (𝐶𝐽) → 𝑃 ≠ (𝐶𝐽))
123122adantl 485 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → 𝑃 ≠ (𝐶𝐽))
124115, 117, 121, 123leneltd 10783 . . . . . . . . . 10 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → (𝐶𝐽) < 𝑃)
1251nnzd 12074 . . . . . . . . . . . . . . . 16 (𝜑𝑃 ∈ ℤ)
126125adantr 484 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → 𝑃 ∈ ℤ)
12785adantr 484 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (𝐶𝐽) ∈ ℤ)
128126, 127zsubcld 12080 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (𝑃 − (𝐶𝐽)) ∈ ℤ)
129 simpr 488 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (𝐶𝐽) < 𝑃)
130114adantr 484 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (𝐶𝐽) ∈ ℝ)
131116adantr 484 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → 𝑃 ∈ ℝ)
132130, 131posdifd 11216 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → ((𝐶𝐽) < 𝑃 ↔ 0 < (𝑃 − (𝐶𝐽))))
133129, 132mpbid 235 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → 0 < (𝑃 − (𝐶𝐽)))
134 elnnz 11979 . . . . . . . . . . . . . 14 ((𝑃 − (𝐶𝐽)) ∈ ℕ ↔ ((𝑃 − (𝐶𝐽)) ∈ ℤ ∧ 0 < (𝑃 − (𝐶𝐽))))
135128, 133, 134sylanbrc 586 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (𝑃 − (𝐶𝐽)) ∈ ℕ)
1361350expd 13499 . . . . . . . . . . . 12 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (0↑(𝑃 − (𝐶𝐽))) = 0)
137136oveq2d 7156 . . . . . . . . . . 11 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))) = (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · 0))
13894adantr 484 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (!‘𝑃) ∈ ℂ)
139135nnnn0d 11943 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (𝑃 − (𝐶𝐽)) ∈ ℕ0)
140139faccld 13640 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (!‘(𝑃 − (𝐶𝐽))) ∈ ℕ)
141140nncnd 11641 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (!‘(𝑃 − (𝐶𝐽))) ∈ ℂ)
142140nnne0d 11675 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (!‘(𝑃 − (𝐶𝐽))) ≠ 0)
143138, 141, 142divcld 11405 . . . . . . . . . . . 12 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → ((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) ∈ ℂ)
144143mul01d 10828 . . . . . . . . . . 11 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · 0) = 0)
145137, 144eqtrd 2857 . . . . . . . . . 10 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))) = 0)
146113, 124, 145syl2anc 587 . . . . . . . . 9 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))) = 0)
147112, 146eqtr2d 2858 . . . . . . . 8 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → 0 = if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
148109, 147breqtrd 5068 . . . . . . 7 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → (!‘𝑃) ∥ if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
149108, 148pm2.61dan 812 . . . . . 6 ((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) → (!‘𝑃) ∥ if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
15076, 149pm2.61dan 812 . . . . 5 (𝜑 → (!‘𝑃) ∥ if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
1514, 58, 69, 150dvdsmultr1d 15639 . . . 4 (𝜑 → (!‘𝑃) ∥ (if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) · ∏𝑗 ∈ ((1...𝑀) ∖ {𝐽})if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗)))))))
15244zcnd 12076 . . . . 5 ((𝜑𝑗 ∈ (1...𝑀)) → if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℂ)
153 fveq2 6652 . . . . . . . 8 (𝑗 = 𝐽 → (𝐶𝑗) = (𝐶𝐽))
154153breq2d 5054 . . . . . . 7 (𝑗 = 𝐽 → (𝑃 < (𝐶𝑗) ↔ 𝑃 < (𝐶𝐽)))
155154adantl 485 . . . . . 6 ((𝜑𝑗 = 𝐽) → (𝑃 < (𝐶𝑗) ↔ 𝑃 < (𝐶𝐽)))
156153oveq2d 7156 . . . . . . . . . 10 (𝑗 = 𝐽 → (𝑃 − (𝐶𝑗)) = (𝑃 − (𝐶𝐽)))
157156fveq2d 6656 . . . . . . . . 9 (𝑗 = 𝐽 → (!‘(𝑃 − (𝐶𝑗))) = (!‘(𝑃 − (𝐶𝐽))))
158157oveq2d 7156 . . . . . . . 8 (𝑗 = 𝐽 → ((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) = ((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))))
159158adantl 485 . . . . . . 7 ((𝜑𝑗 = 𝐽) → ((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) = ((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))))
160 oveq2 7148 . . . . . . . . 9 (𝑗 = 𝐽 → (𝐽𝑗) = (𝐽𝐽))
161160, 48sylan9eqr 2879 . . . . . . . 8 ((𝜑𝑗 = 𝐽) → (𝐽𝑗) = 0)
162156adantl 485 . . . . . . . 8 ((𝜑𝑗 = 𝐽) → (𝑃 − (𝐶𝑗)) = (𝑃 − (𝐶𝐽)))
163161, 162oveq12d 7158 . . . . . . 7 ((𝜑𝑗 = 𝐽) → ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))) = (0↑(𝑃 − (𝐶𝐽))))
164159, 163oveq12d 7158 . . . . . 6 ((𝜑𝑗 = 𝐽) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗)))) = (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))))
165155, 164ifbieq2d 4464 . . . . 5 ((𝜑𝑗 = 𝐽) → if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) = if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
16631, 152, 27, 165fprodsplit1 42175 . . . 4 (𝜑 → ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) = (if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) · ∏𝑗 ∈ ((1...𝑀) ∖ {𝐽})if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗)))))))
167151, 166breqtrrd 5070 . . 3 (𝜑 → (!‘𝑃) ∥ ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))))
168 dvdsmultr2 15640 . . 3 (((!‘𝑃) ∈ ℤ ∧ (((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) · if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0)))))) ∈ ℤ ∧ ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℤ) → ((!‘𝑃) ∥ ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) → (!‘𝑃) ∥ ((((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) · if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0)))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))))))
16946, 167, 168sylc 65 . 2 (𝜑 → (!‘𝑃) ∥ ((((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) · if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0)))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗)))))))
170 etransclem25.n . . . . . . 7 (𝜑𝑁 ∈ ℕ0)
171170faccld 13640 . . . . . 6 (𝜑 → (!‘𝑁) ∈ ℕ)
172171nncnd 11641 . . . . 5 (𝜑 → (!‘𝑁) ∈ ℂ)
17311ffvelrnda 6833 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → (𝐶𝑗) ∈ (0...𝑁))
17413, 173sseldi 3940 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → (𝐶𝑗) ∈ ℕ0)
175174faccld 13640 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (!‘(𝐶𝑗)) ∈ ℕ)
176175nncnd 11641 . . . . . 6 ((𝜑𝑗 ∈ (0...𝑀)) → (!‘(𝐶𝑗)) ∈ ℂ)
17710, 176fprodcl 15297 . . . . 5 (𝜑 → ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗)) ∈ ℂ)
178175nnne0d 11675 . . . . . 6 ((𝜑𝑗 ∈ (0...𝑀)) → (!‘(𝐶𝑗)) ≠ 0)
17910, 176, 178fprodn0 15324 . . . . 5 (𝜑 → ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗)) ≠ 0)
180172, 177, 179divcld 11405 . . . 4 (𝜑 → ((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) ∈ ℂ)
18129zcnd 12076 . . . 4 (𝜑 → if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0))))) ∈ ℂ)
18231, 152fprodcl 15297 . . . 4 (𝜑 → ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℂ)
183180, 181, 182mulassd 10653 . . 3 (𝜑 → ((((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) · if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0)))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗)))))) = (((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) · (if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))))))
184 etransclem25.t . . 3 𝑇 = (((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) · (if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗)))))))
185183, 184eqtr4di 2875 . 2 (𝜑 → ((((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) · if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0)))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗)))))) = 𝑇)
186169, 185breqtrd 5068 1 (𝜑 → (!‘𝑃) ∥ 𝑇)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 399  w3a 1084   = wceq 1538  wcel 2114  wne 3011  Vcvv 3469  cdif 3905  wss 3908  ifcif 4439  {csn 4539   class class class wbr 5042  wf 6330  cfv 6334  (class class class)co 7140  m cmap 8393  Fincfn 8496  cc 10524  cr 10525  0cc0 10526  1c1 10527   + caddc 10529   · cmul 10531   < clt 10664  cle 10665  cmin 10859   / cdiv 11286  cn 11625  0cn0 11885  cz 11969  ...cfz 12885  cexp 13425  !cfa 13629  Σcsu 15033  cprod 15250  cdvds 15598
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2178  ax-ext 2794  ax-rep 5166  ax-sep 5179  ax-nul 5186  ax-pow 5243  ax-pr 5307  ax-un 7446  ax-inf2 9092  ax-cnex 10582  ax-resscn 10583  ax-1cn 10584  ax-icn 10585  ax-addcl 10586  ax-addrcl 10587  ax-mulcl 10588  ax-mulrcl 10589  ax-mulcom 10590  ax-addass 10591  ax-mulass 10592  ax-distr 10593  ax-i2m1 10594  ax-1ne0 10595  ax-1rid 10596  ax-rnegex 10597  ax-rrecex 10598  ax-cnre 10599  ax-pre-lttri 10600  ax-pre-lttrn 10601  ax-pre-ltadd 10602  ax-pre-mulgt0 10603  ax-pre-sup 10604
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3or 1085  df-3an 1086  df-tru 1541  df-fal 1551  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2622  df-eu 2653  df-clab 2801  df-cleq 2815  df-clel 2894  df-nfc 2962  df-ne 3012  df-nel 3116  df-ral 3135  df-rex 3136  df-reu 3137  df-rmo 3138  df-rab 3139  df-v 3471  df-sbc 3748  df-csb 3856  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3927  df-nul 4266  df-if 4440  df-pw 4513  df-sn 4540  df-pr 4542  df-tp 4544  df-op 4546  df-uni 4814  df-int 4852  df-iun 4896  df-br 5043  df-opab 5105  df-mpt 5123  df-tr 5149  df-id 5437  df-eprel 5442  df-po 5451  df-so 5452  df-fr 5491  df-se 5492  df-we 5493  df-xp 5538  df-rel 5539  df-cnv 5540  df-co 5541  df-dm 5542  df-rn 5543  df-res 5544  df-ima 5545  df-pred 6126  df-ord 6172  df-on 6173  df-lim 6174  df-suc 6175  df-iota 6293  df-fun 6336  df-fn 6337  df-f 6338  df-f1 6339  df-fo 6340  df-f1o 6341  df-fv 6342  df-isom 6343  df-riota 7098  df-ov 7143  df-oprab 7144  df-mpo 7145  df-om 7566  df-1st 7675  df-2nd 7676  df-wrecs 7934  df-recs 7995  df-rdg 8033  df-1o 8089  df-oadd 8093  df-er 8276  df-map 8395  df-en 8497  df-dom 8498  df-sdom 8499  df-fin 8500  df-sup 8894  df-oi 8962  df-card 9356  df-pnf 10666  df-mnf 10667  df-xr 10668  df-ltxr 10669  df-le 10670  df-sub 10861  df-neg 10862  df-div 11287  df-nn 11626  df-2 11688  df-3 11689  df-n0 11886  df-z 11970  df-uz 12232  df-rp 12378  df-fz 12886  df-fzo 13029  df-seq 13365  df-exp 13426  df-fac 13630  df-bc 13659  df-hash 13687  df-cj 14449  df-re 14450  df-im 14451  df-sqrt 14585  df-abs 14586  df-clim 14836  df-sum 15034  df-prod 15251  df-dvds 15599
This theorem is referenced by:  etransclem28  42844  etransclem38  42854
  Copyright terms: Public domain W3C validator