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

Theorem stoweidlem3 38896
Description: Lemma for stoweid 38956: if 𝐴 is positive and all 𝑀 terms of a finite product are larger than 𝐴, then the finite product is larger than A^M. (Contributed by Glauco Siliprandi, 20-Apr-2017.)
Hypotheses
Ref Expression
stoweidlem3.1 𝑖𝐹
stoweidlem3.2 𝑖𝜑
stoweidlem3.3 𝑋 = seq1( · , 𝐹)
stoweidlem3.4 (𝜑𝑀 ∈ ℕ)
stoweidlem3.5 (𝜑𝐹:(1...𝑀)⟶ℝ)
stoweidlem3.6 ((𝜑𝑖 ∈ (1...𝑀)) → 𝐴 < (𝐹𝑖))
stoweidlem3.7 (𝜑𝐴 ∈ ℝ+)
Assertion
Ref Expression
stoweidlem3 (𝜑 → (𝐴𝑀) < (𝑋𝑀))
Distinct variable groups:   𝐴,𝑖   𝑖,𝑀
Allowed substitution hints:   𝜑(𝑖)   𝐹(𝑖)   𝑋(𝑖)

Proof of Theorem stoweidlem3
Dummy variables 𝑎 𝑚 𝑗 𝑛 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 stoweidlem3.4 . . . 4 (𝜑𝑀 ∈ ℕ)
2 elnnuz 11600 . . . 4 (𝑀 ∈ ℕ ↔ 𝑀 ∈ (ℤ‘1))
31, 2sylib 207 . . 3 (𝜑𝑀 ∈ (ℤ‘1))
4 eluzfz2 12220 . . 3 (𝑀 ∈ (ℤ‘1) → 𝑀 ∈ (1...𝑀))
53, 4syl 17 . 2 (𝜑𝑀 ∈ (1...𝑀))
6 oveq2 6557 . . . . 5 (𝑛 = 1 → (𝐴𝑛) = (𝐴↑1))
7 fveq2 6103 . . . . 5 (𝑛 = 1 → (𝑋𝑛) = (𝑋‘1))
86, 7breq12d 4596 . . . 4 (𝑛 = 1 → ((𝐴𝑛) < (𝑋𝑛) ↔ (𝐴↑1) < (𝑋‘1)))
98imbi2d 329 . . 3 (𝑛 = 1 → ((𝜑 → (𝐴𝑛) < (𝑋𝑛)) ↔ (𝜑 → (𝐴↑1) < (𝑋‘1))))
10 oveq2 6557 . . . . 5 (𝑛 = 𝑚 → (𝐴𝑛) = (𝐴𝑚))
11 fveq2 6103 . . . . 5 (𝑛 = 𝑚 → (𝑋𝑛) = (𝑋𝑚))
1210, 11breq12d 4596 . . . 4 (𝑛 = 𝑚 → ((𝐴𝑛) < (𝑋𝑛) ↔ (𝐴𝑚) < (𝑋𝑚)))
1312imbi2d 329 . . 3 (𝑛 = 𝑚 → ((𝜑 → (𝐴𝑛) < (𝑋𝑛)) ↔ (𝜑 → (𝐴𝑚) < (𝑋𝑚))))
14 oveq2 6557 . . . . 5 (𝑛 = (𝑚 + 1) → (𝐴𝑛) = (𝐴↑(𝑚 + 1)))
15 fveq2 6103 . . . . 5 (𝑛 = (𝑚 + 1) → (𝑋𝑛) = (𝑋‘(𝑚 + 1)))
1614, 15breq12d 4596 . . . 4 (𝑛 = (𝑚 + 1) → ((𝐴𝑛) < (𝑋𝑛) ↔ (𝐴↑(𝑚 + 1)) < (𝑋‘(𝑚 + 1))))
1716imbi2d 329 . . 3 (𝑛 = (𝑚 + 1) → ((𝜑 → (𝐴𝑛) < (𝑋𝑛)) ↔ (𝜑 → (𝐴↑(𝑚 + 1)) < (𝑋‘(𝑚 + 1)))))
18 oveq2 6557 . . . . 5 (𝑛 = 𝑀 → (𝐴𝑛) = (𝐴𝑀))
19 fveq2 6103 . . . . 5 (𝑛 = 𝑀 → (𝑋𝑛) = (𝑋𝑀))
2018, 19breq12d 4596 . . . 4 (𝑛 = 𝑀 → ((𝐴𝑛) < (𝑋𝑛) ↔ (𝐴𝑀) < (𝑋𝑀)))
2120imbi2d 329 . . 3 (𝑛 = 𝑀 → ((𝜑 → (𝐴𝑛) < (𝑋𝑛)) ↔ (𝜑 → (𝐴𝑀) < (𝑋𝑀))))
22 1zzd 11285 . . . . . . . . 9 (𝜑 → 1 ∈ ℤ)
231nnzd 11357 . . . . . . . . 9 (𝜑𝑀 ∈ ℤ)
2422, 23, 223jca 1235 . . . . . . . 8 (𝜑 → (1 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 1 ∈ ℤ))
25 1le1 10534 . . . . . . . . 9 1 ≤ 1
2625a1i 11 . . . . . . . 8 (𝜑 → 1 ≤ 1)
271nnge1d 10940 . . . . . . . 8 (𝜑 → 1 ≤ 𝑀)
2824, 26, 27jca32 556 . . . . . . 7 (𝜑 → ((1 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 1 ∈ ℤ) ∧ (1 ≤ 1 ∧ 1 ≤ 𝑀)))
29 elfz2 12204 . . . . . . 7 (1 ∈ (1...𝑀) ↔ ((1 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 1 ∈ ℤ) ∧ (1 ≤ 1 ∧ 1 ≤ 𝑀)))
3028, 29sylibr 223 . . . . . 6 (𝜑 → 1 ∈ (1...𝑀))
3130ancli 572 . . . . . 6 (𝜑 → (𝜑 ∧ 1 ∈ (1...𝑀)))
32 stoweidlem3.2 . . . . . . . . 9 𝑖𝜑
33 nfv 1830 . . . . . . . . 9 𝑖1 ∈ (1...𝑀)
3432, 33nfan 1816 . . . . . . . 8 𝑖(𝜑 ∧ 1 ∈ (1...𝑀))
35 nfcv 2751 . . . . . . . . 9 𝑖𝐴
36 nfcv 2751 . . . . . . . . 9 𝑖 <
37 stoweidlem3.1 . . . . . . . . . 10 𝑖𝐹
38 nfcv 2751 . . . . . . . . . 10 𝑖1
3937, 38nffv 6110 . . . . . . . . 9 𝑖(𝐹‘1)
4035, 36, 39nfbr 4629 . . . . . . . 8 𝑖 𝐴 < (𝐹‘1)
4134, 40nfim 1813 . . . . . . 7 𝑖((𝜑 ∧ 1 ∈ (1...𝑀)) → 𝐴 < (𝐹‘1))
42 eleq1 2676 . . . . . . . . 9 (𝑖 = 1 → (𝑖 ∈ (1...𝑀) ↔ 1 ∈ (1...𝑀)))
4342anbi2d 736 . . . . . . . 8 (𝑖 = 1 → ((𝜑𝑖 ∈ (1...𝑀)) ↔ (𝜑 ∧ 1 ∈ (1...𝑀))))
44 fveq2 6103 . . . . . . . . 9 (𝑖 = 1 → (𝐹𝑖) = (𝐹‘1))
4544breq2d 4595 . . . . . . . 8 (𝑖 = 1 → (𝐴 < (𝐹𝑖) ↔ 𝐴 < (𝐹‘1)))
4643, 45imbi12d 333 . . . . . . 7 (𝑖 = 1 → (((𝜑𝑖 ∈ (1...𝑀)) → 𝐴 < (𝐹𝑖)) ↔ ((𝜑 ∧ 1 ∈ (1...𝑀)) → 𝐴 < (𝐹‘1))))
47 stoweidlem3.6 . . . . . . 7 ((𝜑𝑖 ∈ (1...𝑀)) → 𝐴 < (𝐹𝑖))
4841, 46, 47vtoclg1f 3238 . . . . . 6 (1 ∈ (1...𝑀) → ((𝜑 ∧ 1 ∈ (1...𝑀)) → 𝐴 < (𝐹‘1)))
4930, 31, 48sylc 63 . . . . 5 (𝜑𝐴 < (𝐹‘1))
50 stoweidlem3.7 . . . . . . 7 (𝜑𝐴 ∈ ℝ+)
5150rpcnd 11750 . . . . . 6 (𝜑𝐴 ∈ ℂ)
5251exp1d 12865 . . . . 5 (𝜑 → (𝐴↑1) = 𝐴)
53 stoweidlem3.3 . . . . . . . 8 𝑋 = seq1( · , 𝐹)
5453fveq1i 6104 . . . . . . 7 (𝑋‘1) = (seq1( · , 𝐹)‘1)
55 1z 11284 . . . . . . . 8 1 ∈ ℤ
56 seq1 12676 . . . . . . . 8 (1 ∈ ℤ → (seq1( · , 𝐹)‘1) = (𝐹‘1))
5755, 56ax-mp 5 . . . . . . 7 (seq1( · , 𝐹)‘1) = (𝐹‘1)
5854, 57eqtri 2632 . . . . . 6 (𝑋‘1) = (𝐹‘1)
5958a1i 11 . . . . 5 (𝜑 → (𝑋‘1) = (𝐹‘1))
6049, 52, 593brtr4d 4615 . . . 4 (𝜑 → (𝐴↑1) < (𝑋‘1))
6160a1i 11 . . 3 (𝑀 ∈ (ℤ‘1) → (𝜑 → (𝐴↑1) < (𝑋‘1)))
62503ad2ant3 1077 . . . . . . . 8 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → 𝐴 ∈ ℝ+)
6362rpred 11748 . . . . . . 7 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → 𝐴 ∈ ℝ)
64 elfzouz 12343 . . . . . . . . 9 (𝑚 ∈ (1..^𝑀) → 𝑚 ∈ (ℤ‘1))
65 elnnuz 11600 . . . . . . . . . 10 (𝑚 ∈ ℕ ↔ 𝑚 ∈ (ℤ‘1))
66 nnnn0 11176 . . . . . . . . . 10 (𝑚 ∈ ℕ → 𝑚 ∈ ℕ0)
6765, 66sylbir 224 . . . . . . . . 9 (𝑚 ∈ (ℤ‘1) → 𝑚 ∈ ℕ0)
6864, 67syl 17 . . . . . . . 8 (𝑚 ∈ (1..^𝑀) → 𝑚 ∈ ℕ0)
69683ad2ant1 1075 . . . . . . 7 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → 𝑚 ∈ ℕ0)
7063, 69reexpcld 12887 . . . . . 6 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → (𝐴𝑚) ∈ ℝ)
7153fveq1i 6104 . . . . . . . 8 (𝑋𝑚) = (seq1( · , 𝐹)‘𝑚)
7264adantr 480 . . . . . . . . 9 ((𝑚 ∈ (1..^𝑀) ∧ 𝜑) → 𝑚 ∈ (ℤ‘1))
73 nfv 1830 . . . . . . . . . . . . 13 𝑖 𝑚 ∈ (1..^𝑀)
7473, 32nfan 1816 . . . . . . . . . . . 12 𝑖(𝑚 ∈ (1..^𝑀) ∧ 𝜑)
75 nfv 1830 . . . . . . . . . . . 12 𝑖 𝑎 ∈ (1...𝑚)
7674, 75nfan 1816 . . . . . . . . . . 11 𝑖((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑎 ∈ (1...𝑚))
77 nfcv 2751 . . . . . . . . . . . . 13 𝑖𝑎
7837, 77nffv 6110 . . . . . . . . . . . 12 𝑖(𝐹𝑎)
7978nfel1 2765 . . . . . . . . . . 11 𝑖(𝐹𝑎) ∈ ℝ
8076, 79nfim 1813 . . . . . . . . . 10 𝑖(((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑎 ∈ (1...𝑚)) → (𝐹𝑎) ∈ ℝ)
81 eleq1 2676 . . . . . . . . . . . 12 (𝑖 = 𝑎 → (𝑖 ∈ (1...𝑚) ↔ 𝑎 ∈ (1...𝑚)))
8281anbi2d 736 . . . . . . . . . . 11 (𝑖 = 𝑎 → (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) ↔ ((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑎 ∈ (1...𝑚))))
83 fveq2 6103 . . . . . . . . . . . 12 (𝑖 = 𝑎 → (𝐹𝑖) = (𝐹𝑎))
8483eleq1d 2672 . . . . . . . . . . 11 (𝑖 = 𝑎 → ((𝐹𝑖) ∈ ℝ ↔ (𝐹𝑎) ∈ ℝ))
8582, 84imbi12d 333 . . . . . . . . . 10 (𝑖 = 𝑎 → ((((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → (𝐹𝑖) ∈ ℝ) ↔ (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑎 ∈ (1...𝑚)) → (𝐹𝑎) ∈ ℝ)))
86 stoweidlem3.5 . . . . . . . . . . . 12 (𝜑𝐹:(1...𝑀)⟶ℝ)
8786ad2antlr 759 . . . . . . . . . . 11 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → 𝐹:(1...𝑀)⟶ℝ)
88 1zzd 11285 . . . . . . . . . . . . . 14 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → 1 ∈ ℤ)
8923ad2antlr 759 . . . . . . . . . . . . . 14 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → 𝑀 ∈ ℤ)
90 elfzelz 12213 . . . . . . . . . . . . . . 15 (𝑖 ∈ (1...𝑚) → 𝑖 ∈ ℤ)
9190adantl 481 . . . . . . . . . . . . . 14 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → 𝑖 ∈ ℤ)
9288, 89, 913jca 1235 . . . . . . . . . . . . 13 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → (1 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑖 ∈ ℤ))
93 elfzle1 12215 . . . . . . . . . . . . . 14 (𝑖 ∈ (1...𝑚) → 1 ≤ 𝑖)
9493adantl 481 . . . . . . . . . . . . 13 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → 1 ≤ 𝑖)
9590zred 11358 . . . . . . . . . . . . . . 15 (𝑖 ∈ (1...𝑚) → 𝑖 ∈ ℝ)
9695adantl 481 . . . . . . . . . . . . . 14 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → 𝑖 ∈ ℝ)
97 elfzoelz 12339 . . . . . . . . . . . . . . . 16 (𝑚 ∈ (1..^𝑀) → 𝑚 ∈ ℤ)
9897zred 11358 . . . . . . . . . . . . . . 15 (𝑚 ∈ (1..^𝑀) → 𝑚 ∈ ℝ)
9998ad2antrr 758 . . . . . . . . . . . . . 14 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → 𝑚 ∈ ℝ)
1001nnred 10912 . . . . . . . . . . . . . . 15 (𝜑𝑀 ∈ ℝ)
101100ad2antlr 759 . . . . . . . . . . . . . 14 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → 𝑀 ∈ ℝ)
102 elfzle2 12216 . . . . . . . . . . . . . . 15 (𝑖 ∈ (1...𝑚) → 𝑖𝑚)
103102adantl 481 . . . . . . . . . . . . . 14 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → 𝑖𝑚)
104 elfzoel2 12338 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ (1..^𝑀) → 𝑀 ∈ ℤ)
105104zred 11358 . . . . . . . . . . . . . . . 16 (𝑚 ∈ (1..^𝑀) → 𝑀 ∈ ℝ)
106 elfzolt2 12348 . . . . . . . . . . . . . . . 16 (𝑚 ∈ (1..^𝑀) → 𝑚 < 𝑀)
10798, 105, 106ltled 10064 . . . . . . . . . . . . . . 15 (𝑚 ∈ (1..^𝑀) → 𝑚𝑀)
108107ad2antrr 758 . . . . . . . . . . . . . 14 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → 𝑚𝑀)
10996, 99, 101, 103, 108letrd 10073 . . . . . . . . . . . . 13 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → 𝑖𝑀)
11092, 94, 109jca32 556 . . . . . . . . . . . 12 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → ((1 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖𝑖𝑀)))
111 elfz2 12204 . . . . . . . . . . . 12 (𝑖 ∈ (1...𝑀) ↔ ((1 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖𝑖𝑀)))
112110, 111sylibr 223 . . . . . . . . . . 11 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → 𝑖 ∈ (1...𝑀))
11387, 112ffvelrnd 6268 . . . . . . . . . 10 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑖 ∈ (1...𝑚)) → (𝐹𝑖) ∈ ℝ)
11480, 85, 113chvar 2250 . . . . . . . . 9 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ 𝑎 ∈ (1...𝑚)) → (𝐹𝑎) ∈ ℝ)
115 remulcl 9900 . . . . . . . . . 10 ((𝑎 ∈ ℝ ∧ 𝑗 ∈ ℝ) → (𝑎 · 𝑗) ∈ ℝ)
116115adantl 481 . . . . . . . . 9 (((𝑚 ∈ (1..^𝑀) ∧ 𝜑) ∧ (𝑎 ∈ ℝ ∧ 𝑗 ∈ ℝ)) → (𝑎 · 𝑗) ∈ ℝ)
11772, 114, 116seqcl 12683 . . . . . . . 8 ((𝑚 ∈ (1..^𝑀) ∧ 𝜑) → (seq1( · , 𝐹)‘𝑚) ∈ ℝ)
11871, 117syl5eqel 2692 . . . . . . 7 ((𝑚 ∈ (1..^𝑀) ∧ 𝜑) → (𝑋𝑚) ∈ ℝ)
1191183adant2 1073 . . . . . 6 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → (𝑋𝑚) ∈ ℝ)
120863ad2ant3 1077 . . . . . . 7 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → 𝐹:(1...𝑀)⟶ℝ)
121 fzofzp1 12431 . . . . . . . 8 (𝑚 ∈ (1..^𝑀) → (𝑚 + 1) ∈ (1...𝑀))
1221213ad2ant1 1075 . . . . . . 7 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → (𝑚 + 1) ∈ (1...𝑀))
123120, 122ffvelrnd 6268 . . . . . 6 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → (𝐹‘(𝑚 + 1)) ∈ ℝ)
12450rpge0d 11752 . . . . . . . 8 (𝜑 → 0 ≤ 𝐴)
1251243ad2ant3 1077 . . . . . . 7 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → 0 ≤ 𝐴)
12663, 69, 125expge0d 12888 . . . . . 6 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → 0 ≤ (𝐴𝑚))
127 simp3 1056 . . . . . . 7 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → 𝜑)
128 simp2 1055 . . . . . . 7 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → (𝜑 → (𝐴𝑚) < (𝑋𝑚)))
129127, 128mpd 15 . . . . . 6 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → (𝐴𝑚) < (𝑋𝑚))
130121adantr 480 . . . . . . . 8 ((𝑚 ∈ (1..^𝑀) ∧ 𝜑) → (𝑚 + 1) ∈ (1...𝑀))
131 simpr 476 . . . . . . . . 9 ((𝑚 ∈ (1..^𝑀) ∧ 𝜑) → 𝜑)
132131, 130jca 553 . . . . . . . 8 ((𝑚 ∈ (1..^𝑀) ∧ 𝜑) → (𝜑 ∧ (𝑚 + 1) ∈ (1...𝑀)))
133 nfv 1830 . . . . . . . . . . 11 𝑖(𝑚 + 1) ∈ (1...𝑀)
13432, 133nfan 1816 . . . . . . . . . 10 𝑖(𝜑 ∧ (𝑚 + 1) ∈ (1...𝑀))
135 nfcv 2751 . . . . . . . . . . . 12 𝑖(𝑚 + 1)
13637, 135nffv 6110 . . . . . . . . . . 11 𝑖(𝐹‘(𝑚 + 1))
13735, 36, 136nfbr 4629 . . . . . . . . . 10 𝑖 𝐴 < (𝐹‘(𝑚 + 1))
138134, 137nfim 1813 . . . . . . . . 9 𝑖((𝜑 ∧ (𝑚 + 1) ∈ (1...𝑀)) → 𝐴 < (𝐹‘(𝑚 + 1)))
139 eleq1 2676 . . . . . . . . . . 11 (𝑖 = (𝑚 + 1) → (𝑖 ∈ (1...𝑀) ↔ (𝑚 + 1) ∈ (1...𝑀)))
140139anbi2d 736 . . . . . . . . . 10 (𝑖 = (𝑚 + 1) → ((𝜑𝑖 ∈ (1...𝑀)) ↔ (𝜑 ∧ (𝑚 + 1) ∈ (1...𝑀))))
141 fveq2 6103 . . . . . . . . . . 11 (𝑖 = (𝑚 + 1) → (𝐹𝑖) = (𝐹‘(𝑚 + 1)))
142141breq2d 4595 . . . . . . . . . 10 (𝑖 = (𝑚 + 1) → (𝐴 < (𝐹𝑖) ↔ 𝐴 < (𝐹‘(𝑚 + 1))))
143140, 142imbi12d 333 . . . . . . . . 9 (𝑖 = (𝑚 + 1) → (((𝜑𝑖 ∈ (1...𝑀)) → 𝐴 < (𝐹𝑖)) ↔ ((𝜑 ∧ (𝑚 + 1) ∈ (1...𝑀)) → 𝐴 < (𝐹‘(𝑚 + 1)))))
144138, 143, 47vtoclg1f 3238 . . . . . . . 8 ((𝑚 + 1) ∈ (1...𝑀) → ((𝜑 ∧ (𝑚 + 1) ∈ (1...𝑀)) → 𝐴 < (𝐹‘(𝑚 + 1))))
145130, 132, 144sylc 63 . . . . . . 7 ((𝑚 ∈ (1..^𝑀) ∧ 𝜑) → 𝐴 < (𝐹‘(𝑚 + 1)))
1461453adant2 1073 . . . . . 6 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → 𝐴 < (𝐹‘(𝑚 + 1)))
14770, 119, 63, 123, 126, 129, 125, 146ltmul12ad 10844 . . . . 5 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → ((𝐴𝑚) · 𝐴) < ((𝑋𝑚) · (𝐹‘(𝑚 + 1))))
148513ad2ant3 1077 . . . . . 6 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → 𝐴 ∈ ℂ)
149148, 69expp1d 12871 . . . . 5 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → (𝐴↑(𝑚 + 1)) = ((𝐴𝑚) · 𝐴))
15053fveq1i 6104 . . . . . . 7 (𝑋‘(𝑚 + 1)) = (seq1( · , 𝐹)‘(𝑚 + 1))
151150a1i 11 . . . . . 6 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → (𝑋‘(𝑚 + 1)) = (seq1( · , 𝐹)‘(𝑚 + 1)))
152643ad2ant1 1075 . . . . . . 7 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → 𝑚 ∈ (ℤ‘1))
153 seqp1 12678 . . . . . . 7 (𝑚 ∈ (ℤ‘1) → (seq1( · , 𝐹)‘(𝑚 + 1)) = ((seq1( · , 𝐹)‘𝑚) · (𝐹‘(𝑚 + 1))))
154152, 153syl 17 . . . . . 6 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → (seq1( · , 𝐹)‘(𝑚 + 1)) = ((seq1( · , 𝐹)‘𝑚) · (𝐹‘(𝑚 + 1))))
15571a1i 11 . . . . . . . 8 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → (𝑋𝑚) = (seq1( · , 𝐹)‘𝑚))
156155eqcomd 2616 . . . . . . 7 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → (seq1( · , 𝐹)‘𝑚) = (𝑋𝑚))
157156oveq1d 6564 . . . . . 6 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → ((seq1( · , 𝐹)‘𝑚) · (𝐹‘(𝑚 + 1))) = ((𝑋𝑚) · (𝐹‘(𝑚 + 1))))
158151, 154, 1573eqtrd 2648 . . . . 5 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → (𝑋‘(𝑚 + 1)) = ((𝑋𝑚) · (𝐹‘(𝑚 + 1))))
159147, 149, 1583brtr4d 4615 . . . 4 ((𝑚 ∈ (1..^𝑀) ∧ (𝜑 → (𝐴𝑚) < (𝑋𝑚)) ∧ 𝜑) → (𝐴↑(𝑚 + 1)) < (𝑋‘(𝑚 + 1)))
1601593exp 1256 . . 3 (𝑚 ∈ (1..^𝑀) → ((𝜑 → (𝐴𝑚) < (𝑋𝑚)) → (𝜑 → (𝐴↑(𝑚 + 1)) < (𝑋‘(𝑚 + 1)))))
1619, 13, 17, 21, 61, 160fzind2 12448 . 2 (𝑀 ∈ (1...𝑀) → (𝜑 → (𝐴𝑀) < (𝑋𝑀)))
1625, 161mpcom 37 1 (𝜑 → (𝐴𝑀) < (𝑋𝑀))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 383  w3a 1031   = wceq 1475  wnf 1699  wcel 1977  wnfc 2738   class class class wbr 4583  wf 5800  cfv 5804  (class class class)co 6549  cc 9813  cr 9814  0cc0 9815  1c1 9816   + caddc 9818   · cmul 9820   < clt 9953  cle 9954  cn 10897  0cn0 11169  cz 11254  cuz 11563  +crp 11708  ...cfz 12197  ..^cfzo 12334  seqcseq 12663  cexp 12722
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847  ax-cnex 9871  ax-resscn 9872  ax-1cn 9873  ax-icn 9874  ax-addcl 9875  ax-addrcl 9876  ax-mulcl 9877  ax-mulrcl 9878  ax-mulcom 9879  ax-addass 9880  ax-mulass 9881  ax-distr 9882  ax-i2m1 9883  ax-1ne0 9884  ax-1rid 9885  ax-rnegex 9886  ax-rrecex 9887  ax-cnre 9888  ax-pre-lttri 9889  ax-pre-lttrn 9890  ax-pre-ltadd 9891  ax-pre-mulgt0 9892
This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3or 1032  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-nel 2783  df-ral 2901  df-rex 2902  df-reu 2903  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-pss 3556  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-tp 4130  df-op 4132  df-uni 4373  df-iun 4457  df-br 4584  df-opab 4644  df-mpt 4645  df-tr 4681  df-eprel 4949  df-id 4953  df-po 4959  df-so 4960  df-fr 4997  df-we 4999  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-pred 5597  df-ord 5643  df-on 5644  df-lim 5645  df-suc 5646  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-riota 6511  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-om 6958  df-1st 7059  df-2nd 7060  df-wrecs 7294  df-recs 7355  df-rdg 7393  df-er 7629  df-en 7842  df-dom 7843  df-sdom 7844  df-pnf 9955  df-mnf 9956  df-xr 9957  df-ltxr 9958  df-le 9959  df-sub 10147  df-neg 10148  df-nn 10898  df-n0 11170  df-z 11255  df-uz 11564  df-rp 11709  df-fz 12198  df-fzo 12335  df-seq 12664  df-exp 12723
This theorem is referenced by:  stoweidlem42  38935
  Copyright terms: Public domain W3C validator