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 39809
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 11303 . . . . . 6 (𝜑𝑃 ∈ ℕ0)
32faccld 13019 . . . . 5 (𝜑 → (!‘𝑃) ∈ ℕ)
43nnzd 11433 . . . 4 (𝜑 → (!‘𝑃) ∈ ℤ)
5 etransclem25.sumc . . . . . . . . . 10 (𝜑 → Σ𝑗 ∈ (0...𝑀)(𝐶𝑗) = 𝑁)
65eqcomd 2627 . . . . . . . . 9 (𝜑𝑁 = Σ𝑗 ∈ (0...𝑀)(𝐶𝑗))
76fveq2d 6157 . . . . . . . 8 (𝜑 → (!‘𝑁) = (!‘Σ𝑗 ∈ (0...𝑀)(𝐶𝑗)))
87oveq1d 6625 . . . . . . 7 (𝜑 → ((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) = ((!‘Σ𝑗 ∈ (0...𝑀)(𝐶𝑗)) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))))
9 nfcv 2761 . . . . . . . 8 𝑗𝐶
10 fzfid 12720 . . . . . . . 8 (𝜑 → (0...𝑀) ∈ Fin)
11 etransclem25.c . . . . . . . . 9 (𝜑𝐶:(0...𝑀)⟶(0...𝑁))
12 nn0ex 11250 . . . . . . . . . . 11 0 ∈ V
13 fzssnn0 39028 . . . . . . . . . . 11 (0...𝑁) ⊆ ℕ0
14 mapss 7852 . . . . . . . . . . 11 ((ℕ0 ∈ V ∧ (0...𝑁) ⊆ ℕ0) → ((0...𝑁) ↑𝑚 (0...𝑀)) ⊆ (ℕ0𝑚 (0...𝑀)))
1512, 13, 14mp2an 707 . . . . . . . . . 10 ((0...𝑁) ↑𝑚 (0...𝑀)) ⊆ (ℕ0𝑚 (0...𝑀))
16 ovex 6638 . . . . . . . . . . . 12 (0...𝑁) ∈ V
17 ovexd 6640 . . . . . . . . . . . 12 (𝐶:(0...𝑀)⟶(0...𝑁) → (0...𝑀) ∈ V)
18 elmapg 7822 . . . . . . . . . . . 12 (((0...𝑁) ∈ V ∧ (0...𝑀) ∈ V) → (𝐶 ∈ ((0...𝑁) ↑𝑚 (0...𝑀)) ↔ 𝐶:(0...𝑀)⟶(0...𝑁)))
1916, 17, 18sylancr 694 . . . . . . . . . . 11 (𝐶:(0...𝑀)⟶(0...𝑁) → (𝐶 ∈ ((0...𝑁) ↑𝑚 (0...𝑀)) ↔ 𝐶:(0...𝑀)⟶(0...𝑁)))
2019ibir 257 . . . . . . . . . 10 (𝐶:(0...𝑀)⟶(0...𝑁) → 𝐶 ∈ ((0...𝑁) ↑𝑚 (0...𝑀)))
2115, 20sseldi 3585 . . . . . . . . 9 (𝐶:(0...𝑀)⟶(0...𝑁) → 𝐶 ∈ (ℕ0𝑚 (0...𝑀)))
2211, 21syl 17 . . . . . . . 8 (𝜑𝐶 ∈ (ℕ0𝑚 (0...𝑀)))
239, 10, 22mccl 39262 . . . . . . 7 (𝜑 → ((!‘Σ𝑗 ∈ (0...𝑀)(𝐶𝑗)) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) ∈ ℕ)
248, 23eqeltrd 2698 . . . . . 6 (𝜑 → ((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) ∈ ℕ)
2524nnzd 11433 . . . . 5 (𝜑 → ((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) ∈ ℤ)
26 etransclem25.m . . . . . 6 (𝜑𝑀 ∈ ℕ0)
27 etransclem25.j . . . . . . 7 (𝜑𝐽 ∈ (1...𝑀))
2827elfzelzd 39025 . . . . . 6 (𝜑𝐽 ∈ ℤ)
291, 26, 11, 28etransclem10 39794 . . . . 5 (𝜑 → if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0))))) ∈ ℤ)
3025, 29zmulcld 11440 . . . 4 (𝜑 → (((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) · if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0)))))) ∈ ℤ)
31 fzfid 12720 . . . . 5 (𝜑 → (1...𝑀) ∈ Fin)
321adantr 481 . . . . . 6 ((𝜑𝑗 ∈ (1...𝑀)) → 𝑃 ∈ ℕ)
3311adantr 481 . . . . . 6 ((𝜑𝑗 ∈ (1...𝑀)) → 𝐶:(0...𝑀)⟶(0...𝑁))
34 0z 11340 . . . . . . . . 9 0 ∈ ℤ
35 fzp1ss 12342 . . . . . . . . 9 (0 ∈ ℤ → ((0 + 1)...𝑀) ⊆ (0...𝑀))
3634, 35ax-mp 5 . . . . . . . 8 ((0 + 1)...𝑀) ⊆ (0...𝑀)
37 id 22 . . . . . . . . 9 (𝑗 ∈ (1...𝑀) → 𝑗 ∈ (1...𝑀))
38 1e0p1 11504 . . . . . . . . . 10 1 = (0 + 1)
3938oveq1i 6620 . . . . . . . . 9 (1...𝑀) = ((0 + 1)...𝑀)
4037, 39syl6eleq 2708 . . . . . . . 8 (𝑗 ∈ (1...𝑀) → 𝑗 ∈ ((0 + 1)...𝑀))
4136, 40sseldi 3585 . . . . . . 7 (𝑗 ∈ (1...𝑀) → 𝑗 ∈ (0...𝑀))
4241adantl 482 . . . . . 6 ((𝜑𝑗 ∈ (1...𝑀)) → 𝑗 ∈ (0...𝑀))
4328adantr 481 . . . . . 6 ((𝜑𝑗 ∈ (1...𝑀)) → 𝐽 ∈ ℤ)
4432, 33, 42, 43etransclem3 39787 . . . . 5 ((𝜑𝑗 ∈ (1...𝑀)) → if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℤ)
4531, 44fprodzcl 14620 . . . 4 (𝜑 → ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℤ)
464, 30, 453jca 1240 . . 3 (𝜑 → ((!‘𝑃) ∈ ℤ ∧ (((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) · if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0)))))) ∈ ℤ ∧ ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℤ))
4728zcnd 11435 . . . . . . . . . . 11 (𝜑𝐽 ∈ ℂ)
4847subidd 10332 . . . . . . . . . 10 (𝜑 → (𝐽𝐽) = 0)
4948eqcomd 2627 . . . . . . . . 9 (𝜑 → 0 = (𝐽𝐽))
5049oveq1d 6625 . . . . . . . 8 (𝜑 → (0↑(𝑃 − (𝐶𝐽))) = ((𝐽𝐽)↑(𝑃 − (𝐶𝐽))))
5150oveq2d 6626 . . . . . . 7 (𝜑 → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))) = (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · ((𝐽𝐽)↑(𝑃 − (𝐶𝐽)))))
5251ifeq2d 4082 . . . . . 6 (𝜑 → if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) = if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · ((𝐽𝐽)↑(𝑃 − (𝐶𝐽))))))
53 id 22 . . . . . . . . . 10 (𝐽 ∈ (1...𝑀) → 𝐽 ∈ (1...𝑀))
5453, 39syl6eleq 2708 . . . . . . . . 9 (𝐽 ∈ (1...𝑀) → 𝐽 ∈ ((0 + 1)...𝑀))
5536, 54sseldi 3585 . . . . . . . 8 (𝐽 ∈ (1...𝑀) → 𝐽 ∈ (0...𝑀))
5627, 55syl 17 . . . . . . 7 (𝜑𝐽 ∈ (0...𝑀))
571, 11, 56, 28etransclem3 39787 . . . . . 6 (𝜑 → if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · ((𝐽𝐽)↑(𝑃 − (𝐶𝐽))))) ∈ ℤ)
5852, 57eqeltrd 2698 . . . . 5 (𝜑 → if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) ∈ ℤ)
59 fzfi 12719 . . . . . . 7 (1...𝑀) ∈ Fin
60 diffi 8144 . . . . . . 7 ((1...𝑀) ∈ Fin → ((1...𝑀) ∖ {𝐽}) ∈ Fin)
6159, 60mp1i 13 . . . . . 6 (𝜑 → ((1...𝑀) ∖ {𝐽}) ∈ Fin)
621adantr 481 . . . . . . 7 ((𝜑𝑗 ∈ ((1...𝑀) ∖ {𝐽})) → 𝑃 ∈ ℕ)
6311adantr 481 . . . . . . 7 ((𝜑𝑗 ∈ ((1...𝑀) ∖ {𝐽})) → 𝐶:(0...𝑀)⟶(0...𝑁))
64 eldifi 3715 . . . . . . . . 9 (𝑗 ∈ ((1...𝑀) ∖ {𝐽}) → 𝑗 ∈ (1...𝑀))
6564, 41syl 17 . . . . . . . 8 (𝑗 ∈ ((1...𝑀) ∖ {𝐽}) → 𝑗 ∈ (0...𝑀))
6665adantl 482 . . . . . . 7 ((𝜑𝑗 ∈ ((1...𝑀) ∖ {𝐽})) → 𝑗 ∈ (0...𝑀))
6728adantr 481 . . . . . . 7 ((𝜑𝑗 ∈ ((1...𝑀) ∖ {𝐽})) → 𝐽 ∈ ℤ)
6862, 63, 66, 67etransclem3 39787 . . . . . 6 ((𝜑𝑗 ∈ ((1...𝑀) ∖ {𝐽})) → if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℤ)
6961, 68fprodzcl 14620 . . . . 5 (𝜑 → ∏𝑗 ∈ ((1...𝑀) ∖ {𝐽})if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℤ)
70 dvds0 14932 . . . . . . . . 9 ((!‘𝑃) ∈ ℤ → (!‘𝑃) ∥ 0)
714, 70syl 17 . . . . . . . 8 (𝜑 → (!‘𝑃) ∥ 0)
7271adantr 481 . . . . . . 7 ((𝜑𝑃 < (𝐶𝐽)) → (!‘𝑃) ∥ 0)
73 iftrue 4069 . . . . . . . . 9 (𝑃 < (𝐶𝐽) → if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) = 0)
7473eqcomd 2627 . . . . . . . 8 (𝑃 < (𝐶𝐽) → 0 = if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
7574adantl 482 . . . . . . 7 ((𝜑𝑃 < (𝐶𝐽)) → 0 = if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
7672, 75breqtrd 4644 . . . . . 6 ((𝜑𝑃 < (𝐶𝐽)) → (!‘𝑃) ∥ if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
77 iddvds 14930 . . . . . . . . . 10 ((!‘𝑃) ∈ ℤ → (!‘𝑃) ∥ (!‘𝑃))
784, 77syl 17 . . . . . . . . 9 (𝜑 → (!‘𝑃) ∥ (!‘𝑃))
7978ad2antrr 761 . . . . . . . 8 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ 𝑃 = (𝐶𝐽)) → (!‘𝑃) ∥ (!‘𝑃))
80 iffalse 4072 . . . . . . . . . 10 𝑃 < (𝐶𝐽) → if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) = (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))))
8180ad2antlr 762 . . . . . . . . 9 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ 𝑃 = (𝐶𝐽)) → if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) = (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))))
82 oveq1 6617 . . . . . . . . . . . . . . . . . 18 (𝑃 = (𝐶𝐽) → (𝑃 − (𝐶𝐽)) = ((𝐶𝐽) − (𝐶𝐽)))
8382adantl 482 . . . . . . . . . . . . . . . . 17 ((𝜑𝑃 = (𝐶𝐽)) → (𝑃 − (𝐶𝐽)) = ((𝐶𝐽) − (𝐶𝐽)))
8411, 56ffvelrnd 6321 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (𝐶𝐽) ∈ (0...𝑁))
8584elfzelzd 39025 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (𝐶𝐽) ∈ ℤ)
8685zcnd 11435 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝐶𝐽) ∈ ℂ)
8786adantr 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑃 = (𝐶𝐽)) → (𝐶𝐽) ∈ ℂ)
8887subidd 10332 . . . . . . . . . . . . . . . . 17 ((𝜑𝑃 = (𝐶𝐽)) → ((𝐶𝐽) − (𝐶𝐽)) = 0)
8983, 88eqtrd 2655 . . . . . . . . . . . . . . . 16 ((𝜑𝑃 = (𝐶𝐽)) → (𝑃 − (𝐶𝐽)) = 0)
9089fveq2d 6157 . . . . . . . . . . . . . . 15 ((𝜑𝑃 = (𝐶𝐽)) → (!‘(𝑃 − (𝐶𝐽))) = (!‘0))
91 fac0 13011 . . . . . . . . . . . . . . 15 (!‘0) = 1
9290, 91syl6eq 2671 . . . . . . . . . . . . . 14 ((𝜑𝑃 = (𝐶𝐽)) → (!‘(𝑃 − (𝐶𝐽))) = 1)
9392oveq2d 6626 . . . . . . . . . . . . 13 ((𝜑𝑃 = (𝐶𝐽)) → ((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) = ((!‘𝑃) / 1))
943nncnd 10988 . . . . . . . . . . . . . . 15 (𝜑 → (!‘𝑃) ∈ ℂ)
9594div1d 10745 . . . . . . . . . . . . . 14 (𝜑 → ((!‘𝑃) / 1) = (!‘𝑃))
9695adantr 481 . . . . . . . . . . . . 13 ((𝜑𝑃 = (𝐶𝐽)) → ((!‘𝑃) / 1) = (!‘𝑃))
9793, 96eqtrd 2655 . . . . . . . . . . . 12 ((𝜑𝑃 = (𝐶𝐽)) → ((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) = (!‘𝑃))
9889oveq2d 6626 . . . . . . . . . . . . 13 ((𝜑𝑃 = (𝐶𝐽)) → (0↑(𝑃 − (𝐶𝐽))) = (0↑0))
99 0cnd 9985 . . . . . . . . . . . . . 14 ((𝜑𝑃 = (𝐶𝐽)) → 0 ∈ ℂ)
10099exp0d 12950 . . . . . . . . . . . . 13 ((𝜑𝑃 = (𝐶𝐽)) → (0↑0) = 1)
10198, 100eqtrd 2655 . . . . . . . . . . . 12 ((𝜑𝑃 = (𝐶𝐽)) → (0↑(𝑃 − (𝐶𝐽))) = 1)
10297, 101oveq12d 6628 . . . . . . . . . . 11 ((𝜑𝑃 = (𝐶𝐽)) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))) = ((!‘𝑃) · 1))
10394mulid1d 10009 . . . . . . . . . . . 12 (𝜑 → ((!‘𝑃) · 1) = (!‘𝑃))
104103adantr 481 . . . . . . . . . . 11 ((𝜑𝑃 = (𝐶𝐽)) → ((!‘𝑃) · 1) = (!‘𝑃))
105102, 104eqtrd 2655 . . . . . . . . . 10 ((𝜑𝑃 = (𝐶𝐽)) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))) = (!‘𝑃))
106105adantlr 750 . . . . . . . . 9 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ 𝑃 = (𝐶𝐽)) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))) = (!‘𝑃))
10781, 106eqtr2d 2656 . . . . . . . 8 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ 𝑃 = (𝐶𝐽)) → (!‘𝑃) = if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
10879, 107breqtrd 4644 . . . . . . 7 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ 𝑃 = (𝐶𝐽)) → (!‘𝑃) ∥ if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
10971ad2antrr 761 . . . . . . . 8 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → (!‘𝑃) ∥ 0)
110 simpr 477 . . . . . . . . . . 11 ((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) → ¬ 𝑃 < (𝐶𝐽))
111110adantr 481 . . . . . . . . . 10 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → ¬ 𝑃 < (𝐶𝐽))
112111iffalsed 4074 . . . . . . . . 9 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) = (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))))
113 simpll 789 . . . . . . . . . 10 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → 𝜑)
11485zred 11434 . . . . . . . . . . . 12 (𝜑 → (𝐶𝐽) ∈ ℝ)
115114ad2antrr 761 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → (𝐶𝐽) ∈ ℝ)
1161nnred 10987 . . . . . . . . . . . 12 (𝜑𝑃 ∈ ℝ)
117116ad2antrr 761 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → 𝑃 ∈ ℝ)
118114adantr 481 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) → (𝐶𝐽) ∈ ℝ)
119116adantr 481 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) → 𝑃 ∈ ℝ)
120118, 119, 110nltled 10139 . . . . . . . . . . . 12 ((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) → (𝐶𝐽) ≤ 𝑃)
121120adantr 481 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → (𝐶𝐽) ≤ 𝑃)
122 neqne 2798 . . . . . . . . . . . 12 𝑃 = (𝐶𝐽) → 𝑃 ≠ (𝐶𝐽))
123122adantl 482 . . . . . . . . . . 11 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → 𝑃 ≠ (𝐶𝐽))
124115, 117, 121, 123leneltd 10143 . . . . . . . . . 10 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → (𝐶𝐽) < 𝑃)
1251nnzd 11433 . . . . . . . . . . . . . . . 16 (𝜑𝑃 ∈ ℤ)
126125adantr 481 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → 𝑃 ∈ ℤ)
12785adantr 481 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (𝐶𝐽) ∈ ℤ)
128126, 127zsubcld 11439 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (𝑃 − (𝐶𝐽)) ∈ ℤ)
129 simpr 477 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (𝐶𝐽) < 𝑃)
130114adantr 481 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (𝐶𝐽) ∈ ℝ)
131116adantr 481 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → 𝑃 ∈ ℝ)
132130, 131posdifd 10566 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → ((𝐶𝐽) < 𝑃 ↔ 0 < (𝑃 − (𝐶𝐽))))
133129, 132mpbid 222 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → 0 < (𝑃 − (𝐶𝐽)))
134 elnnz 11339 . . . . . . . . . . . . . 14 ((𝑃 − (𝐶𝐽)) ∈ ℕ ↔ ((𝑃 − (𝐶𝐽)) ∈ ℤ ∧ 0 < (𝑃 − (𝐶𝐽))))
135128, 133, 134sylanbrc 697 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (𝑃 − (𝐶𝐽)) ∈ ℕ)
1361350expd 12972 . . . . . . . . . . . 12 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (0↑(𝑃 − (𝐶𝐽))) = 0)
137136oveq2d 6626 . . . . . . . . . . 11 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))) = (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · 0))
13894adantr 481 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (!‘𝑃) ∈ ℂ)
139135nnnn0d 11303 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (𝑃 − (𝐶𝐽)) ∈ ℕ0)
140139faccld 13019 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (!‘(𝑃 − (𝐶𝐽))) ∈ ℕ)
141140nncnd 10988 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (!‘(𝑃 − (𝐶𝐽))) ∈ ℂ)
142140nnne0d 11017 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (!‘(𝑃 − (𝐶𝐽))) ≠ 0)
143138, 141, 142divcld 10753 . . . . . . . . . . . 12 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → ((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) ∈ ℂ)
144143mul01d 10187 . . . . . . . . . . 11 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · 0) = 0)
145137, 144eqtrd 2655 . . . . . . . . . 10 ((𝜑 ∧ (𝐶𝐽) < 𝑃) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))) = 0)
146113, 124, 145syl2anc 692 . . . . . . . . 9 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))) = 0)
147112, 146eqtr2d 2656 . . . . . . . 8 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → 0 = if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
148109, 147breqtrd 4644 . . . . . . 7 (((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) ∧ ¬ 𝑃 = (𝐶𝐽)) → (!‘𝑃) ∥ if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
149108, 148pm2.61dan 831 . . . . . 6 ((𝜑 ∧ ¬ 𝑃 < (𝐶𝐽)) → (!‘𝑃) ∥ if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
15076, 149pm2.61dan 831 . . . . 5 (𝜑 → (!‘𝑃) ∥ if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
1514, 58, 69, 150dvdsmultr1d 14955 . . . 4 (𝜑 → (!‘𝑃) ∥ (if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) · ∏𝑗 ∈ ((1...𝑀) ∖ {𝐽})if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗)))))))
15244zcnd 11435 . . . . 5 ((𝜑𝑗 ∈ (1...𝑀)) → if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℂ)
153 fveq2 6153 . . . . . . . 8 (𝑗 = 𝐽 → (𝐶𝑗) = (𝐶𝐽))
154153breq2d 4630 . . . . . . 7 (𝑗 = 𝐽 → (𝑃 < (𝐶𝑗) ↔ 𝑃 < (𝐶𝐽)))
155154adantl 482 . . . . . 6 ((𝜑𝑗 = 𝐽) → (𝑃 < (𝐶𝑗) ↔ 𝑃 < (𝐶𝐽)))
156153oveq2d 6626 . . . . . . . . . 10 (𝑗 = 𝐽 → (𝑃 − (𝐶𝑗)) = (𝑃 − (𝐶𝐽)))
157156fveq2d 6157 . . . . . . . . 9 (𝑗 = 𝐽 → (!‘(𝑃 − (𝐶𝑗))) = (!‘(𝑃 − (𝐶𝐽))))
158157oveq2d 6626 . . . . . . . 8 (𝑗 = 𝐽 → ((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) = ((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))))
159158adantl 482 . . . . . . 7 ((𝜑𝑗 = 𝐽) → ((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) = ((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))))
160 oveq2 6618 . . . . . . . . 9 (𝑗 = 𝐽 → (𝐽𝑗) = (𝐽𝐽))
161160, 48sylan9eqr 2677 . . . . . . . 8 ((𝜑𝑗 = 𝐽) → (𝐽𝑗) = 0)
162156adantl 482 . . . . . . . 8 ((𝜑𝑗 = 𝐽) → (𝑃 − (𝐶𝑗)) = (𝑃 − (𝐶𝐽)))
163161, 162oveq12d 6628 . . . . . . 7 ((𝜑𝑗 = 𝐽) → ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))) = (0↑(𝑃 − (𝐶𝐽))))
164159, 163oveq12d 6628 . . . . . 6 ((𝜑𝑗 = 𝐽) → (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗)))) = (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽)))))
165155, 164ifbieq2d 4088 . . . . 5 ((𝜑𝑗 = 𝐽) → if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) = if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))))
16631, 152, 27, 165fprodsplit1 39257 . . . 4 (𝜑 → ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) = (if(𝑃 < (𝐶𝐽), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝐽)))) · (0↑(𝑃 − (𝐶𝐽))))) · ∏𝑗 ∈ ((1...𝑀) ∖ {𝐽})if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗)))))))
167151, 166breqtrrd 4646 . . 3 (𝜑 → (!‘𝑃) ∥ ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))))
168 dvdsmultr2 14956 . . 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 13019 . . . . . 6 (𝜑 → (!‘𝑁) ∈ ℕ)
172171nncnd 10988 . . . . 5 (𝜑 → (!‘𝑁) ∈ ℂ)
17311ffvelrnda 6320 . . . . . . . . 9 ((𝜑𝑗 ∈ (0...𝑀)) → (𝐶𝑗) ∈ (0...𝑁))
17413, 173sseldi 3585 . . . . . . . 8 ((𝜑𝑗 ∈ (0...𝑀)) → (𝐶𝑗) ∈ ℕ0)
175174faccld 13019 . . . . . . 7 ((𝜑𝑗 ∈ (0...𝑀)) → (!‘(𝐶𝑗)) ∈ ℕ)
176175nncnd 10988 . . . . . 6 ((𝜑𝑗 ∈ (0...𝑀)) → (!‘(𝐶𝑗)) ∈ ℂ)
17710, 176fprodcl 14618 . . . . 5 (𝜑 → ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗)) ∈ ℂ)
178175nnne0d 11017 . . . . . 6 ((𝜑𝑗 ∈ (0...𝑀)) → (!‘(𝐶𝑗)) ≠ 0)
17910, 176, 178fprodn0 14645 . . . . 5 (𝜑 → ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗)) ≠ 0)
180172, 177, 179divcld 10753 . . . 4 (𝜑 → ((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) ∈ ℂ)
18129zcnd 11435 . . . 4 (𝜑 → if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0))))) ∈ ℂ)
18231, 152fprodcl 14618 . . . 4 (𝜑 → ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗))))) ∈ ℂ)
183180, 181, 182mulassd 10015 . . 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, 184syl6eqr 2673 . 2 (𝜑 → ((((!‘𝑁) / ∏𝑗 ∈ (0...𝑀)(!‘(𝐶𝑗))) · if((𝑃 − 1) < (𝐶‘0), 0, (((!‘(𝑃 − 1)) / (!‘((𝑃 − 1) − (𝐶‘0)))) · (𝐽↑((𝑃 − 1) − (𝐶‘0)))))) · ∏𝑗 ∈ (1...𝑀)if(𝑃 < (𝐶𝑗), 0, (((!‘𝑃) / (!‘(𝑃 − (𝐶𝑗)))) · ((𝐽𝑗)↑(𝑃 − (𝐶𝑗)))))) = 𝑇)
186169, 185breqtrd 4644 1 (𝜑 → (!‘𝑃) ∥ 𝑇)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wa 384  w3a 1036   = wceq 1480  wcel 1987  wne 2790  Vcvv 3189  cdif 3556  wss 3559  ifcif 4063  {csn 4153   class class class wbr 4618  wf 5848  cfv 5852  (class class class)co 6610  𝑚 cmap 7809  Fincfn 7907  cc 9886  cr 9887  0cc0 9888  1c1 9889   + caddc 9891   · cmul 9893   < clt 10026  cle 10027  cmin 10218   / cdiv 10636  cn 10972  0cn0 11244  cz 11329  ...cfz 12276  cexp 12808  !cfa 13008  Σcsu 14358  cprod 14571  cdvds 14918
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1836  ax-6 1885  ax-7 1932  ax-8 1989  ax-9 1996  ax-10 2016  ax-11 2031  ax-12 2044  ax-13 2245  ax-ext 2601  ax-rep 4736  ax-sep 4746  ax-nul 4754  ax-pow 4808  ax-pr 4872  ax-un 6909  ax-inf2 8490  ax-cnex 9944  ax-resscn 9945  ax-1cn 9946  ax-icn 9947  ax-addcl 9948  ax-addrcl 9949  ax-mulcl 9950  ax-mulrcl 9951  ax-mulcom 9952  ax-addass 9953  ax-mulass 9954  ax-distr 9955  ax-i2m1 9956  ax-1ne0 9957  ax-1rid 9958  ax-rnegex 9959  ax-rrecex 9960  ax-cnre 9961  ax-pre-lttri 9962  ax-pre-lttrn 9963  ax-pre-ltadd 9964  ax-pre-mulgt0 9965  ax-pre-sup 9966
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1483  df-fal 1486  df-ex 1702  df-nf 1707  df-sb 1878  df-eu 2473  df-mo 2474  df-clab 2608  df-cleq 2614  df-clel 2617  df-nfc 2750  df-ne 2791  df-nel 2894  df-ral 2912  df-rex 2913  df-reu 2914  df-rmo 2915  df-rab 2916  df-v 3191  df-sbc 3422  df-csb 3519  df-dif 3562  df-un 3564  df-in 3566  df-ss 3573  df-pss 3575  df-nul 3897  df-if 4064  df-pw 4137  df-sn 4154  df-pr 4156  df-tp 4158  df-op 4160  df-uni 4408  df-int 4446  df-iun 4492  df-br 4619  df-opab 4679  df-mpt 4680  df-tr 4718  df-eprel 4990  df-id 4994  df-po 5000  df-so 5001  df-fr 5038  df-se 5039  df-we 5040  df-xp 5085  df-rel 5086  df-cnv 5087  df-co 5088  df-dm 5089  df-rn 5090  df-res 5091  df-ima 5092  df-pred 5644  df-ord 5690  df-on 5691  df-lim 5692  df-suc 5693  df-iota 5815  df-fun 5854  df-fn 5855  df-f 5856  df-f1 5857  df-fo 5858  df-f1o 5859  df-fv 5860  df-isom 5861  df-riota 6571  df-ov 6613  df-oprab 6614  df-mpt2 6615  df-om 7020  df-1st 7120  df-2nd 7121  df-wrecs 7359  df-recs 7420  df-rdg 7458  df-1o 7512  df-oadd 7516  df-er 7694  df-map 7811  df-en 7908  df-dom 7909  df-sdom 7910  df-fin 7911  df-sup 8300  df-oi 8367  df-card 8717  df-pnf 10028  df-mnf 10029  df-xr 10030  df-ltxr 10031  df-le 10032  df-sub 10220  df-neg 10221  df-div 10637  df-nn 10973  df-2 11031  df-3 11032  df-n0 11245  df-z 11330  df-uz 11640  df-rp 11785  df-fz 12277  df-fzo 12415  df-seq 12750  df-exp 12809  df-fac 13009  df-bc 13038  df-hash 13066  df-cj 13781  df-re 13782  df-im 13783  df-sqrt 13917  df-abs 13918  df-clim 14161  df-sum 14359  df-prod 14572  df-dvds 14919
This theorem is referenced by:  etransclem28  39812  etransclem38  39822
  Copyright terms: Public domain W3C validator