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

Theorem nn0ltexp2 10891
Description: Special case of ltexp2 15528 which we use here because we haven't yet defined df-rpcxp 15446 which is used in the current proof of ltexp2 15528. (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 1039 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝐴 ∈ ℝ)
2 simpll2 1040 . . . . 5 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑀 ∈ ℕ0)
32nn0zd 9528 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑀 ∈ ℤ)
4 simpll3 1041 . . . . 5 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑁 ∈ ℕ0)
54nn0zd 9528 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑁 ∈ ℤ)
6 simplr 528 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 1 < 𝐴)
7 simpr 110 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑀 < 𝑁)
8 ltexp2a 10773 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (1 < 𝐴𝑀 < 𝑁)) → (𝐴𝑀) < (𝐴𝑁))
91, 3, 5, 6, 7, 8syl32anc 1258 . . 3 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → (𝐴𝑀) < (𝐴𝑁))
109ex 115 . 2 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → (𝑀 < 𝑁 → (𝐴𝑀) < (𝐴𝑁)))
11 oveq2 5975 . . . . 5 (𝑚 = 𝑀 → (𝐴𝑚) = (𝐴𝑀))
1211breq1d 4069 . . . 4 (𝑚 = 𝑀 → ((𝐴𝑚) < (𝐴𝑁) ↔ (𝐴𝑀) < (𝐴𝑁)))
13 breq1 4062 . . . 4 (𝑚 = 𝑀 → (𝑚 < 𝑁𝑀 < 𝑁))
1412, 13imbi12d 234 . . 3 (𝑚 = 𝑀 → (((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁) ↔ ((𝐴𝑀) < (𝐴𝑁) → 𝑀 < 𝑁)))
15 simpl3 1005 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 𝑁 ∈ ℕ0)
16 simpl1 1003 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 𝐴 ∈ ℝ)
17 simpr 110 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 1 < 𝐴)
18 oveq2 5975 . . . . . . . . . 10 (𝑤 = 0 → (𝐴𝑤) = (𝐴↑0))
1918breq2d 4071 . . . . . . . . 9 (𝑤 = 0 → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴↑0)))
20 breq2 4063 . . . . . . . . 9 (𝑤 = 0 → (𝑚 < 𝑤𝑚 < 0))
2119, 20imbi12d 234 . . . . . . . 8 (𝑤 = 0 → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0)))
2221ralbidv 2508 . . . . . . 7 (𝑤 = 0 → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0)))
2322imbi2d 230 . . . . . 6 (𝑤 = 0 → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0))))
24 oveq2 5975 . . . . . . . . . 10 (𝑤 = 𝑘 → (𝐴𝑤) = (𝐴𝑘))
2524breq2d 4071 . . . . . . . . 9 (𝑤 = 𝑘 → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴𝑘)))
26 breq2 4063 . . . . . . . . 9 (𝑤 = 𝑘 → (𝑚 < 𝑤𝑚 < 𝑘))
2725, 26imbi12d 234 . . . . . . . 8 (𝑤 = 𝑘 → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘)))
2827ralbidv 2508 . . . . . . 7 (𝑤 = 𝑘 → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘)))
2928imbi2d 230 . . . . . 6 (𝑤 = 𝑘 → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘))))
30 oveq2 5975 . . . . . . . . . 10 (𝑤 = (𝑘 + 1) → (𝐴𝑤) = (𝐴↑(𝑘 + 1)))
3130breq2d 4071 . . . . . . . . 9 (𝑤 = (𝑘 + 1) → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴↑(𝑘 + 1))))
32 breq2 4063 . . . . . . . . 9 (𝑤 = (𝑘 + 1) → (𝑚 < 𝑤𝑚 < (𝑘 + 1)))
3331, 32imbi12d 234 . . . . . . . 8 (𝑤 = (𝑘 + 1) → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1))))
3433ralbidv 2508 . . . . . . 7 (𝑤 = (𝑘 + 1) → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1))))
3534imbi2d 230 . . . . . 6 (𝑤 = (𝑘 + 1) → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1)))))
36 oveq2 5975 . . . . . . . . . 10 (𝑤 = 𝑁 → (𝐴𝑤) = (𝐴𝑁))
3736breq2d 4071 . . . . . . . . 9 (𝑤 = 𝑁 → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴𝑁)))
38 breq2 4063 . . . . . . . . 9 (𝑤 = 𝑁 → (𝑚 < 𝑤𝑚 < 𝑁))
3937, 38imbi12d 234 . . . . . . . 8 (𝑤 = 𝑁 → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁)))
4039ralbidv 2508 . . . . . . 7 (𝑤 = 𝑁 → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁)))
4140imbi2d 230 . . . . . 6 (𝑤 = 𝑁 → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁))))
42 recn 8093 . . . . . . . . . . . 12 (𝐴 ∈ ℝ → 𝐴 ∈ ℂ)
4342ad2antrr 488 . . . . . . . . . . 11 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 𝐴 ∈ ℂ)
4443exp0d 10849 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴↑0) = 1)
45 1re 8106 . . . . . . . . . 10 1 ∈ ℝ
4644, 45eqeltrdi 2298 . . . . . . . . 9 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴↑0) ∈ ℝ)
47 simpll 527 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 𝐴 ∈ ℝ)
48 simpr 110 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 𝑚 ∈ ℕ0)
4947, 48reexpcld 10872 . . . . . . . . 9 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴𝑚) ∈ ℝ)
50 1red 8122 . . . . . . . . . . . 12 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 ∈ ℝ)
51 simplr 528 . . . . . . . . . . . 12 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 < 𝐴)
5250, 47, 51ltled 8226 . . . . . . . . . . 11 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 ≤ 𝐴)
5347, 48, 52expge1d 10874 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 ≤ (𝐴𝑚))
5444, 53eqbrtrd 4081 . . . . . . . . 9 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴↑0) ≤ (𝐴𝑚))
5546, 49, 54lensymd 8229 . . . . . . . 8 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → ¬ (𝐴𝑚) < (𝐴↑0))
5655pm2.21d 620 . . . . . . 7 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0))
5756ralrimiva 2581 . . . . . 6 ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0))
58 oveq2 5975 . . . . . . . . . . . 12 (𝑝 = 𝑚 → (𝐴𝑝) = (𝐴𝑚))
5958breq1d 4069 . . . . . . . . . . 11 (𝑝 = 𝑚 → ((𝐴𝑝) < (𝐴𝑘) ↔ (𝐴𝑚) < (𝐴𝑘)))
60 breq1 4062 . . . . . . . . . . 11 (𝑝 = 𝑚 → (𝑝 < 𝑘𝑚 < 𝑘))
6159, 60imbi12d 234 . . . . . . . . . 10 (𝑝 = 𝑚 → (((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘) ↔ ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘)))
6261cbvralv 2742 . . . . . . . . 9 (∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘))
63 simplr 528 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴𝑚) < (𝐴↑(𝑘 + 1)))
64 simprl 529 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 𝐴 ∈ ℝ)
6564ad4antr 494 . . . . . . . . . . . . . . . . . . . 20 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝐴 ∈ ℝ)
6665recnd 8136 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝐴 ∈ ℂ)
67 simpr 110 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℕ)
68 expm1t 10749 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℂ ∧ 𝑚 ∈ ℕ) → (𝐴𝑚) = ((𝐴↑(𝑚 − 1)) · 𝐴))
6966, 67, 68syl2anc 411 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴𝑚) = ((𝐴↑(𝑚 − 1)) · 𝐴))
70 simp-5l 543 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑘 ∈ ℕ0)
7166, 70expp1d 10856 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴↑(𝑘 + 1)) = ((𝐴𝑘) · 𝐴))
7263, 69, 713brtr3d 4090 . . . . . . . . . . . . . . . . 17 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ((𝐴↑(𝑚 − 1)) · 𝐴) < ((𝐴𝑘) · 𝐴))
73 nnm1nn0 9371 . . . . . . . . . . . . . . . . . . . 20 (𝑚 ∈ ℕ → (𝑚 − 1) ∈ ℕ0)
7473adantl 277 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝑚 − 1) ∈ ℕ0)
7565, 74reexpcld 10872 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴↑(𝑚 − 1)) ∈ ℝ)
7665, 70reexpcld 10872 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴𝑘) ∈ ℝ)
77 0red 8108 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 0 ∈ ℝ)
78 1red 8122 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 1 ∈ ℝ)
79 0lt1 8234 . . . . . . . . . . . . . . . . . . . . . 22 0 < 1
8079a1i 9 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 0 < 1)
81 simprr 531 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 1 < 𝐴)
8277, 78, 64, 80, 81lttrd 8233 . . . . . . . . . . . . . . . . . . . 20 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 0 < 𝐴)
8364, 82elrpd 9850 . . . . . . . . . . . . . . . . . . 19 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 𝐴 ∈ ℝ+)
8483ad4antr 494 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝐴 ∈ ℝ+)
8575, 76, 84ltmul1d 9895 . . . . . . . . . . . . . . . . 17 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ((𝐴↑(𝑚 − 1)) < (𝐴𝑘) ↔ ((𝐴↑(𝑚 − 1)) · 𝐴) < ((𝐴𝑘) · 𝐴)))
8672, 85mpbird 167 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴↑(𝑚 − 1)) < (𝐴𝑘))
87 oveq2 5975 . . . . . . . . . . . . . . . . . . 19 (𝑝 = (𝑚 − 1) → (𝐴𝑝) = (𝐴↑(𝑚 − 1)))
8887breq1d 4069 . . . . . . . . . . . . . . . . . 18 (𝑝 = (𝑚 − 1) → ((𝐴𝑝) < (𝐴𝑘) ↔ (𝐴↑(𝑚 − 1)) < (𝐴𝑘)))
89 breq1 4062 . . . . . . . . . . . . . . . . . 18 (𝑝 = (𝑚 − 1) → (𝑝 < 𝑘 ↔ (𝑚 − 1) < 𝑘))
9088, 89imbi12d 234 . . . . . . . . . . . . . . . . 17 (𝑝 = (𝑚 − 1) → (((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘) ↔ ((𝐴↑(𝑚 − 1)) < (𝐴𝑘) → (𝑚 − 1) < 𝑘)))
91 simp-4r 542 . . . . . . . . . . . . . . . . 17 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘))
9290, 91, 74rspcdva 2889 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ((𝐴↑(𝑚 − 1)) < (𝐴𝑘) → (𝑚 − 1) < 𝑘))
9386, 92mpd 13 . . . . . . . . . . . . . . 15 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝑚 − 1) < 𝑘)
94 nnz 9426 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ ℕ → 𝑚 ∈ ℤ)
9594adantl 277 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℤ)
9670nn0zd 9528 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑘 ∈ ℤ)
97 zlem1lt 9464 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℤ ∧ 𝑘 ∈ ℤ) → (𝑚𝑘 ↔ (𝑚 − 1) < 𝑘))
9895, 96, 97syl2anc 411 . . . . . . . . . . . . . . 15 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝑚𝑘 ↔ (𝑚 − 1) < 𝑘))
9993, 98mpbird 167 . . . . . . . . . . . . . 14 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑚𝑘)
100 zleltp1 9463 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℤ ∧ 𝑘 ∈ ℤ) → (𝑚𝑘𝑚 < (𝑘 + 1)))
10195, 96, 100syl2anc 411 . . . . . . . . . . . . . 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 9359 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → 0 < (𝑘 + 1))
105104ad5antr 496 . . . . . . . . . . . . . 14 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 = 0) → 0 < (𝑘 + 1))
106103, 105eqbrtrd 4081 . . . . . . . . . . . . 13 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 = 0) → 𝑚 < (𝑘 + 1))
107 simplr 528 . . . . . . . . . . . . . 14 (((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) → 𝑚 ∈ ℕ0)
108 elnn0 9332 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 ↔ (𝑚 ∈ ℕ ∨ 𝑚 = 0))
109107, 108sylib 122 . . . . . . . . . . . . 13 (((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) → (𝑚 ∈ ℕ ∨ 𝑚 = 0))
110102, 106, 109mpjaodan 800 . . . . . . . . . . . 12 (((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) → 𝑚 < (𝑘 + 1))
111110ex 115 . . . . . . . . . . 11 ((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) → ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1)))
112111ralrimiva 2581 . . . . . . . . . 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 9522 . . . . 5 (𝑁 ∈ ℕ0 → ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁)))
118117imp 124 . . . 4 ((𝑁 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁))
11915, 16, 17, 118syl12anc 1248 . . 3 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁))
120 simpl2 1004 . . 3 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 𝑀 ∈ ℕ0)
12114, 119, 120rspcdva 2889 . 2 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → ((𝐴𝑀) < (𝐴𝑁) → 𝑀 < 𝑁))
12210, 121impbid 129 1 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → (𝑀 < 𝑁 ↔ (𝐴𝑀) < (𝐴𝑁)))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104  wb 105  wo 710  w3a 981   = wceq 1373  wcel 2178  wral 2486   class class class wbr 4059  (class class class)co 5967  cc 7958  cr 7959  0cc0 7960  1c1 7961   + caddc 7963   · cmul 7965   < clt 8142  cle 8143  cmin 8278  cn 9071  0cn0 9330  cz 9407  +crp 9810  cexp 10720
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 615  ax-in2 616  ax-io 711  ax-5 1471  ax-7 1472  ax-gen 1473  ax-ie1 1517  ax-ie2 1518  ax-8 1528  ax-10 1529  ax-11 1530  ax-i12 1531  ax-bndl 1533  ax-4 1534  ax-17 1550  ax-i9 1554  ax-ial 1558  ax-i5r 1559  ax-13 2180  ax-14 2181  ax-ext 2189  ax-coll 4175  ax-sep 4178  ax-nul 4186  ax-pow 4234  ax-pr 4269  ax-un 4498  ax-setind 4603  ax-iinf 4654  ax-cnex 8051  ax-resscn 8052  ax-1cn 8053  ax-1re 8054  ax-icn 8055  ax-addcl 8056  ax-addrcl 8057  ax-mulcl 8058  ax-mulrcl 8059  ax-addcom 8060  ax-mulcom 8061  ax-addass 8062  ax-mulass 8063  ax-distr 8064  ax-i2m1 8065  ax-0lt1 8066  ax-1rid 8067  ax-0id 8068  ax-rnegex 8069  ax-precex 8070  ax-cnre 8071  ax-pre-ltirr 8072  ax-pre-ltwlin 8073  ax-pre-lttrn 8074  ax-pre-apti 8075  ax-pre-ltadd 8076  ax-pre-mulgt0 8077  ax-pre-mulext 8078
This theorem depends on definitions:  df-bi 117  df-dc 837  df-3or 982  df-3an 983  df-tru 1376  df-fal 1379  df-nf 1485  df-sb 1787  df-eu 2058  df-mo 2059  df-clab 2194  df-cleq 2200  df-clel 2203  df-nfc 2339  df-ne 2379  df-nel 2474  df-ral 2491  df-rex 2492  df-reu 2493  df-rmo 2494  df-rab 2495  df-v 2778  df-sbc 3006  df-csb 3102  df-dif 3176  df-un 3178  df-in 3180  df-ss 3187  df-nul 3469  df-if 3580  df-pw 3628  df-sn 3649  df-pr 3650  df-op 3652  df-uni 3865  df-int 3900  df-iun 3943  df-br 4060  df-opab 4122  df-mpt 4123  df-tr 4159  df-id 4358  df-po 4361  df-iso 4362  df-iord 4431  df-on 4433  df-ilim 4434  df-suc 4436  df-iom 4657  df-xp 4699  df-rel 4700  df-cnv 4701  df-co 4702  df-dm 4703  df-rn 4704  df-res 4705  df-ima 4706  df-iota 5251  df-fun 5292  df-fn 5293  df-f 5294  df-f1 5295  df-fo 5296  df-f1o 5297  df-fv 5298  df-riota 5922  df-ov 5970  df-oprab 5971  df-mpo 5972  df-1st 6249  df-2nd 6250  df-recs 6414  df-frec 6500  df-pnf 8144  df-mnf 8145  df-xr 8146  df-ltxr 8147  df-le 8148  df-sub 8280  df-neg 8281  df-reap 8683  df-ap 8690  df-div 8781  df-inn 9072  df-n0 9331  df-z 9408  df-uz 9684  df-rp 9811  df-seqfrec 10630  df-exp 10721
This theorem is referenced by:  nn0leexp2  10892  bitsfzolem  12380  bitsfzo  12381  isprm5  12579  pclemub  12725
  Copyright terms: Public domain W3C validator