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

Theorem nn0ltexp2 10818
Description: Special case of ltexp2 15261 which we use here because we haven't yet defined df-rpcxp 15179 which is used in the current proof of ltexp2 15261. (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 1038 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝐴 ∈ ℝ)
2 simpll2 1039 . . . . 5 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑀 ∈ ℕ0)
32nn0zd 9463 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑀 ∈ ℤ)
4 simpll3 1040 . . . . 5 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑁 ∈ ℕ0)
54nn0zd 9463 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑁 ∈ ℤ)
6 simplr 528 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 1 < 𝐴)
7 simpr 110 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑀 < 𝑁)
8 ltexp2a 10700 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (1 < 𝐴𝑀 < 𝑁)) → (𝐴𝑀) < (𝐴𝑁))
91, 3, 5, 6, 7, 8syl32anc 1257 . . 3 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → (𝐴𝑀) < (𝐴𝑁))
109ex 115 . 2 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → (𝑀 < 𝑁 → (𝐴𝑀) < (𝐴𝑁)))
11 oveq2 5933 . . . . 5 (𝑚 = 𝑀 → (𝐴𝑚) = (𝐴𝑀))
1211breq1d 4044 . . . 4 (𝑚 = 𝑀 → ((𝐴𝑚) < (𝐴𝑁) ↔ (𝐴𝑀) < (𝐴𝑁)))
13 breq1 4037 . . . 4 (𝑚 = 𝑀 → (𝑚 < 𝑁𝑀 < 𝑁))
1412, 13imbi12d 234 . . 3 (𝑚 = 𝑀 → (((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁) ↔ ((𝐴𝑀) < (𝐴𝑁) → 𝑀 < 𝑁)))
15 simpl3 1004 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 𝑁 ∈ ℕ0)
16 simpl1 1002 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 𝐴 ∈ ℝ)
17 simpr 110 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 1 < 𝐴)
18 oveq2 5933 . . . . . . . . . 10 (𝑤 = 0 → (𝐴𝑤) = (𝐴↑0))
1918breq2d 4046 . . . . . . . . 9 (𝑤 = 0 → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴↑0)))
20 breq2 4038 . . . . . . . . 9 (𝑤 = 0 → (𝑚 < 𝑤𝑚 < 0))
2119, 20imbi12d 234 . . . . . . . 8 (𝑤 = 0 → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0)))
2221ralbidv 2497 . . . . . . 7 (𝑤 = 0 → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0)))
2322imbi2d 230 . . . . . 6 (𝑤 = 0 → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0))))
24 oveq2 5933 . . . . . . . . . 10 (𝑤 = 𝑘 → (𝐴𝑤) = (𝐴𝑘))
2524breq2d 4046 . . . . . . . . 9 (𝑤 = 𝑘 → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴𝑘)))
26 breq2 4038 . . . . . . . . 9 (𝑤 = 𝑘 → (𝑚 < 𝑤𝑚 < 𝑘))
2725, 26imbi12d 234 . . . . . . . 8 (𝑤 = 𝑘 → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘)))
2827ralbidv 2497 . . . . . . 7 (𝑤 = 𝑘 → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘)))
2928imbi2d 230 . . . . . 6 (𝑤 = 𝑘 → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘))))
30 oveq2 5933 . . . . . . . . . 10 (𝑤 = (𝑘 + 1) → (𝐴𝑤) = (𝐴↑(𝑘 + 1)))
3130breq2d 4046 . . . . . . . . 9 (𝑤 = (𝑘 + 1) → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴↑(𝑘 + 1))))
32 breq2 4038 . . . . . . . . 9 (𝑤 = (𝑘 + 1) → (𝑚 < 𝑤𝑚 < (𝑘 + 1)))
3331, 32imbi12d 234 . . . . . . . 8 (𝑤 = (𝑘 + 1) → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1))))
3433ralbidv 2497 . . . . . . 7 (𝑤 = (𝑘 + 1) → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1))))
3534imbi2d 230 . . . . . 6 (𝑤 = (𝑘 + 1) → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1)))))
36 oveq2 5933 . . . . . . . . . 10 (𝑤 = 𝑁 → (𝐴𝑤) = (𝐴𝑁))
3736breq2d 4046 . . . . . . . . 9 (𝑤 = 𝑁 → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴𝑁)))
38 breq2 4038 . . . . . . . . 9 (𝑤 = 𝑁 → (𝑚 < 𝑤𝑚 < 𝑁))
3937, 38imbi12d 234 . . . . . . . 8 (𝑤 = 𝑁 → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁)))
4039ralbidv 2497 . . . . . . 7 (𝑤 = 𝑁 → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁)))
4140imbi2d 230 . . . . . 6 (𝑤 = 𝑁 → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁))))
42 recn 8029 . . . . . . . . . . . 12 (𝐴 ∈ ℝ → 𝐴 ∈ ℂ)
4342ad2antrr 488 . . . . . . . . . . 11 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 𝐴 ∈ ℂ)
4443exp0d 10776 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴↑0) = 1)
45 1re 8042 . . . . . . . . . 10 1 ∈ ℝ
4644, 45eqeltrdi 2287 . . . . . . . . 9 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴↑0) ∈ ℝ)
47 simpll 527 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 𝐴 ∈ ℝ)
48 simpr 110 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 𝑚 ∈ ℕ0)
4947, 48reexpcld 10799 . . . . . . . . 9 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴𝑚) ∈ ℝ)
50 1red 8058 . . . . . . . . . . . 12 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 ∈ ℝ)
51 simplr 528 . . . . . . . . . . . 12 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 < 𝐴)
5250, 47, 51ltled 8162 . . . . . . . . . . 11 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 ≤ 𝐴)
5347, 48, 52expge1d 10801 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 ≤ (𝐴𝑚))
5444, 53eqbrtrd 4056 . . . . . . . . 9 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴↑0) ≤ (𝐴𝑚))
5546, 49, 54lensymd 8165 . . . . . . . 8 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → ¬ (𝐴𝑚) < (𝐴↑0))
5655pm2.21d 620 . . . . . . 7 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0))
5756ralrimiva 2570 . . . . . 6 ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0))
58 oveq2 5933 . . . . . . . . . . . 12 (𝑝 = 𝑚 → (𝐴𝑝) = (𝐴𝑚))
5958breq1d 4044 . . . . . . . . . . 11 (𝑝 = 𝑚 → ((𝐴𝑝) < (𝐴𝑘) ↔ (𝐴𝑚) < (𝐴𝑘)))
60 breq1 4037 . . . . . . . . . . 11 (𝑝 = 𝑚 → (𝑝 < 𝑘𝑚 < 𝑘))
6159, 60imbi12d 234 . . . . . . . . . 10 (𝑝 = 𝑚 → (((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘) ↔ ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘)))
6261cbvralv 2729 . . . . . . . . 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 8072 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝐴 ∈ ℂ)
67 simpr 110 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℕ)
68 expm1t 10676 . . . . . . . . . . . . . . . . . . 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 10783 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴↑(𝑘 + 1)) = ((𝐴𝑘) · 𝐴))
7263, 69, 713brtr3d 4065 . . . . . . . . . . . . . . . . 17 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ((𝐴↑(𝑚 − 1)) · 𝐴) < ((𝐴𝑘) · 𝐴))
73 nnm1nn0 9307 . . . . . . . . . . . . . . . . . . . 20 (𝑚 ∈ ℕ → (𝑚 − 1) ∈ ℕ0)
7473adantl 277 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝑚 − 1) ∈ ℕ0)
7565, 74reexpcld 10799 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴↑(𝑚 − 1)) ∈ ℝ)
7665, 70reexpcld 10799 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴𝑘) ∈ ℝ)
77 0red 8044 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 0 ∈ ℝ)
78 1red 8058 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 1 ∈ ℝ)
79 0lt1 8170 . . . . . . . . . . . . . . . . . . . . . 22 0 < 1
8079a1i 9 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 0 < 1)
81 simprr 531 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 1 < 𝐴)
8277, 78, 64, 80, 81lttrd 8169 . . . . . . . . . . . . . . . . . . . 20 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 0 < 𝐴)
8364, 82elrpd 9785 . . . . . . . . . . . . . . . . . . 19 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 𝐴 ∈ ℝ+)
8483ad4antr 494 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝐴 ∈ ℝ+)
8575, 76, 84ltmul1d 9830 . . . . . . . . . . . . . . . . 17 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ((𝐴↑(𝑚 − 1)) < (𝐴𝑘) ↔ ((𝐴↑(𝑚 − 1)) · 𝐴) < ((𝐴𝑘) · 𝐴)))
8672, 85mpbird 167 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴↑(𝑚 − 1)) < (𝐴𝑘))
87 oveq2 5933 . . . . . . . . . . . . . . . . . . 19 (𝑝 = (𝑚 − 1) → (𝐴𝑝) = (𝐴↑(𝑚 − 1)))
8887breq1d 4044 . . . . . . . . . . . . . . . . . 18 (𝑝 = (𝑚 − 1) → ((𝐴𝑝) < (𝐴𝑘) ↔ (𝐴↑(𝑚 − 1)) < (𝐴𝑘)))
89 breq1 4037 . . . . . . . . . . . . . . . . . 18 (𝑝 = (𝑚 − 1) → (𝑝 < 𝑘 ↔ (𝑚 − 1) < 𝑘))
9088, 89imbi12d 234 . . . . . . . . . . . . . . . . 17 (𝑝 = (𝑚 − 1) → (((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘) ↔ ((𝐴↑(𝑚 − 1)) < (𝐴𝑘) → (𝑚 − 1) < 𝑘)))
91 simp-4r 542 . . . . . . . . . . . . . . . . 17 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘))
9290, 91, 74rspcdva 2873 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ((𝐴↑(𝑚 − 1)) < (𝐴𝑘) → (𝑚 − 1) < 𝑘))
9386, 92mpd 13 . . . . . . . . . . . . . . 15 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝑚 − 1) < 𝑘)
94 nnz 9362 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ ℕ → 𝑚 ∈ ℤ)
9594adantl 277 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℤ)
9670nn0zd 9463 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑘 ∈ ℤ)
97 zlem1lt 9399 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℤ ∧ 𝑘 ∈ ℤ) → (𝑚𝑘 ↔ (𝑚 − 1) < 𝑘))
9895, 96, 97syl2anc 411 . . . . . . . . . . . . . . 15 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝑚𝑘 ↔ (𝑚 − 1) < 𝑘))
9993, 98mpbird 167 . . . . . . . . . . . . . 14 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑚𝑘)
100 zleltp1 9398 . . . . . . . . . . . . . . 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 9295 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → 0 < (𝑘 + 1))
105104ad5antr 496 . . . . . . . . . . . . . 14 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 = 0) → 0 < (𝑘 + 1))
106103, 105eqbrtrd 4056 . . . . . . . . . . . . 13 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 = 0) → 𝑚 < (𝑘 + 1))
107 simplr 528 . . . . . . . . . . . . . 14 (((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) → 𝑚 ∈ ℕ0)
108 elnn0 9268 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 ↔ (𝑚 ∈ ℕ ∨ 𝑚 = 0))
109107, 108sylib 122 . . . . . . . . . . . . 13 (((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) → (𝑚 ∈ ℕ ∨ 𝑚 = 0))
110102, 106, 109mpjaodan 799 . . . . . . . . . . . 12 (((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) → 𝑚 < (𝑘 + 1))
111110ex 115 . . . . . . . . . . 11 ((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) → ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1)))
112111ralrimiva 2570 . . . . . . . . . 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 9457 . . . . 5 (𝑁 ∈ ℕ0 → ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁)))
118117imp 124 . . . 4 ((𝑁 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁))
11915, 16, 17, 118syl12anc 1247 . . 3 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁))
120 simpl2 1003 . . 3 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 𝑀 ∈ ℕ0)
12114, 119, 120rspcdva 2873 . 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 709  w3a 980   = wceq 1364  wcel 2167  wral 2475   class class class wbr 4034  (class class class)co 5925  cc 7894  cr 7895  0cc0 7896  1c1 7897   + caddc 7899   · cmul 7901   < clt 8078  cle 8079  cmin 8214  cn 9007  0cn0 9266  cz 9343  +crp 9745  cexp 10647
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 710  ax-5 1461  ax-7 1462  ax-gen 1463  ax-ie1 1507  ax-ie2 1508  ax-8 1518  ax-10 1519  ax-11 1520  ax-i12 1521  ax-bndl 1523  ax-4 1524  ax-17 1540  ax-i9 1544  ax-ial 1548  ax-i5r 1549  ax-13 2169  ax-14 2170  ax-ext 2178  ax-coll 4149  ax-sep 4152  ax-nul 4160  ax-pow 4208  ax-pr 4243  ax-un 4469  ax-setind 4574  ax-iinf 4625  ax-cnex 7987  ax-resscn 7988  ax-1cn 7989  ax-1re 7990  ax-icn 7991  ax-addcl 7992  ax-addrcl 7993  ax-mulcl 7994  ax-mulrcl 7995  ax-addcom 7996  ax-mulcom 7997  ax-addass 7998  ax-mulass 7999  ax-distr 8000  ax-i2m1 8001  ax-0lt1 8002  ax-1rid 8003  ax-0id 8004  ax-rnegex 8005  ax-precex 8006  ax-cnre 8007  ax-pre-ltirr 8008  ax-pre-ltwlin 8009  ax-pre-lttrn 8010  ax-pre-apti 8011  ax-pre-ltadd 8012  ax-pre-mulgt0 8013  ax-pre-mulext 8014
This theorem depends on definitions:  df-bi 117  df-dc 836  df-3or 981  df-3an 982  df-tru 1367  df-fal 1370  df-nf 1475  df-sb 1777  df-eu 2048  df-mo 2049  df-clab 2183  df-cleq 2189  df-clel 2192  df-nfc 2328  df-ne 2368  df-nel 2463  df-ral 2480  df-rex 2481  df-reu 2482  df-rmo 2483  df-rab 2484  df-v 2765  df-sbc 2990  df-csb 3085  df-dif 3159  df-un 3161  df-in 3163  df-ss 3170  df-nul 3452  df-if 3563  df-pw 3608  df-sn 3629  df-pr 3630  df-op 3632  df-uni 3841  df-int 3876  df-iun 3919  df-br 4035  df-opab 4096  df-mpt 4097  df-tr 4133  df-id 4329  df-po 4332  df-iso 4333  df-iord 4402  df-on 4404  df-ilim 4405  df-suc 4407  df-iom 4628  df-xp 4670  df-rel 4671  df-cnv 4672  df-co 4673  df-dm 4674  df-rn 4675  df-res 4676  df-ima 4677  df-iota 5220  df-fun 5261  df-fn 5262  df-f 5263  df-f1 5264  df-fo 5265  df-f1o 5266  df-fv 5267  df-riota 5880  df-ov 5928  df-oprab 5929  df-mpo 5930  df-1st 6207  df-2nd 6208  df-recs 6372  df-frec 6458  df-pnf 8080  df-mnf 8081  df-xr 8082  df-ltxr 8083  df-le 8084  df-sub 8216  df-neg 8217  df-reap 8619  df-ap 8626  df-div 8717  df-inn 9008  df-n0 9267  df-z 9344  df-uz 9619  df-rp 9746  df-seqfrec 10557  df-exp 10648
This theorem is referenced by:  nn0leexp2  10819  bitsfzolem  12136  bitsfzo  12137  isprm5  12335  pclemub  12481
  Copyright terms: Public domain W3C validator