Users' Mathboxes Mathbox for Scott Fenton < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  faclim Structured version   Visualization version   GIF version

Theorem faclim 33691
Description: An infinite product expression relating to factorials. Originally due to Euler. (Contributed by Scott Fenton, 22-Nov-2017.)
Hypothesis
Ref Expression
faclim.1 𝐹 = (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝐴) / (1 + (𝐴 / 𝑛))))
Assertion
Ref Expression
faclim (𝐴 ∈ ℕ0 → seq1( · , 𝐹) ⇝ (!‘𝐴))
Distinct variable group:   𝐴,𝑛
Allowed substitution hint:   𝐹(𝑛)

Proof of Theorem faclim
Dummy variables 𝑎 𝑏 𝑚 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 faclim.1 . . 3 𝐹 = (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝐴) / (1 + (𝐴 / 𝑛))))
2 seqeq3 13707 . . 3 (𝐹 = (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝐴) / (1 + (𝐴 / 𝑛)))) → seq1( · , 𝐹) = seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝐴) / (1 + (𝐴 / 𝑛))))))
31, 2ax-mp 5 . 2 seq1( · , 𝐹) = seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝐴) / (1 + (𝐴 / 𝑛)))))
4 oveq2 7276 . . . . . . 7 (𝑎 = 0 → ((1 + (1 / 𝑛))↑𝑎) = ((1 + (1 / 𝑛))↑0))
5 oveq1 7275 . . . . . . . 8 (𝑎 = 0 → (𝑎 / 𝑛) = (0 / 𝑛))
65oveq2d 7284 . . . . . . 7 (𝑎 = 0 → (1 + (𝑎 / 𝑛)) = (1 + (0 / 𝑛)))
74, 6oveq12d 7286 . . . . . 6 (𝑎 = 0 → (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛))) = (((1 + (1 / 𝑛))↑0) / (1 + (0 / 𝑛))))
87mpteq2dv 5180 . . . . 5 (𝑎 = 0 → (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛)))) = (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑0) / (1 + (0 / 𝑛)))))
98seqeq3d 13710 . . . 4 (𝑎 = 0 → seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛))))) = seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑0) / (1 + (0 / 𝑛))))))
10 fveq2 6768 . . . . 5 (𝑎 = 0 → (!‘𝑎) = (!‘0))
11 fac0 13971 . . . . 5 (!‘0) = 1
1210, 11eqtrdi 2795 . . . 4 (𝑎 = 0 → (!‘𝑎) = 1)
139, 12breq12d 5091 . . 3 (𝑎 = 0 → (seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛))))) ⇝ (!‘𝑎) ↔ seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑0) / (1 + (0 / 𝑛))))) ⇝ 1))
14 oveq2 7276 . . . . . . 7 (𝑎 = 𝑚 → ((1 + (1 / 𝑛))↑𝑎) = ((1 + (1 / 𝑛))↑𝑚))
15 oveq1 7275 . . . . . . . 8 (𝑎 = 𝑚 → (𝑎 / 𝑛) = (𝑚 / 𝑛))
1615oveq2d 7284 . . . . . . 7 (𝑎 = 𝑚 → (1 + (𝑎 / 𝑛)) = (1 + (𝑚 / 𝑛)))
1714, 16oveq12d 7286 . . . . . 6 (𝑎 = 𝑚 → (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛))) = (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))
1817mpteq2dv 5180 . . . . 5 (𝑎 = 𝑚 → (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛)))) = (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛)))))
1918seqeq3d 13710 . . . 4 (𝑎 = 𝑚 → seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛))))) = seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))))
20 fveq2 6768 . . . 4 (𝑎 = 𝑚 → (!‘𝑎) = (!‘𝑚))
2119, 20breq12d 5091 . . 3 (𝑎 = 𝑚 → (seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛))))) ⇝ (!‘𝑎) ↔ seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))) ⇝ (!‘𝑚)))
22 oveq2 7276 . . . . . . 7 (𝑎 = (𝑚 + 1) → ((1 + (1 / 𝑛))↑𝑎) = ((1 + (1 / 𝑛))↑(𝑚 + 1)))
23 oveq1 7275 . . . . . . . 8 (𝑎 = (𝑚 + 1) → (𝑎 / 𝑛) = ((𝑚 + 1) / 𝑛))
2423oveq2d 7284 . . . . . . 7 (𝑎 = (𝑚 + 1) → (1 + (𝑎 / 𝑛)) = (1 + ((𝑚 + 1) / 𝑛)))
2522, 24oveq12d 7286 . . . . . 6 (𝑎 = (𝑚 + 1) → (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛))) = (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))))
2625mpteq2dv 5180 . . . . 5 (𝑎 = (𝑚 + 1) → (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛)))) = (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛)))))
2726seqeq3d 13710 . . . 4 (𝑎 = (𝑚 + 1) → seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛))))) = seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))))))
28 fveq2 6768 . . . 4 (𝑎 = (𝑚 + 1) → (!‘𝑎) = (!‘(𝑚 + 1)))
2927, 28breq12d 5091 . . 3 (𝑎 = (𝑚 + 1) → (seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛))))) ⇝ (!‘𝑎) ↔ seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))))) ⇝ (!‘(𝑚 + 1))))
30 oveq2 7276 . . . . . . 7 (𝑎 = 𝐴 → ((1 + (1 / 𝑛))↑𝑎) = ((1 + (1 / 𝑛))↑𝐴))
31 oveq1 7275 . . . . . . . 8 (𝑎 = 𝐴 → (𝑎 / 𝑛) = (𝐴 / 𝑛))
3231oveq2d 7284 . . . . . . 7 (𝑎 = 𝐴 → (1 + (𝑎 / 𝑛)) = (1 + (𝐴 / 𝑛)))
3330, 32oveq12d 7286 . . . . . 6 (𝑎 = 𝐴 → (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛))) = (((1 + (1 / 𝑛))↑𝐴) / (1 + (𝐴 / 𝑛))))
3433mpteq2dv 5180 . . . . 5 (𝑎 = 𝐴 → (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛)))) = (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝐴) / (1 + (𝐴 / 𝑛)))))
3534seqeq3d 13710 . . . 4 (𝑎 = 𝐴 → seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛))))) = seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝐴) / (1 + (𝐴 / 𝑛))))))
36 fveq2 6768 . . . 4 (𝑎 = 𝐴 → (!‘𝑎) = (!‘𝐴))
3735, 36breq12d 5091 . . 3 (𝑎 = 𝐴 → (seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑎) / (1 + (𝑎 / 𝑛))))) ⇝ (!‘𝑎) ↔ seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝐴) / (1 + (𝐴 / 𝑛))))) ⇝ (!‘𝐴)))
38 1red 10960 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → 1 ∈ ℝ)
39 nnrecre 11998 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → (1 / 𝑛) ∈ ℝ)
4038, 39readdcld 10988 . . . . . . . . . . 11 (𝑛 ∈ ℕ → (1 + (1 / 𝑛)) ∈ ℝ)
4140recnd 10987 . . . . . . . . . 10 (𝑛 ∈ ℕ → (1 + (1 / 𝑛)) ∈ ℂ)
4241exp0d 13839 . . . . . . . . 9 (𝑛 ∈ ℕ → ((1 + (1 / 𝑛))↑0) = 1)
43 nncn 11964 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
44 nnne0 11990 . . . . . . . . . . . 12 (𝑛 ∈ ℕ → 𝑛 ≠ 0)
4543, 44div0d 11733 . . . . . . . . . . 11 (𝑛 ∈ ℕ → (0 / 𝑛) = 0)
4645oveq2d 7284 . . . . . . . . . 10 (𝑛 ∈ ℕ → (1 + (0 / 𝑛)) = (1 + 0))
47 1p0e1 12080 . . . . . . . . . 10 (1 + 0) = 1
4846, 47eqtrdi 2795 . . . . . . . . 9 (𝑛 ∈ ℕ → (1 + (0 / 𝑛)) = 1)
4942, 48oveq12d 7286 . . . . . . . 8 (𝑛 ∈ ℕ → (((1 + (1 / 𝑛))↑0) / (1 + (0 / 𝑛))) = (1 / 1))
50 1div1e1 11648 . . . . . . . 8 (1 / 1) = 1
5149, 50eqtrdi 2795 . . . . . . 7 (𝑛 ∈ ℕ → (((1 + (1 / 𝑛))↑0) / (1 + (0 / 𝑛))) = 1)
5251mpteq2ia 5181 . . . . . 6 (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑0) / (1 + (0 / 𝑛)))) = (𝑛 ∈ ℕ ↦ 1)
53 fconstmpt 5648 . . . . . 6 (ℕ × {1}) = (𝑛 ∈ ℕ ↦ 1)
5452, 53eqtr4i 2770 . . . . 5 (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑0) / (1 + (0 / 𝑛)))) = (ℕ × {1})
55 seqeq3 13707 . . . . 5 ((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑0) / (1 + (0 / 𝑛)))) = (ℕ × {1}) → seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑0) / (1 + (0 / 𝑛))))) = seq1( · , (ℕ × {1})))
5654, 55ax-mp 5 . . . 4 seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑0) / (1 + (0 / 𝑛))))) = seq1( · , (ℕ × {1}))
57 nnuz 12603 . . . . . 6 ℕ = (ℤ‘1)
58 1zzd 12334 . . . . . 6 (⊤ → 1 ∈ ℤ)
5957, 58climprod1 15656 . . . . 5 (⊤ → seq1( · , (ℕ × {1})) ⇝ 1)
6059mptru 1548 . . . 4 seq1( · , (ℕ × {1})) ⇝ 1
6156, 60eqbrtri 5099 . . 3 seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑0) / (1 + (0 / 𝑛))))) ⇝ 1
62 1zzd 12334 . . . . . 6 ((𝑚 ∈ ℕ0 ∧ seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))) ⇝ (!‘𝑚)) → 1 ∈ ℤ)
63 simpr 484 . . . . . 6 ((𝑚 ∈ ℕ0 ∧ seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))) ⇝ (!‘𝑚)) → seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))) ⇝ (!‘𝑚))
64 seqex 13704 . . . . . . 7 seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))))) ∈ V
6564a1i 11 . . . . . 6 ((𝑚 ∈ ℕ0 ∧ seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))) ⇝ (!‘𝑚)) → seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))))) ∈ V)
66 faclimlem2 33689 . . . . . . 7 (𝑚 ∈ ℕ0 → seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))))) ⇝ (𝑚 + 1))
6766adantr 480 . . . . . 6 ((𝑚 ∈ ℕ0 ∧ seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))) ⇝ (!‘𝑚)) → seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))))) ⇝ (𝑚 + 1))
68 elnnuz 12604 . . . . . . . . . 10 (𝑎 ∈ ℕ ↔ 𝑎 ∈ (ℤ‘1))
6968biimpi 215 . . . . . . . . 9 (𝑎 ∈ ℕ → 𝑎 ∈ (ℤ‘1))
7069adantl 481 . . . . . . . 8 ((𝑚 ∈ ℕ0𝑎 ∈ ℕ) → 𝑎 ∈ (ℤ‘1))
71 1rp 12716 . . . . . . . . . . . . . . . 16 1 ∈ ℝ+
7271a1i 11 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → 1 ∈ ℝ+)
73 nnrp 12723 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → 𝑛 ∈ ℝ+)
7473rpreccld 12764 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → (1 / 𝑛) ∈ ℝ+)
7574adantl 481 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → (1 / 𝑛) ∈ ℝ+)
7672, 75rpaddcld 12769 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → (1 + (1 / 𝑛)) ∈ ℝ+)
77 nn0z 12326 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℕ0𝑚 ∈ ℤ)
7877adantr 480 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → 𝑚 ∈ ℤ)
7976, 78rpexpcld 13943 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → ((1 + (1 / 𝑛))↑𝑚) ∈ ℝ+)
80 1cnd 10954 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → 1 ∈ ℂ)
81 nn0nndivcl 12287 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → (𝑚 / 𝑛) ∈ ℝ)
8281recnd 10987 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → (𝑚 / 𝑛) ∈ ℂ)
8380, 82addcomd 11160 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → (1 + (𝑚 / 𝑛)) = ((𝑚 / 𝑛) + 1))
84 nn0ge0div 12372 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → 0 ≤ (𝑚 / 𝑛))
8581, 84ge0p1rpd 12784 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → ((𝑚 / 𝑛) + 1) ∈ ℝ+)
8683, 85eqeltrd 2840 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → (1 + (𝑚 / 𝑛)) ∈ ℝ+)
8779, 86rpdivcld 12771 . . . . . . . . . . . 12 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))) ∈ ℝ+)
8887rpcnd 12756 . . . . . . . . . . 11 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))) ∈ ℂ)
8988fmpttd 6983 . . . . . . . . . 10 (𝑚 ∈ ℕ0 → (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛)))):ℕ⟶ℂ)
90 elfznn 13267 . . . . . . . . . 10 (𝑏 ∈ (1...𝑎) → 𝑏 ∈ ℕ)
91 ffvelrn 6953 . . . . . . . . . 10 (((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛)))):ℕ⟶ℂ ∧ 𝑏 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))‘𝑏) ∈ ℂ)
9289, 90, 91syl2an 595 . . . . . . . . 9 ((𝑚 ∈ ℕ0𝑏 ∈ (1...𝑎)) → ((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))‘𝑏) ∈ ℂ)
9392adantlr 711 . . . . . . . 8 (((𝑚 ∈ ℕ0𝑎 ∈ ℕ) ∧ 𝑏 ∈ (1...𝑎)) → ((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))‘𝑏) ∈ ℂ)
94 mulcl 10939 . . . . . . . . 9 ((𝑏 ∈ ℂ ∧ 𝑥 ∈ ℂ) → (𝑏 · 𝑥) ∈ ℂ)
9594adantl 481 . . . . . . . 8 (((𝑚 ∈ ℕ0𝑎 ∈ ℕ) ∧ (𝑏 ∈ ℂ ∧ 𝑥 ∈ ℂ)) → (𝑏 · 𝑥) ∈ ℂ)
9670, 93, 95seqcl 13724 . . . . . . 7 ((𝑚 ∈ ℕ0𝑎 ∈ ℕ) → (seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛)))))‘𝑎) ∈ ℂ)
9796adantlr 711 . . . . . 6 (((𝑚 ∈ ℕ0 ∧ seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))) ⇝ (!‘𝑚)) ∧ 𝑎 ∈ ℕ) → (seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛)))))‘𝑎) ∈ ℂ)
9886, 76rpmulcld 12770 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → ((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) ∈ ℝ+)
99 nn0p1nn 12255 . . . . . . . . . . . . . . . 16 (𝑚 ∈ ℕ0 → (𝑚 + 1) ∈ ℕ)
10099nnrpd 12752 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℕ0 → (𝑚 + 1) ∈ ℝ+)
101 rpdivcl 12737 . . . . . . . . . . . . . . 15 (((𝑚 + 1) ∈ ℝ+𝑛 ∈ ℝ+) → ((𝑚 + 1) / 𝑛) ∈ ℝ+)
102100, 73, 101syl2an 595 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → ((𝑚 + 1) / 𝑛) ∈ ℝ+)
10372, 102rpaddcld 12769 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → (1 + ((𝑚 + 1) / 𝑛)) ∈ ℝ+)
10498, 103rpdivcld 12771 . . . . . . . . . . . 12 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))) ∈ ℝ+)
105104rpcnd 12756 . . . . . . . . . . 11 ((𝑚 ∈ ℕ0𝑛 ∈ ℕ) → (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))) ∈ ℂ)
106105fmpttd 6983 . . . . . . . . . 10 (𝑚 ∈ ℕ0 → (𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛)))):ℕ⟶ℂ)
107 ffvelrn 6953 . . . . . . . . . 10 (((𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛)))):ℕ⟶ℂ ∧ 𝑏 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))))‘𝑏) ∈ ℂ)
108106, 90, 107syl2an 595 . . . . . . . . 9 ((𝑚 ∈ ℕ0𝑏 ∈ (1...𝑎)) → ((𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))))‘𝑏) ∈ ℂ)
109108adantlr 711 . . . . . . . 8 (((𝑚 ∈ ℕ0𝑎 ∈ ℕ) ∧ 𝑏 ∈ (1...𝑎)) → ((𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))))‘𝑏) ∈ ℂ)
11070, 109, 95seqcl 13724 . . . . . . 7 ((𝑚 ∈ ℕ0𝑎 ∈ ℕ) → (seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛)))))‘𝑎) ∈ ℂ)
111110adantlr 711 . . . . . 6 (((𝑚 ∈ ℕ0 ∧ seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))) ⇝ (!‘𝑚)) ∧ 𝑎 ∈ ℕ) → (seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛)))))‘𝑎) ∈ ℂ)
112 faclimlem3 33690 . . . . . . . . . . 11 ((𝑚 ∈ ℕ0𝑏 ∈ ℕ) → (((1 + (1 / 𝑏))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑏))) = ((((1 + (1 / 𝑏))↑𝑚) / (1 + (𝑚 / 𝑏))) · (((1 + (𝑚 / 𝑏)) · (1 + (1 / 𝑏))) / (1 + ((𝑚 + 1) / 𝑏)))))
113 oveq2 7276 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑏 → (1 / 𝑛) = (1 / 𝑏))
114113oveq2d 7284 . . . . . . . . . . . . . . 15 (𝑛 = 𝑏 → (1 + (1 / 𝑛)) = (1 + (1 / 𝑏)))
115114oveq1d 7283 . . . . . . . . . . . . . 14 (𝑛 = 𝑏 → ((1 + (1 / 𝑛))↑(𝑚 + 1)) = ((1 + (1 / 𝑏))↑(𝑚 + 1)))
116 oveq2 7276 . . . . . . . . . . . . . . 15 (𝑛 = 𝑏 → ((𝑚 + 1) / 𝑛) = ((𝑚 + 1) / 𝑏))
117116oveq2d 7284 . . . . . . . . . . . . . 14 (𝑛 = 𝑏 → (1 + ((𝑚 + 1) / 𝑛)) = (1 + ((𝑚 + 1) / 𝑏)))
118115, 117oveq12d 7286 . . . . . . . . . . . . 13 (𝑛 = 𝑏 → (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))) = (((1 + (1 / 𝑏))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑏))))
119 eqid 2739 . . . . . . . . . . . . 13 (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛)))) = (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))))
120 ovex 7301 . . . . . . . . . . . . 13 (((1 + (1 / 𝑏))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑏))) ∈ V
121118, 119, 120fvmpt 6869 . . . . . . . . . . . 12 (𝑏 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))))‘𝑏) = (((1 + (1 / 𝑏))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑏))))
122121adantl 481 . . . . . . . . . . 11 ((𝑚 ∈ ℕ0𝑏 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))))‘𝑏) = (((1 + (1 / 𝑏))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑏))))
123114oveq1d 7283 . . . . . . . . . . . . . . 15 (𝑛 = 𝑏 → ((1 + (1 / 𝑛))↑𝑚) = ((1 + (1 / 𝑏))↑𝑚))
124 oveq2 7276 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑏 → (𝑚 / 𝑛) = (𝑚 / 𝑏))
125124oveq2d 7284 . . . . . . . . . . . . . . 15 (𝑛 = 𝑏 → (1 + (𝑚 / 𝑛)) = (1 + (𝑚 / 𝑏)))
126123, 125oveq12d 7286 . . . . . . . . . . . . . 14 (𝑛 = 𝑏 → (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))) = (((1 + (1 / 𝑏))↑𝑚) / (1 + (𝑚 / 𝑏))))
127 eqid 2739 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛)))) = (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))
128 ovex 7301 . . . . . . . . . . . . . 14 (((1 + (1 / 𝑏))↑𝑚) / (1 + (𝑚 / 𝑏))) ∈ V
129126, 127, 128fvmpt 6869 . . . . . . . . . . . . 13 (𝑏 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))‘𝑏) = (((1 + (1 / 𝑏))↑𝑚) / (1 + (𝑚 / 𝑏))))
130125, 114oveq12d 7286 . . . . . . . . . . . . . . 15 (𝑛 = 𝑏 → ((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) = ((1 + (𝑚 / 𝑏)) · (1 + (1 / 𝑏))))
131130, 117oveq12d 7286 . . . . . . . . . . . . . 14 (𝑛 = 𝑏 → (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))) = (((1 + (𝑚 / 𝑏)) · (1 + (1 / 𝑏))) / (1 + ((𝑚 + 1) / 𝑏))))
132 eqid 2739 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛)))) = (𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))))
133 ovex 7301 . . . . . . . . . . . . . 14 (((1 + (𝑚 / 𝑏)) · (1 + (1 / 𝑏))) / (1 + ((𝑚 + 1) / 𝑏))) ∈ V
134131, 132, 133fvmpt 6869 . . . . . . . . . . . . 13 (𝑏 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))))‘𝑏) = (((1 + (𝑚 / 𝑏)) · (1 + (1 / 𝑏))) / (1 + ((𝑚 + 1) / 𝑏))))
135129, 134oveq12d 7286 . . . . . . . . . . . 12 (𝑏 ∈ ℕ → (((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))‘𝑏) · ((𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))))‘𝑏)) = ((((1 + (1 / 𝑏))↑𝑚) / (1 + (𝑚 / 𝑏))) · (((1 + (𝑚 / 𝑏)) · (1 + (1 / 𝑏))) / (1 + ((𝑚 + 1) / 𝑏)))))
136135adantl 481 . . . . . . . . . . 11 ((𝑚 ∈ ℕ0𝑏 ∈ ℕ) → (((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))‘𝑏) · ((𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))))‘𝑏)) = ((((1 + (1 / 𝑏))↑𝑚) / (1 + (𝑚 / 𝑏))) · (((1 + (𝑚 / 𝑏)) · (1 + (1 / 𝑏))) / (1 + ((𝑚 + 1) / 𝑏)))))
137112, 122, 1363eqtr4d 2789 . . . . . . . . . 10 ((𝑚 ∈ ℕ0𝑏 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))))‘𝑏) = (((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))‘𝑏) · ((𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))))‘𝑏)))
13890, 137sylan2 592 . . . . . . . . 9 ((𝑚 ∈ ℕ0𝑏 ∈ (1...𝑎)) → ((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))))‘𝑏) = (((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))‘𝑏) · ((𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))))‘𝑏)))
139138adantlr 711 . . . . . . . 8 (((𝑚 ∈ ℕ0𝑎 ∈ ℕ) ∧ 𝑏 ∈ (1...𝑎)) → ((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))))‘𝑏) = (((𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))‘𝑏) · ((𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛))))‘𝑏)))
14070, 93, 109, 139prodfmul 15583 . . . . . . 7 ((𝑚 ∈ ℕ0𝑎 ∈ ℕ) → (seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛)))))‘𝑎) = ((seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛)))))‘𝑎) · (seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛)))))‘𝑎)))
141140adantlr 711 . . . . . 6 (((𝑚 ∈ ℕ0 ∧ seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))) ⇝ (!‘𝑚)) ∧ 𝑎 ∈ ℕ) → (seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛)))))‘𝑎) = ((seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛)))))‘𝑎) · (seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (𝑚 / 𝑛)) · (1 + (1 / 𝑛))) / (1 + ((𝑚 + 1) / 𝑛)))))‘𝑎)))
14257, 62, 63, 65, 67, 97, 111, 141climmul 15323 . . . . 5 ((𝑚 ∈ ℕ0 ∧ seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))) ⇝ (!‘𝑚)) → seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))))) ⇝ ((!‘𝑚) · (𝑚 + 1)))
143 facp1 13973 . . . . . 6 (𝑚 ∈ ℕ0 → (!‘(𝑚 + 1)) = ((!‘𝑚) · (𝑚 + 1)))
144143adantr 480 . . . . 5 ((𝑚 ∈ ℕ0 ∧ seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))) ⇝ (!‘𝑚)) → (!‘(𝑚 + 1)) = ((!‘𝑚) · (𝑚 + 1)))
145142, 144breqtrrd 5106 . . . 4 ((𝑚 ∈ ℕ0 ∧ seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))) ⇝ (!‘𝑚)) → seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))))) ⇝ (!‘(𝑚 + 1)))
146145ex 412 . . 3 (𝑚 ∈ ℕ0 → (seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝑚) / (1 + (𝑚 / 𝑛))))) ⇝ (!‘𝑚) → seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑(𝑚 + 1)) / (1 + ((𝑚 + 1) / 𝑛))))) ⇝ (!‘(𝑚 + 1))))
14713, 21, 29, 37, 61, 146nn0ind 12398 . 2 (𝐴 ∈ ℕ0 → seq1( · , (𝑛 ∈ ℕ ↦ (((1 + (1 / 𝑛))↑𝐴) / (1 + (𝐴 / 𝑛))))) ⇝ (!‘𝐴))
1483, 147eqbrtrid 5113 1 (𝐴 ∈ ℕ0 → seq1( · , 𝐹) ⇝ (!‘𝐴))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1541  wtru 1542  wcel 2109  Vcvv 3430  {csn 4566   class class class wbr 5078  cmpt 5161   × cxp 5586  wf 6426  cfv 6430  (class class class)co 7268  cc 10853  0cc0 10855  1c1 10856   + caddc 10858   · cmul 10860   / cdiv 11615  cn 11956  0cn0 12216  cz 12302  cuz 12564  +crp 12712  ...cfz 13221  seqcseq 13702  cexp 13763  !cfa 13968  cli 15174
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1801  ax-4 1815  ax-5 1916  ax-6 1974  ax-7 2014  ax-8 2111  ax-9 2119  ax-10 2140  ax-11 2157  ax-12 2174  ax-ext 2710  ax-rep 5213  ax-sep 5226  ax-nul 5233  ax-pow 5291  ax-pr 5355  ax-un 7579  ax-inf2 9360  ax-cnex 10911  ax-resscn 10912  ax-1cn 10913  ax-icn 10914  ax-addcl 10915  ax-addrcl 10916  ax-mulcl 10917  ax-mulrcl 10918  ax-mulcom 10919  ax-addass 10920  ax-mulass 10921  ax-distr 10922  ax-i2m1 10923  ax-1ne0 10924  ax-1rid 10925  ax-rnegex 10926  ax-rrecex 10927  ax-cnre 10928  ax-pre-lttri 10929  ax-pre-lttrn 10930  ax-pre-ltadd 10931  ax-pre-mulgt0 10932  ax-pre-sup 10933
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1544  df-fal 1554  df-ex 1786  df-nf 1790  df-sb 2071  df-mo 2541  df-eu 2570  df-clab 2717  df-cleq 2731  df-clel 2817  df-nfc 2890  df-ne 2945  df-nel 3051  df-ral 3070  df-rex 3071  df-reu 3072  df-rmo 3073  df-rab 3074  df-v 3432  df-sbc 3720  df-csb 3837  df-dif 3894  df-un 3896  df-in 3898  df-ss 3908  df-pss 3910  df-nul 4262  df-if 4465  df-pw 4540  df-sn 4567  df-pr 4569  df-tp 4571  df-op 4573  df-uni 4845  df-iun 4931  df-br 5079  df-opab 5141  df-mpt 5162  df-tr 5196  df-id 5488  df-eprel 5494  df-po 5502  df-so 5503  df-fr 5543  df-we 5545  df-xp 5594  df-rel 5595  df-cnv 5596  df-co 5597  df-dm 5598  df-rn 5599  df-res 5600  df-ima 5601  df-pred 6199  df-ord 6266  df-on 6267  df-lim 6268  df-suc 6269  df-iota 6388  df-fun 6432  df-fn 6433  df-f 6434  df-f1 6435  df-fo 6436  df-f1o 6437  df-fv 6438  df-riota 7225  df-ov 7271  df-oprab 7272  df-mpo 7273  df-om 7701  df-1st 7817  df-2nd 7818  df-frecs 8081  df-wrecs 8112  df-recs 8186  df-rdg 8225  df-er 8472  df-pm 8592  df-en 8708  df-dom 8709  df-sdom 8710  df-sup 9162  df-inf 9163  df-pnf 10995  df-mnf 10996  df-xr 10997  df-ltxr 10998  df-le 10999  df-sub 11190  df-neg 11191  df-div 11616  df-nn 11957  df-2 12019  df-3 12020  df-n0 12217  df-z 12303  df-uz 12565  df-rp 12713  df-fz 13222  df-fzo 13365  df-fl 13493  df-seq 13703  df-exp 13764  df-fac 13969  df-shft 14759  df-cj 14791  df-re 14792  df-im 14793  df-sqrt 14927  df-abs 14928  df-clim 15178  df-rlim 15179
This theorem is referenced by:  iprodfac  33692
  Copyright terms: Public domain W3C validator