ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  nn0ltexp2 GIF version

Theorem nn0ltexp2 11147
Description: Special case of ltexp2 16043 which we use here because we haven't yet defined df-rpcxp 15960 which is used in the current proof of ltexp2 16043. (Contributed by Jim Kingdon, 7-Oct-2024.)
Assertion
Ref Expression
nn0ltexp2 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → (𝑀 < 𝑁 ↔ (𝐴𝑀) < (𝐴𝑁)))

Proof of Theorem nn0ltexp2
Dummy variables 𝑘 𝑚 𝑝 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpll1 1067 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝐴 ∈ ℝ)
2 simpll2 1068 . . . . 5 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑀 ∈ ℕ0)
32nn0zd 9766 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑀 ∈ ℤ)
4 simpll3 1069 . . . . 5 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑁 ∈ ℕ0)
54nn0zd 9766 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑁 ∈ ℤ)
6 simplr 533 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 1 < 𝐴)
7 simpr 110 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑀 < 𝑁)
8 ltexp2a 11028 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (1 < 𝐴𝑀 < 𝑁)) → (𝐴𝑀) < (𝐴𝑁))
91, 3, 5, 6, 7, 8syl32anc 1286 . . 3 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → (𝐴𝑀) < (𝐴𝑁))
109ex 115 . 2 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → (𝑀 < 𝑁 → (𝐴𝑀) < (𝐴𝑁)))
11 oveq2 6093 . . . . 5 (𝑚 = 𝑀 → (𝐴𝑚) = (𝐴𝑀))
1211breq1d 4140 . . . 4 (𝑚 = 𝑀 → ((𝐴𝑚) < (𝐴𝑁) ↔ (𝐴𝑀) < (𝐴𝑁)))
13 breq1 4133 . . . 4 (𝑚 = 𝑀 → (𝑚 < 𝑁𝑀 < 𝑁))
1412, 13imbi12d 234 . . 3 (𝑚 = 𝑀 → (((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁) ↔ ((𝐴𝑀) < (𝐴𝑁) → 𝑀 < 𝑁)))
15 simpl3 1033 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 𝑁 ∈ ℕ0)
16 simpl1 1031 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 𝐴 ∈ ℝ)
17 simpr 110 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 1 < 𝐴)
18 oveq2 6093 . . . . . . . . . 10 (𝑤 = 0 → (𝐴𝑤) = (𝐴↑0))
1918breq2d 4142 . . . . . . . . 9 (𝑤 = 0 → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴↑0)))
20 breq2 4134 . . . . . . . . 9 (𝑤 = 0 → (𝑚 < 𝑤𝑚 < 0))
2119, 20imbi12d 234 . . . . . . . 8 (𝑤 = 0 → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0)))
2221ralbidv 2550 . . . . . . 7 (𝑤 = 0 → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0)))
2322imbi2d 230 . . . . . 6 (𝑤 = 0 → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0))))
24 oveq2 6093 . . . . . . . . . 10 (𝑤 = 𝑘 → (𝐴𝑤) = (𝐴𝑘))
2524breq2d 4142 . . . . . . . . 9 (𝑤 = 𝑘 → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴𝑘)))
26 breq2 4134 . . . . . . . . 9 (𝑤 = 𝑘 → (𝑚 < 𝑤𝑚 < 𝑘))
2725, 26imbi12d 234 . . . . . . . 8 (𝑤 = 𝑘 → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘)))
2827ralbidv 2550 . . . . . . 7 (𝑤 = 𝑘 → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘)))
2928imbi2d 230 . . . . . 6 (𝑤 = 𝑘 → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘))))
30 oveq2 6093 . . . . . . . . . 10 (𝑤 = (𝑘 + 1) → (𝐴𝑤) = (𝐴↑(𝑘 + 1)))
3130breq2d 4142 . . . . . . . . 9 (𝑤 = (𝑘 + 1) → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴↑(𝑘 + 1))))
32 breq2 4134 . . . . . . . . 9 (𝑤 = (𝑘 + 1) → (𝑚 < 𝑤𝑚 < (𝑘 + 1)))
3331, 32imbi12d 234 . . . . . . . 8 (𝑤 = (𝑘 + 1) → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1))))
3433ralbidv 2550 . . . . . . 7 (𝑤 = (𝑘 + 1) → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1))))
3534imbi2d 230 . . . . . 6 (𝑤 = (𝑘 + 1) → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1)))))
36 oveq2 6093 . . . . . . . . . 10 (𝑤 = 𝑁 → (𝐴𝑤) = (𝐴𝑁))
3736breq2d 4142 . . . . . . . . 9 (𝑤 = 𝑁 → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴𝑁)))
38 breq2 4134 . . . . . . . . 9 (𝑤 = 𝑁 → (𝑚 < 𝑤𝑚 < 𝑁))
3937, 38imbi12d 234 . . . . . . . 8 (𝑤 = 𝑁 → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁)))
4039ralbidv 2550 . . . . . . 7 (𝑤 = 𝑁 → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁)))
4140imbi2d 230 . . . . . 6 (𝑤 = 𝑁 → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁))))
42 recn 8312 . . . . . . . . . . . 12 (𝐴 ∈ ℝ → 𝐴 ∈ ℂ)
4342ad2antrr 492 . . . . . . . . . . 11 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 𝐴 ∈ ℂ)
4443exp0d 11105 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴↑0) = 1)
45 1re 8325 . . . . . . . . . 10 1 ∈ ℝ
4644, 45eqeltrdi 2329 . . . . . . . . 9 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴↑0) ∈ ℝ)
47 simpll 531 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 𝐴 ∈ ℝ)
48 simpr 110 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 𝑚 ∈ ℕ0)
4947, 48reexpcld 11128 . . . . . . . . 9 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴𝑚) ∈ ℝ)
50 1red 8341 . . . . . . . . . . . 12 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 ∈ ℝ)
51 simplr 533 . . . . . . . . . . . 12 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 < 𝐴)
5250, 47, 51ltled 8445 . . . . . . . . . . 11 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 ≤ 𝐴)
5347, 48, 52expge1d 11130 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 ≤ (𝐴𝑚))
5444, 53eqbrtrd 4152 . . . . . . . . 9 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴↑0) ≤ (𝐴𝑚))
5546, 49, 54lensymd 8448 . . . . . . . 8 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → ¬ (𝐴𝑚) < (𝐴↑0))
5655pm2.21d 628 . . . . . . 7 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0))
5756ralrimiva 2623 . . . . . 6 ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0))
58 oveq2 6093 . . . . . . . . . . . 12 (𝑝 = 𝑚 → (𝐴𝑝) = (𝐴𝑚))
5958breq1d 4140 . . . . . . . . . . 11 (𝑝 = 𝑚 → ((𝐴𝑝) < (𝐴𝑘) ↔ (𝐴𝑚) < (𝐴𝑘)))
60 breq1 4133 . . . . . . . . . . 11 (𝑝 = 𝑚 → (𝑝 < 𝑘𝑚 < 𝑘))
6159, 60imbi12d 234 . . . . . . . . . 10 (𝑝 = 𝑚 → (((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘) ↔ ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘)))
6261cbvralv 2786 . . . . . . . . 9 (∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘))
63 simplr 533 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴𝑚) < (𝐴↑(𝑘 + 1)))
64 simprl 535 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 𝐴 ∈ ℝ)
6564ad4antr 498 . . . . . . . . . . . . . . . . . . . 20 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝐴 ∈ ℝ)
6665recnd 8354 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝐴 ∈ ℂ)
67 simpr 110 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℕ)
68 expm1t 11004 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℂ ∧ 𝑚 ∈ ℕ) → (𝐴𝑚) = ((𝐴↑(𝑚 − 1)) · 𝐴))
6966, 67, 68syl2anc 415 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴𝑚) = ((𝐴↑(𝑚 − 1)) · 𝐴))
70 simp-5l 549 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑘 ∈ ℕ0)
7166, 70expp1d 11112 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴↑(𝑘 + 1)) = ((𝐴𝑘) · 𝐴))
7263, 69, 713brtr3d 4161 . . . . . . . . . . . . . . . . 17 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ((𝐴↑(𝑚 − 1)) · 𝐴) < ((𝐴𝑘) · 𝐴))
73 nnm1nn0 9604 . . . . . . . . . . . . . . . . . . . 20 (𝑚 ∈ ℕ → (𝑚 − 1) ∈ ℕ0)
7473adantl 277 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝑚 − 1) ∈ ℕ0)
7565, 74reexpcld 11128 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴↑(𝑚 − 1)) ∈ ℝ)
7665, 70reexpcld 11128 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴𝑘) ∈ ℝ)
77 0red 8327 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 0 ∈ ℝ)
78 1red 8341 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 1 ∈ ℝ)
79 0lt1 8453 . . . . . . . . . . . . . . . . . . . . . 22 0 < 1
8079a1i 9 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 0 < 1)
81 simprr 537 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 1 < 𝐴)
8277, 78, 64, 80, 81lttrd 8452 . . . . . . . . . . . . . . . . . . . 20 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 0 < 𝐴)
8364, 82elrpd 10094 . . . . . . . . . . . . . . . . . . 19 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 𝐴 ∈ ℝ+)
8483ad4antr 498 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝐴 ∈ ℝ+)
8575, 76, 84ltmul1d 10139 . . . . . . . . . . . . . . . . 17 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ((𝐴↑(𝑚 − 1)) < (𝐴𝑘) ↔ ((𝐴↑(𝑚 − 1)) · 𝐴) < ((𝐴𝑘) · 𝐴)))
8672, 85mpbird 167 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴↑(𝑚 − 1)) < (𝐴𝑘))
87 oveq2 6093 . . . . . . . . . . . . . . . . . . 19 (𝑝 = (𝑚 − 1) → (𝐴𝑝) = (𝐴↑(𝑚 − 1)))
8887breq1d 4140 . . . . . . . . . . . . . . . . . 18 (𝑝 = (𝑚 − 1) → ((𝐴𝑝) < (𝐴𝑘) ↔ (𝐴↑(𝑚 − 1)) < (𝐴𝑘)))
89 breq1 4133 . . . . . . . . . . . . . . . . . 18 (𝑝 = (𝑚 − 1) → (𝑝 < 𝑘 ↔ (𝑚 − 1) < 𝑘))
9088, 89imbi12d 234 . . . . . . . . . . . . . . . . 17 (𝑝 = (𝑚 − 1) → (((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘) ↔ ((𝐴↑(𝑚 − 1)) < (𝐴𝑘) → (𝑚 − 1) < 𝑘)))
91 simp-4r 548 . . . . . . . . . . . . . . . . 17 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘))
9290, 91, 74rspcdva 2934 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ((𝐴↑(𝑚 − 1)) < (𝐴𝑘) → (𝑚 − 1) < 𝑘))
9386, 92mpd 13 . . . . . . . . . . . . . . 15 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝑚 − 1) < 𝑘)
94 nnz 9663 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ ℕ → 𝑚 ∈ ℤ)
9594adantl 277 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℤ)
9670nn0zd 9766 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑘 ∈ ℤ)
97 zlem1lt 9701 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℤ ∧ 𝑘 ∈ ℤ) → (𝑚𝑘 ↔ (𝑚 − 1) < 𝑘))
9895, 96, 97syl2anc 415 . . . . . . . . . . . . . . 15 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝑚𝑘 ↔ (𝑚 − 1) < 𝑘))
9993, 98mpbird 167 . . . . . . . . . . . . . 14 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑚𝑘)
100 zleltp1 9700 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℤ ∧ 𝑘 ∈ ℤ) → (𝑚𝑘𝑚 < (𝑘 + 1)))
10195, 96, 100syl2anc 415 . . . . . . . . . . . . . 14 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝑚𝑘𝑚 < (𝑘 + 1)))
10299, 101mpbid 147 . . . . . . . . . . . . 13 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑚 < (𝑘 + 1))
103 simpr 110 . . . . . . . . . . . . . 14 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 = 0) → 𝑚 = 0)
104 nn0p1gt0 9592 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → 0 < (𝑘 + 1))
105104ad5antr 500 . . . . . . . . . . . . . 14 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 = 0) → 0 < (𝑘 + 1))
106103, 105eqbrtrd 4152 . . . . . . . . . . . . 13 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 = 0) → 𝑚 < (𝑘 + 1))
107 simplr 533 . . . . . . . . . . . . . 14 (((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) → 𝑚 ∈ ℕ0)
108 elnn0 9565 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 ↔ (𝑚 ∈ ℕ ∨ 𝑚 = 0))
109107, 108sylib 122 . . . . . . . . . . . . 13 (((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) → (𝑚 ∈ ℕ ∨ 𝑚 = 0))
110102, 106, 109mpjaodan 810 . . . . . . . . . . . 12 (((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) → 𝑚 < (𝑘 + 1))
111110ex 115 . . . . . . . . . . 11 ((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) → ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1)))
112111ralrimiva 2623 . . . . . . . . . 10 (((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1)))
113112ex 115 . . . . . . . . 9 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → (∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1))))
11462, 113biimtrrid 153 . . . . . . . 8 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1))))
115114ex 115 . . . . . . 7 (𝑘 ∈ ℕ0 → ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1)))))
116115a2d 26 . . . . . 6 (𝑘 ∈ ℕ0 → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘)) → ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1)))))
11723, 29, 35, 41, 57, 116nn0ind 9760 . . . . 5 (𝑁 ∈ ℕ0 → ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁)))
118117imp 124 . . . 4 ((𝑁 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁))
11915, 16, 17, 118syl12anc 1276 . . 3 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁))
120 simpl2 1032 . . 3 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 𝑀 ∈ ℕ0)
12114, 119, 120rspcdva 2934 . 2 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → ((𝐴𝑀) < (𝐴𝑁) → 𝑀 < 𝑁))
12210, 121impbid 129 1 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → (𝑀 < 𝑁 ↔ (𝐴𝑀) < (𝐴𝑁)))
Colors of variables:    wff set class
This proof depends on syntax axioms:  wi 4  wa 104  wb 105  wo 720  w3a 1009   = wceq 1402  wcel 2209  wral 2528   class class class wbr 4130  (class class class)co 6085  cc 8177  cr 8178  0cc0 8179  1c1 8180   + caddc 8182   · cmul 8184   < clt 8360  cle 8361  cmin 8497  cn 9304  0cn0 9563  cz 9644  +crp 10054  cexp 10975
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-coll 4246  ax-sep 4249  ax-nul 4259  ax-pow 4311  ax-pr 4346  ax-un 4578  ax-setind 4684  ax-iinf 4735  ax-cnex 8270  ax-resscn 8271  ax-1cn 8272  ax-1re 8273  ax-icn 8274  ax-addcl 8275  ax-addrcl 8276  ax-mulcl 8277  ax-mulrcl 8278  ax-addcom 8279  ax-mulcom 8280  ax-addass 8281  ax-mulass 8282  ax-distr 8283  ax-i2m1 8284  ax-0lt1 8285  ax-1rid 8286  ax-0id 8287  ax-rnegex 8288  ax-precex 8289  ax-cnre 8290  ax-pre-ltirr 8291  ax-pre-ltwlin 8292  ax-pre-lttrn 8293  ax-pre-apti 8294  ax-pre-ltadd 8295  ax-pre-mulgt0 8296  ax-pre-mulext 8297
This proof depends on definitions:  df-bi 117  df-dc 847  df-3or 1010  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-nel 2516  df-ral 2533  df-rex 2534  df-reu 2535  df-rmo 2536  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-if 3639  df-pw 3690  df-sn 3715  df-pr 3716  df-op 3718  df-uni 3936  df-int 3971  df-iun 4014  df-br 4131  df-opab 4193  df-mpt 4194  df-tr 4230  df-id 4438  df-po 4441  df-iso 4442  df-iord 4511  df-on 4513  df-ilim 4514  df-suc 4516  df-iom 4738  df-xp 4780  df-rel 4781  df-cnv 4782  df-co 4783  df-dm 4784  df-rn 4785  df-res 4786  df-ima 4787  df-iota 5337  df-fun 5379  df-fn 5380  df-f 5381  df-f1 5382  df-fo 5383  df-f1o 5384  df-fv 5385  df-riota 6038  df-ov 6088  df-oprab 6089  df-mpo 6090  df-1st 6374  df-2nd 6375  df-recs 6576  df-frec 6662  df-pnf 8362  df-mnf 8363  df-xr 8364  df-ltxr 8365  df-le 8366  df-sub 8499  df-neg 8500  df-reap 8903  df-ap 8910  df-div 9003  df-inn 9305  df-n0 9564  df-z 9645  df-uz 9922  df-rp 10055  df-seqfrec 10885  df-exp 10976
This theorem is used by:  nn0leexp2  11148  bitsfzolem  12721  bitsfzo  12722  isprm5  12920  pclemub  13066
  Copyright terms: Public domain W3C validator