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

Theorem nn0ltexp2 11017
Description: Special case of ltexp2 15735 which we use here because we haven't yet defined df-rpcxp 15653 which is used in the current proof of ltexp2 15735. (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 1063 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝐴 ∈ ℝ)
2 simpll2 1064 . . . . 5 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑀 ∈ ℕ0)
32nn0zd 9644 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑀 ∈ ℤ)
4 simpll3 1065 . . . . 5 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑁 ∈ ℕ0)
54nn0zd 9644 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑁 ∈ ℤ)
6 simplr 529 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 1 < 𝐴)
7 simpr 110 . . . 4 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → 𝑀 < 𝑁)
8 ltexp2a 10899 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (1 < 𝐴𝑀 < 𝑁)) → (𝐴𝑀) < (𝐴𝑁))
91, 3, 5, 6, 7, 8syl32anc 1282 . . 3 ((((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) ∧ 𝑀 < 𝑁) → (𝐴𝑀) < (𝐴𝑁))
109ex 115 . 2 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → (𝑀 < 𝑁 → (𝐴𝑀) < (𝐴𝑁)))
11 oveq2 6036 . . . . 5 (𝑚 = 𝑀 → (𝐴𝑚) = (𝐴𝑀))
1211breq1d 4103 . . . 4 (𝑚 = 𝑀 → ((𝐴𝑚) < (𝐴𝑁) ↔ (𝐴𝑀) < (𝐴𝑁)))
13 breq1 4096 . . . 4 (𝑚 = 𝑀 → (𝑚 < 𝑁𝑀 < 𝑁))
1412, 13imbi12d 234 . . 3 (𝑚 = 𝑀 → (((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁) ↔ ((𝐴𝑀) < (𝐴𝑁) → 𝑀 < 𝑁)))
15 simpl3 1029 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 𝑁 ∈ ℕ0)
16 simpl1 1027 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 𝐴 ∈ ℝ)
17 simpr 110 . . . 4 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 1 < 𝐴)
18 oveq2 6036 . . . . . . . . . 10 (𝑤 = 0 → (𝐴𝑤) = (𝐴↑0))
1918breq2d 4105 . . . . . . . . 9 (𝑤 = 0 → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴↑0)))
20 breq2 4097 . . . . . . . . 9 (𝑤 = 0 → (𝑚 < 𝑤𝑚 < 0))
2119, 20imbi12d 234 . . . . . . . 8 (𝑤 = 0 → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0)))
2221ralbidv 2533 . . . . . . 7 (𝑤 = 0 → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0)))
2322imbi2d 230 . . . . . 6 (𝑤 = 0 → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0))))
24 oveq2 6036 . . . . . . . . . 10 (𝑤 = 𝑘 → (𝐴𝑤) = (𝐴𝑘))
2524breq2d 4105 . . . . . . . . 9 (𝑤 = 𝑘 → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴𝑘)))
26 breq2 4097 . . . . . . . . 9 (𝑤 = 𝑘 → (𝑚 < 𝑤𝑚 < 𝑘))
2725, 26imbi12d 234 . . . . . . . 8 (𝑤 = 𝑘 → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘)))
2827ralbidv 2533 . . . . . . 7 (𝑤 = 𝑘 → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘)))
2928imbi2d 230 . . . . . 6 (𝑤 = 𝑘 → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘))))
30 oveq2 6036 . . . . . . . . . 10 (𝑤 = (𝑘 + 1) → (𝐴𝑤) = (𝐴↑(𝑘 + 1)))
3130breq2d 4105 . . . . . . . . 9 (𝑤 = (𝑘 + 1) → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴↑(𝑘 + 1))))
32 breq2 4097 . . . . . . . . 9 (𝑤 = (𝑘 + 1) → (𝑚 < 𝑤𝑚 < (𝑘 + 1)))
3331, 32imbi12d 234 . . . . . . . 8 (𝑤 = (𝑘 + 1) → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1))))
3433ralbidv 2533 . . . . . . 7 (𝑤 = (𝑘 + 1) → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1))))
3534imbi2d 230 . . . . . 6 (𝑤 = (𝑘 + 1) → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1)))))
36 oveq2 6036 . . . . . . . . . 10 (𝑤 = 𝑁 → (𝐴𝑤) = (𝐴𝑁))
3736breq2d 4105 . . . . . . . . 9 (𝑤 = 𝑁 → ((𝐴𝑚) < (𝐴𝑤) ↔ (𝐴𝑚) < (𝐴𝑁)))
38 breq2 4097 . . . . . . . . 9 (𝑤 = 𝑁 → (𝑚 < 𝑤𝑚 < 𝑁))
3937, 38imbi12d 234 . . . . . . . 8 (𝑤 = 𝑁 → (((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁)))
4039ralbidv 2533 . . . . . . 7 (𝑤 = 𝑁 → (∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁)))
4140imbi2d 230 . . . . . 6 (𝑤 = 𝑁 → (((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑤) → 𝑚 < 𝑤)) ↔ ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁))))
42 recn 8208 . . . . . . . . . . . 12 (𝐴 ∈ ℝ → 𝐴 ∈ ℂ)
4342ad2antrr 488 . . . . . . . . . . 11 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 𝐴 ∈ ℂ)
4443exp0d 10975 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴↑0) = 1)
45 1re 8221 . . . . . . . . . 10 1 ∈ ℝ
4644, 45eqeltrdi 2322 . . . . . . . . 9 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴↑0) ∈ ℝ)
47 simpll 527 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 𝐴 ∈ ℝ)
48 simpr 110 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 𝑚 ∈ ℕ0)
4947, 48reexpcld 10998 . . . . . . . . 9 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴𝑚) ∈ ℝ)
50 1red 8237 . . . . . . . . . . . 12 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 ∈ ℝ)
51 simplr 529 . . . . . . . . . . . 12 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 < 𝐴)
5250, 47, 51ltled 8340 . . . . . . . . . . 11 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 ≤ 𝐴)
5347, 48, 52expge1d 11000 . . . . . . . . . 10 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → 1 ≤ (𝐴𝑚))
5444, 53eqbrtrd 4115 . . . . . . . . 9 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → (𝐴↑0) ≤ (𝐴𝑚))
5546, 49, 54lensymd 8343 . . . . . . . 8 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → ¬ (𝐴𝑚) < (𝐴↑0))
5655pm2.21d 624 . . . . . . 7 (((𝐴 ∈ ℝ ∧ 1 < 𝐴) ∧ 𝑚 ∈ ℕ0) → ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0))
5756ralrimiva 2606 . . . . . 6 ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴↑0) → 𝑚 < 0))
58 oveq2 6036 . . . . . . . . . . . 12 (𝑝 = 𝑚 → (𝐴𝑝) = (𝐴𝑚))
5958breq1d 4103 . . . . . . . . . . 11 (𝑝 = 𝑚 → ((𝐴𝑝) < (𝐴𝑘) ↔ (𝐴𝑚) < (𝐴𝑘)))
60 breq1 4096 . . . . . . . . . . 11 (𝑝 = 𝑚 → (𝑝 < 𝑘𝑚 < 𝑘))
6159, 60imbi12d 234 . . . . . . . . . 10 (𝑝 = 𝑚 → (((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘) ↔ ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘)))
6261cbvralv 2768 . . . . . . . . 9 (∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘) ↔ ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑘) → 𝑚 < 𝑘))
63 simplr 529 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴𝑚) < (𝐴↑(𝑘 + 1)))
64 simprl 531 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 𝐴 ∈ ℝ)
6564ad4antr 494 . . . . . . . . . . . . . . . . . . . 20 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝐴 ∈ ℝ)
6665recnd 8250 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝐴 ∈ ℂ)
67 simpr 110 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℕ)
68 expm1t 10875 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℂ ∧ 𝑚 ∈ ℕ) → (𝐴𝑚) = ((𝐴↑(𝑚 − 1)) · 𝐴))
6966, 67, 68syl2anc 411 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴𝑚) = ((𝐴↑(𝑚 − 1)) · 𝐴))
70 simp-5l 545 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑘 ∈ ℕ0)
7166, 70expp1d 10982 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴↑(𝑘 + 1)) = ((𝐴𝑘) · 𝐴))
7263, 69, 713brtr3d 4124 . . . . . . . . . . . . . . . . 17 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ((𝐴↑(𝑚 − 1)) · 𝐴) < ((𝐴𝑘) · 𝐴))
73 nnm1nn0 9485 . . . . . . . . . . . . . . . . . . . 20 (𝑚 ∈ ℕ → (𝑚 − 1) ∈ ℕ0)
7473adantl 277 . . . . . . . . . . . . . . . . . . 19 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝑚 − 1) ∈ ℕ0)
7565, 74reexpcld 10998 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴↑(𝑚 − 1)) ∈ ℝ)
7665, 70reexpcld 10998 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴𝑘) ∈ ℝ)
77 0red 8223 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 0 ∈ ℝ)
78 1red 8237 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 1 ∈ ℝ)
79 0lt1 8348 . . . . . . . . . . . . . . . . . . . . . 22 0 < 1
8079a1i 9 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 0 < 1)
81 simprr 533 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 1 < 𝐴)
8277, 78, 64, 80, 81lttrd 8347 . . . . . . . . . . . . . . . . . . . 20 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 0 < 𝐴)
8364, 82elrpd 9972 . . . . . . . . . . . . . . . . . . 19 ((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → 𝐴 ∈ ℝ+)
8483ad4antr 494 . . . . . . . . . . . . . . . . . 18 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝐴 ∈ ℝ+)
8575, 76, 84ltmul1d 10017 . . . . . . . . . . . . . . . . 17 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ((𝐴↑(𝑚 − 1)) < (𝐴𝑘) ↔ ((𝐴↑(𝑚 − 1)) · 𝐴) < ((𝐴𝑘) · 𝐴)))
8672, 85mpbird 167 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝐴↑(𝑚 − 1)) < (𝐴𝑘))
87 oveq2 6036 . . . . . . . . . . . . . . . . . . 19 (𝑝 = (𝑚 − 1) → (𝐴𝑝) = (𝐴↑(𝑚 − 1)))
8887breq1d 4103 . . . . . . . . . . . . . . . . . 18 (𝑝 = (𝑚 − 1) → ((𝐴𝑝) < (𝐴𝑘) ↔ (𝐴↑(𝑚 − 1)) < (𝐴𝑘)))
89 breq1 4096 . . . . . . . . . . . . . . . . . 18 (𝑝 = (𝑚 − 1) → (𝑝 < 𝑘 ↔ (𝑚 − 1) < 𝑘))
9088, 89imbi12d 234 . . . . . . . . . . . . . . . . 17 (𝑝 = (𝑚 − 1) → (((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘) ↔ ((𝐴↑(𝑚 − 1)) < (𝐴𝑘) → (𝑚 − 1) < 𝑘)))
91 simp-4r 544 . . . . . . . . . . . . . . . . 17 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘))
9290, 91, 74rspcdva 2916 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → ((𝐴↑(𝑚 − 1)) < (𝐴𝑘) → (𝑚 − 1) < 𝑘))
9386, 92mpd 13 . . . . . . . . . . . . . . 15 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝑚 − 1) < 𝑘)
94 nnz 9542 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ ℕ → 𝑚 ∈ ℤ)
9594adantl 277 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℤ)
9670nn0zd 9644 . . . . . . . . . . . . . . . 16 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑘 ∈ ℤ)
97 zlem1lt 9580 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ℤ ∧ 𝑘 ∈ ℤ) → (𝑚𝑘 ↔ (𝑚 − 1) < 𝑘))
9895, 96, 97syl2anc 411 . . . . . . . . . . . . . . 15 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → (𝑚𝑘 ↔ (𝑚 − 1) < 𝑘))
9993, 98mpbird 167 . . . . . . . . . . . . . 14 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 ∈ ℕ) → 𝑚𝑘)
100 zleltp1 9579 . . . . . . . . . . . . . . 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 9473 . . . . . . . . . . . . . . 15 (𝑘 ∈ ℕ0 → 0 < (𝑘 + 1))
105104ad5antr 496 . . . . . . . . . . . . . 14 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 = 0) → 0 < (𝑘 + 1))
106103, 105eqbrtrd 4115 . . . . . . . . . . . . 13 ((((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) ∧ 𝑚 = 0) → 𝑚 < (𝑘 + 1))
107 simplr 529 . . . . . . . . . . . . . 14 (((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) → 𝑚 ∈ ℕ0)
108 elnn0 9446 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 ↔ (𝑚 ∈ ℕ ∨ 𝑚 = 0))
109107, 108sylib 122 . . . . . . . . . . . . 13 (((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) → (𝑚 ∈ ℕ ∨ 𝑚 = 0))
110102, 106, 109mpjaodan 806 . . . . . . . . . . . 12 (((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) ∧ (𝐴𝑚) < (𝐴↑(𝑘 + 1))) → 𝑚 < (𝑘 + 1))
111110ex 115 . . . . . . . . . . 11 ((((𝑘 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) ∧ ∀𝑝 ∈ ℕ0 ((𝐴𝑝) < (𝐴𝑘) → 𝑝 < 𝑘)) ∧ 𝑚 ∈ ℕ0) → ((𝐴𝑚) < (𝐴↑(𝑘 + 1)) → 𝑚 < (𝑘 + 1)))
112111ralrimiva 2606 . . . . . . . . . 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 9638 . . . . 5 (𝑁 ∈ ℕ0 → ((𝐴 ∈ ℝ ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁)))
118117imp 124 . . . 4 ((𝑁 ∈ ℕ0 ∧ (𝐴 ∈ ℝ ∧ 1 < 𝐴)) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁))
11915, 16, 17, 118syl12anc 1272 . . 3 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → ∀𝑚 ∈ ℕ0 ((𝐴𝑚) < (𝐴𝑁) → 𝑚 < 𝑁))
120 simpl2 1028 . . 3 (((𝐴 ∈ ℝ ∧ 𝑀 ∈ ℕ0𝑁 ∈ ℕ0) ∧ 1 < 𝐴) → 𝑀 ∈ ℕ0)
12114, 119, 120rspcdva 2916 . 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 716  w3a 1005   = wceq 1398  wcel 2202  wral 2511   class class class wbr 4093  (class class class)co 6028  cc 8073  cr 8074  0cc0 8075  1c1 8076   + caddc 8078   · cmul 8080   < clt 8256  cle 8257  cmin 8392  cn 9185  0cn0 9444  cz 9523  +crp 9932  cexp 10846
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 619  ax-in2 620  ax-io 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-13 2204  ax-14 2205  ax-ext 2213  ax-coll 4209  ax-sep 4212  ax-nul 4220  ax-pow 4270  ax-pr 4305  ax-un 4536  ax-setind 4641  ax-iinf 4692  ax-cnex 8166  ax-resscn 8167  ax-1cn 8168  ax-1re 8169  ax-icn 8170  ax-addcl 8171  ax-addrcl 8172  ax-mulcl 8173  ax-mulrcl 8174  ax-addcom 8175  ax-mulcom 8176  ax-addass 8177  ax-mulass 8178  ax-distr 8179  ax-i2m1 8180  ax-0lt1 8181  ax-1rid 8182  ax-0id 8183  ax-rnegex 8184  ax-precex 8185  ax-cnre 8186  ax-pre-ltirr 8187  ax-pre-ltwlin 8188  ax-pre-lttrn 8189  ax-pre-apti 8190  ax-pre-ltadd 8191  ax-pre-mulgt0 8192  ax-pre-mulext 8193
This theorem depends on definitions:  df-bi 117  df-dc 843  df-3or 1006  df-3an 1007  df-tru 1401  df-fal 1404  df-nf 1510  df-sb 1811  df-eu 2082  df-mo 2083  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2364  df-ne 2404  df-nel 2499  df-ral 2516  df-rex 2517  df-reu 2518  df-rmo 2519  df-rab 2520  df-v 2805  df-sbc 3033  df-csb 3129  df-dif 3203  df-un 3205  df-in 3207  df-ss 3214  df-nul 3497  df-if 3608  df-pw 3658  df-sn 3679  df-pr 3680  df-op 3682  df-uni 3899  df-int 3934  df-iun 3977  df-br 4094  df-opab 4156  df-mpt 4157  df-tr 4193  df-id 4396  df-po 4399  df-iso 4400  df-iord 4469  df-on 4471  df-ilim 4472  df-suc 4474  df-iom 4695  df-xp 4737  df-rel 4738  df-cnv 4739  df-co 4740  df-dm 4741  df-rn 4742  df-res 4743  df-ima 4744  df-iota 5293  df-fun 5335  df-fn 5336  df-f 5337  df-f1 5338  df-fo 5339  df-f1o 5340  df-fv 5341  df-riota 5981  df-ov 6031  df-oprab 6032  df-mpo 6033  df-1st 6312  df-2nd 6313  df-recs 6514  df-frec 6600  df-pnf 8258  df-mnf 8259  df-xr 8260  df-ltxr 8261  df-le 8262  df-sub 8394  df-neg 8395  df-reap 8797  df-ap 8804  df-div 8895  df-inn 9186  df-n0 9445  df-z 9524  df-uz 9800  df-rp 9933  df-seqfrec 10756  df-exp 10847
This theorem is referenced by:  nn0leexp2  11018  bitsfzolem  12578  bitsfzo  12579  isprm5  12777  pclemub  12923
  Copyright terms: Public domain W3C validator