MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  faclbnd4lem1 Structured version   Visualization version   GIF version

Theorem faclbnd4lem1 12897
Description: Lemma for faclbnd4 12901. Prepare the induction step. (Contributed by NM, 20-Dec-2005.)
Hypotheses
Ref Expression
faclbnd4lem1.1 𝑁 ∈ ℕ
faclbnd4lem1.2 𝐾 ∈ ℕ0
faclbnd4lem1.3 𝑀 ∈ ℕ0
Assertion
Ref Expression
faclbnd4lem1 ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) → ((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) ≤ (((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · (!‘𝑁)))

Proof of Theorem faclbnd4lem1
StepHypRef Expression
1 faclbnd4lem1.1 . . . 4 𝑁 ∈ ℕ
21nnrei 10876 . . 3 𝑁 ∈ ℝ
3 1re 9895 . . 3 1 ∈ ℝ
4 lelttric 9995 . . 3 ((𝑁 ∈ ℝ ∧ 1 ∈ ℝ) → (𝑁 ≤ 1 ∨ 1 < 𝑁))
52, 3, 4mp2an 703 . 2 (𝑁 ≤ 1 ∨ 1 < 𝑁)
6 nnge1 10893 . . . . . . 7 (𝑁 ∈ ℕ → 1 ≤ 𝑁)
71, 6ax-mp 5 . . . . . 6 1 ≤ 𝑁
82, 3letri3i 10004 . . . . . 6 (𝑁 = 1 ↔ (𝑁 ≤ 1 ∧ 1 ≤ 𝑁))
97, 8mpbiran2 955 . . . . 5 (𝑁 = 1 ↔ 𝑁 ≤ 1)
10 0le1 10400 . . . . . . . . . 10 0 ≤ 1
113, 10pm3.2i 469 . . . . . . . . 9 (1 ∈ ℝ ∧ 0 ≤ 1)
12 2re 10937 . . . . . . . . . 10 2 ∈ ℝ
13 faclbnd4lem1.2 . . . . . . . . . . . . 13 𝐾 ∈ ℕ0
14 1nn 10878 . . . . . . . . . . . . 13 1 ∈ ℕ
15 nn0nnaddcl 11171 . . . . . . . . . . . . 13 ((𝐾 ∈ ℕ0 ∧ 1 ∈ ℕ) → (𝐾 + 1) ∈ ℕ)
1613, 14, 15mp2an 703 . . . . . . . . . . . 12 (𝐾 + 1) ∈ ℕ
1716nnnn0i 11147 . . . . . . . . . . 11 (𝐾 + 1) ∈ ℕ0
18 2nn0 11156 . . . . . . . . . . 11 2 ∈ ℕ0
1917, 18nn0expcli 12703 . . . . . . . . . 10 ((𝐾 + 1)↑2) ∈ ℕ0
20 reexpcl 12694 . . . . . . . . . 10 ((2 ∈ ℝ ∧ ((𝐾 + 1)↑2) ∈ ℕ0) → (2↑((𝐾 + 1)↑2)) ∈ ℝ)
2112, 19, 20mp2an 703 . . . . . . . . 9 (2↑((𝐾 + 1)↑2)) ∈ ℝ
2211, 21pm3.2i 469 . . . . . . . 8 ((1 ∈ ℝ ∧ 0 ≤ 1) ∧ (2↑((𝐾 + 1)↑2)) ∈ ℝ)
23 faclbnd4lem1.3 . . . . . . . . . . 11 𝑀 ∈ ℕ0
2423nn0rei 11150 . . . . . . . . . 10 𝑀 ∈ ℝ
2523nn0ge0i 11167 . . . . . . . . . 10 0 ≤ 𝑀
2624, 25pm3.2i 469 . . . . . . . . 9 (𝑀 ∈ ℝ ∧ 0 ≤ 𝑀)
27 nn0nnaddcl 11171 . . . . . . . . . . . . 13 ((𝑀 ∈ ℕ0 ∧ (𝐾 + 1) ∈ ℕ) → (𝑀 + (𝐾 + 1)) ∈ ℕ)
2823, 16, 27mp2an 703 . . . . . . . . . . . 12 (𝑀 + (𝐾 + 1)) ∈ ℕ
2928nnnn0i 11147 . . . . . . . . . . 11 (𝑀 + (𝐾 + 1)) ∈ ℕ0
3023, 29nn0expcli 12703 . . . . . . . . . 10 (𝑀↑(𝑀 + (𝐾 + 1))) ∈ ℕ0
3130nn0rei 11150 . . . . . . . . 9 (𝑀↑(𝑀 + (𝐾 + 1))) ∈ ℝ
3226, 31pm3.2i 469 . . . . . . . 8 ((𝑀 ∈ ℝ ∧ 0 ≤ 𝑀) ∧ (𝑀↑(𝑀 + (𝐾 + 1))) ∈ ℝ)
3322, 32pm3.2i 469 . . . . . . 7 (((1 ∈ ℝ ∧ 0 ≤ 1) ∧ (2↑((𝐾 + 1)↑2)) ∈ ℝ) ∧ ((𝑀 ∈ ℝ ∧ 0 ≤ 𝑀) ∧ (𝑀↑(𝑀 + (𝐾 + 1))) ∈ ℝ))
34 2cn 10938 . . . . . . . . . 10 2 ∈ ℂ
35 exp0 12681 . . . . . . . . . 10 (2 ∈ ℂ → (2↑0) = 1)
3634, 35ax-mp 5 . . . . . . . . 9 (2↑0) = 1
37 1le2 11088 . . . . . . . . . 10 1 ≤ 2
38 nn0uz 11554 . . . . . . . . . . 11 0 = (ℤ‘0)
3919, 38eleqtri 2685 . . . . . . . . . 10 ((𝐾 + 1)↑2) ∈ (ℤ‘0)
40 leexp2a 12733 . . . . . . . . . 10 ((2 ∈ ℝ ∧ 1 ≤ 2 ∧ ((𝐾 + 1)↑2) ∈ (ℤ‘0)) → (2↑0) ≤ (2↑((𝐾 + 1)↑2)))
4112, 37, 39, 40mp3an 1415 . . . . . . . . 9 (2↑0) ≤ (2↑((𝐾 + 1)↑2))
4236, 41eqbrtrri 4600 . . . . . . . 8 1 ≤ (2↑((𝐾 + 1)↑2))
43 elnn0 11141 . . . . . . . . . 10 (𝑀 ∈ ℕ0 ↔ (𝑀 ∈ ℕ ∨ 𝑀 = 0))
44 nncn 10875 . . . . . . . . . . . . 13 (𝑀 ∈ ℕ → 𝑀 ∈ ℂ)
4544exp1d 12820 . . . . . . . . . . . 12 (𝑀 ∈ ℕ → (𝑀↑1) = 𝑀)
46 nnge1 10893 . . . . . . . . . . . . 13 (𝑀 ∈ ℕ → 1 ≤ 𝑀)
47 nnuz 11555 . . . . . . . . . . . . . . 15 ℕ = (ℤ‘1)
4828, 47eleqtri 2685 . . . . . . . . . . . . . 14 (𝑀 + (𝐾 + 1)) ∈ (ℤ‘1)
49 leexp2a 12733 . . . . . . . . . . . . . 14 ((𝑀 ∈ ℝ ∧ 1 ≤ 𝑀 ∧ (𝑀 + (𝐾 + 1)) ∈ (ℤ‘1)) → (𝑀↑1) ≤ (𝑀↑(𝑀 + (𝐾 + 1))))
5024, 48, 49mp3an13 1406 . . . . . . . . . . . . 13 (1 ≤ 𝑀 → (𝑀↑1) ≤ (𝑀↑(𝑀 + (𝐾 + 1))))
5146, 50syl 17 . . . . . . . . . . . 12 (𝑀 ∈ ℕ → (𝑀↑1) ≤ (𝑀↑(𝑀 + (𝐾 + 1))))
5245, 51eqbrtrrd 4601 . . . . . . . . . . 11 (𝑀 ∈ ℕ → 𝑀 ≤ (𝑀↑(𝑀 + (𝐾 + 1))))
5330nn0ge0i 11167 . . . . . . . . . . . 12 0 ≤ (𝑀↑(𝑀 + (𝐾 + 1)))
54 breq1 4580 . . . . . . . . . . . 12 (𝑀 = 0 → (𝑀 ≤ (𝑀↑(𝑀 + (𝐾 + 1))) ↔ 0 ≤ (𝑀↑(𝑀 + (𝐾 + 1)))))
5553, 54mpbiri 246 . . . . . . . . . . 11 (𝑀 = 0 → 𝑀 ≤ (𝑀↑(𝑀 + (𝐾 + 1))))
5652, 55jaoi 392 . . . . . . . . . 10 ((𝑀 ∈ ℕ ∨ 𝑀 = 0) → 𝑀 ≤ (𝑀↑(𝑀 + (𝐾 + 1))))
5743, 56sylbi 205 . . . . . . . . 9 (𝑀 ∈ ℕ0𝑀 ≤ (𝑀↑(𝑀 + (𝐾 + 1))))
5823, 57ax-mp 5 . . . . . . . 8 𝑀 ≤ (𝑀↑(𝑀 + (𝐾 + 1)))
5942, 58pm3.2i 469 . . . . . . 7 (1 ≤ (2↑((𝐾 + 1)↑2)) ∧ 𝑀 ≤ (𝑀↑(𝑀 + (𝐾 + 1))))
60 lemul12a 10730 . . . . . . 7 ((((1 ∈ ℝ ∧ 0 ≤ 1) ∧ (2↑((𝐾 + 1)↑2)) ∈ ℝ) ∧ ((𝑀 ∈ ℝ ∧ 0 ≤ 𝑀) ∧ (𝑀↑(𝑀 + (𝐾 + 1))) ∈ ℝ)) → ((1 ≤ (2↑((𝐾 + 1)↑2)) ∧ 𝑀 ≤ (𝑀↑(𝑀 + (𝐾 + 1)))) → (1 · 𝑀) ≤ ((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1))))))
6133, 59, 60mp2 9 . . . . . 6 (1 · 𝑀) ≤ ((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1))))
62 oveq1 6534 . . . . . . . . 9 (𝑁 = 1 → (𝑁↑(𝐾 + 1)) = (1↑(𝐾 + 1)))
6316nnzi 11234 . . . . . . . . . 10 (𝐾 + 1) ∈ ℤ
64 1exp 12706 . . . . . . . . . 10 ((𝐾 + 1) ∈ ℤ → (1↑(𝐾 + 1)) = 1)
6563, 64ax-mp 5 . . . . . . . . 9 (1↑(𝐾 + 1)) = 1
6662, 65syl6eq 2659 . . . . . . . 8 (𝑁 = 1 → (𝑁↑(𝐾 + 1)) = 1)
67 oveq2 6535 . . . . . . . . 9 (𝑁 = 1 → (𝑀𝑁) = (𝑀↑1))
6823nn0cni 11151 . . . . . . . . . 10 𝑀 ∈ ℂ
69 exp1 12683 . . . . . . . . . 10 (𝑀 ∈ ℂ → (𝑀↑1) = 𝑀)
7068, 69ax-mp 5 . . . . . . . . 9 (𝑀↑1) = 𝑀
7167, 70syl6eq 2659 . . . . . . . 8 (𝑁 = 1 → (𝑀𝑁) = 𝑀)
7266, 71oveq12d 6545 . . . . . . 7 (𝑁 = 1 → ((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) = (1 · 𝑀))
73 fveq2 6088 . . . . . . . . . 10 (𝑁 = 1 → (!‘𝑁) = (!‘1))
74 fac1 12881 . . . . . . . . . 10 (!‘1) = 1
7573, 74syl6eq 2659 . . . . . . . . 9 (𝑁 = 1 → (!‘𝑁) = 1)
7675oveq2d 6543 . . . . . . . 8 (𝑁 = 1 → (((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · (!‘𝑁)) = (((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · 1))
7721recni 9908 . . . . . . . . . 10 (2↑((𝐾 + 1)↑2)) ∈ ℂ
7830nn0cni 11151 . . . . . . . . . 10 (𝑀↑(𝑀 + (𝐾 + 1))) ∈ ℂ
7977, 78mulcli 9901 . . . . . . . . 9 ((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))) ∈ ℂ
8079mulid1i 9898 . . . . . . . 8 (((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · 1) = ((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1))))
8176, 80syl6eq 2659 . . . . . . 7 (𝑁 = 1 → (((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · (!‘𝑁)) = ((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))))
8272, 81breq12d 4590 . . . . . 6 (𝑁 = 1 → (((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) ≤ (((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · (!‘𝑁)) ↔ (1 · 𝑀) ≤ ((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1))))))
8361, 82mpbiri 246 . . . . 5 (𝑁 = 1 → ((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) ≤ (((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · (!‘𝑁)))
849, 83sylbir 223 . . . 4 (𝑁 ≤ 1 → ((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) ≤ (((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · (!‘𝑁)))
8584adantr 479 . . 3 ((𝑁 ≤ 1 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) ≤ (((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · (!‘𝑁)))
86 reexpcl 12694 . . . . . . . 8 ((𝑁 ∈ ℝ ∧ (𝐾 + 1) ∈ ℕ0) → (𝑁↑(𝐾 + 1)) ∈ ℝ)
872, 17, 86mp2an 703 . . . . . . 7 (𝑁↑(𝐾 + 1)) ∈ ℝ
881nnnn0i 11147 . . . . . . . 8 𝑁 ∈ ℕ0
89 reexpcl 12694 . . . . . . . 8 ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℕ0) → (𝑀𝑁) ∈ ℝ)
9024, 88, 89mp2an 703 . . . . . . 7 (𝑀𝑁) ∈ ℝ
9187, 90remulcli 9910 . . . . . 6 ((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) ∈ ℝ
9291a1i 11 . . . . 5 ((1 < 𝑁 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) ∈ ℝ)
9313, 18nn0expcli 12703 . . . . . . . . 9 (𝐾↑2) ∈ ℕ0
94 reexpcl 12694 . . . . . . . . 9 ((2 ∈ ℝ ∧ (𝐾↑2) ∈ ℕ0) → (2↑(𝐾↑2)) ∈ ℝ)
9512, 93, 94mp2an 703 . . . . . . . 8 (2↑(𝐾↑2)) ∈ ℝ
9618, 13nn0expcli 12703 . . . . . . . . 9 (2↑𝐾) ∈ ℕ0
9796nn0rei 11150 . . . . . . . 8 (2↑𝐾) ∈ ℝ
9895, 97remulcli 9910 . . . . . . 7 ((2↑(𝐾↑2)) · (2↑𝐾)) ∈ ℝ
99 faccl 12887 . . . . . . . . . . 11 (𝑁 ∈ ℕ0 → (!‘𝑁) ∈ ℕ)
10088, 99ax-mp 5 . . . . . . . . . 10 (!‘𝑁) ∈ ℕ
101100nnnn0i 11147 . . . . . . . . 9 (!‘𝑁) ∈ ℕ0
10230, 101nn0mulcli 11178 . . . . . . . 8 ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁)) ∈ ℕ0
103102nn0rei 11150 . . . . . . 7 ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁)) ∈ ℝ
10498, 103remulcli 9910 . . . . . 6 (((2↑(𝐾↑2)) · (2↑𝐾)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁))) ∈ ℝ
105104a1i 11 . . . . 5 ((1 < 𝑁 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → (((2↑(𝐾↑2)) · (2↑𝐾)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁))) ∈ ℝ)
10621, 103remulcli 9910 . . . . . 6 ((2↑((𝐾 + 1)↑2)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁))) ∈ ℝ
107106a1i 11 . . . . 5 ((1 < 𝑁 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((2↑((𝐾 + 1)↑2)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁))) ∈ ℝ)
1081nncni 10877 . . . . . . . . 9 𝑁 ∈ ℂ
109 expp1 12684 . . . . . . . . 9 ((𝑁 ∈ ℂ ∧ 𝐾 ∈ ℕ0) → (𝑁↑(𝐾 + 1)) = ((𝑁𝐾) · 𝑁))
110108, 13, 109mp2an 703 . . . . . . . 8 (𝑁↑(𝐾 + 1)) = ((𝑁𝐾) · 𝑁)
111 expm1t 12705 . . . . . . . . 9 ((𝑀 ∈ ℂ ∧ 𝑁 ∈ ℕ) → (𝑀𝑁) = ((𝑀↑(𝑁 − 1)) · 𝑀))
11268, 1, 111mp2an 703 . . . . . . . 8 (𝑀𝑁) = ((𝑀↑(𝑁 − 1)) · 𝑀)
113110, 112oveq12i 6539 . . . . . . 7 ((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) = (((𝑁𝐾) · 𝑁) · ((𝑀↑(𝑁 − 1)) · 𝑀))
114 reexpcl 12694 . . . . . . . . . 10 ((𝑁 ∈ ℝ ∧ 𝐾 ∈ ℕ0) → (𝑁𝐾) ∈ ℝ)
1152, 13, 114mp2an 703 . . . . . . . . 9 (𝑁𝐾) ∈ ℝ
116115recni 9908 . . . . . . . 8 (𝑁𝐾) ∈ ℂ
117 elnnnn0 11183 . . . . . . . . . . . . 13 (𝑁 ∈ ℕ ↔ (𝑁 ∈ ℂ ∧ (𝑁 − 1) ∈ ℕ0))
1181, 117mpbi 218 . . . . . . . . . . . 12 (𝑁 ∈ ℂ ∧ (𝑁 − 1) ∈ ℕ0)
119118simpri 476 . . . . . . . . . . 11 (𝑁 − 1) ∈ ℕ0
12023, 119nn0expcli 12703 . . . . . . . . . 10 (𝑀↑(𝑁 − 1)) ∈ ℕ0
121120, 23nn0mulcli 11178 . . . . . . . . 9 ((𝑀↑(𝑁 − 1)) · 𝑀) ∈ ℕ0
122121nn0cni 11151 . . . . . . . 8 ((𝑀↑(𝑁 − 1)) · 𝑀) ∈ ℂ
123116, 108, 122mulassi 9905 . . . . . . 7 (((𝑁𝐾) · 𝑁) · ((𝑀↑(𝑁 − 1)) · 𝑀)) = ((𝑁𝐾) · (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀)))
124113, 123eqtri 2631 . . . . . 6 ((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) = ((𝑁𝐾) · (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀)))
12588, 121nn0mulcli 11178 . . . . . . . . . . 11 (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀)) ∈ ℕ0
126125nn0rei 11150 . . . . . . . . . 10 (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀)) ∈ ℝ
127115, 126remulcli 9910 . . . . . . . . 9 ((𝑁𝐾) · (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀))) ∈ ℝ
128127a1i 11 . . . . . . . 8 ((1 < 𝑁 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((𝑁𝐾) · (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀))) ∈ ℝ)
129119nn0rei 11150 . . . . . . . . . . . 12 (𝑁 − 1) ∈ ℝ
130 reexpcl 12694 . . . . . . . . . . . 12 (((𝑁 − 1) ∈ ℝ ∧ 𝐾 ∈ ℕ0) → ((𝑁 − 1)↑𝐾) ∈ ℝ)
131129, 13, 130mp2an 703 . . . . . . . . . . 11 ((𝑁 − 1)↑𝐾) ∈ ℝ
132120nn0rei 11150 . . . . . . . . . . 11 (𝑀↑(𝑁 − 1)) ∈ ℝ
133131, 132remulcli 9910 . . . . . . . . . 10 (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ∈ ℝ
13496, 88nn0mulcli 11178 . . . . . . . . . . . 12 ((2↑𝐾) · 𝑁) ∈ ℕ0
135134, 23nn0mulcli 11178 . . . . . . . . . . 11 (((2↑𝐾) · 𝑁) · 𝑀) ∈ ℕ0
136135nn0rei 11150 . . . . . . . . . 10 (((2↑𝐾) · 𝑁) · 𝑀) ∈ ℝ
137133, 136remulcli 9910 . . . . . . . . 9 ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)) ∈ ℝ
138137a1i 11 . . . . . . . 8 ((1 < 𝑁 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)) ∈ ℝ)
13923, 13nn0addcli 11177 . . . . . . . . . . . . 13 (𝑀 + 𝐾) ∈ ℕ0
140 reexpcl 12694 . . . . . . . . . . . . 13 ((𝑀 ∈ ℝ ∧ (𝑀 + 𝐾) ∈ ℕ0) → (𝑀↑(𝑀 + 𝐾)) ∈ ℝ)
14124, 139, 140mp2an 703 . . . . . . . . . . . 12 (𝑀↑(𝑀 + 𝐾)) ∈ ℝ
14295, 141remulcli 9910 . . . . . . . . . . 11 ((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) ∈ ℝ
143 faccl 12887 . . . . . . . . . . . . 13 ((𝑁 − 1) ∈ ℕ0 → (!‘(𝑁 − 1)) ∈ ℕ)
144119, 143ax-mp 5 . . . . . . . . . . . 12 (!‘(𝑁 − 1)) ∈ ℕ
145144nnrei 10876 . . . . . . . . . . 11 (!‘(𝑁 − 1)) ∈ ℝ
146142, 145remulcli 9910 . . . . . . . . . 10 (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) ∈ ℝ
147146, 136remulcli 9910 . . . . . . . . 9 ((((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)) ∈ ℝ
148147a1i 11 . . . . . . . 8 ((1 < 𝑁 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)) ∈ ℝ)
14997, 131remulcli 9910 . . . . . . . . . . . 12 ((2↑𝐾) · ((𝑁 − 1)↑𝐾)) ∈ ℝ
150125nn0ge0i 11167 . . . . . . . . . . . . 13 0 ≤ (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀))
151126, 150pm3.2i 469 . . . . . . . . . . . 12 ((𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀)) ∈ ℝ ∧ 0 ≤ (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀)))
152115, 149, 1513pm3.2i 1231 . . . . . . . . . . 11 ((𝑁𝐾) ∈ ℝ ∧ ((2↑𝐾) · ((𝑁 − 1)↑𝐾)) ∈ ℝ ∧ ((𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀)) ∈ ℝ ∧ 0 ≤ (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀))))
153 nnltp1le 11266 . . . . . . . . . . . . . 14 ((1 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (1 < 𝑁 ↔ (1 + 1) ≤ 𝑁))
15414, 1, 153mp2an 703 . . . . . . . . . . . . 13 (1 < 𝑁 ↔ (1 + 1) ≤ 𝑁)
155 df-2 10926 . . . . . . . . . . . . . 14 2 = (1 + 1)
156155breq1i 4584 . . . . . . . . . . . . 13 (2 ≤ 𝑁 ↔ (1 + 1) ≤ 𝑁)
157154, 156bitr4i 265 . . . . . . . . . . . 12 (1 < 𝑁 ↔ 2 ≤ 𝑁)
158 expubnd 12738 . . . . . . . . . . . . 13 ((𝑁 ∈ ℝ ∧ 𝐾 ∈ ℕ0 ∧ 2 ≤ 𝑁) → (𝑁𝐾) ≤ ((2↑𝐾) · ((𝑁 − 1)↑𝐾)))
1592, 13, 158mp3an12 1405 . . . . . . . . . . . 12 (2 ≤ 𝑁 → (𝑁𝐾) ≤ ((2↑𝐾) · ((𝑁 − 1)↑𝐾)))
160157, 159sylbi 205 . . . . . . . . . . 11 (1 < 𝑁 → (𝑁𝐾) ≤ ((2↑𝐾) · ((𝑁 − 1)↑𝐾)))
161 lemul1a 10726 . . . . . . . . . . 11 ((((𝑁𝐾) ∈ ℝ ∧ ((2↑𝐾) · ((𝑁 − 1)↑𝐾)) ∈ ℝ ∧ ((𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀)) ∈ ℝ ∧ 0 ≤ (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀)))) ∧ (𝑁𝐾) ≤ ((2↑𝐾) · ((𝑁 − 1)↑𝐾))) → ((𝑁𝐾) · (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀))) ≤ (((2↑𝐾) · ((𝑁 − 1)↑𝐾)) · (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀))))
162152, 160, 161sylancr 693 . . . . . . . . . 10 (1 < 𝑁 → ((𝑁𝐾) · (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀))) ≤ (((2↑𝐾) · ((𝑁 − 1)↑𝐾)) · (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀))))
16396nn0cni 11151 . . . . . . . . . . . 12 (2↑𝐾) ∈ ℂ
164131recni 9908 . . . . . . . . . . . 12 ((𝑁 − 1)↑𝐾) ∈ ℂ
165163, 164, 108, 122mul4i 10084 . . . . . . . . . . 11 (((2↑𝐾) · ((𝑁 − 1)↑𝐾)) · (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀))) = (((2↑𝐾) · 𝑁) · (((𝑁 − 1)↑𝐾) · ((𝑀↑(𝑁 − 1)) · 𝑀)))
166120nn0cni 11151 . . . . . . . . . . . . 13 (𝑀↑(𝑁 − 1)) ∈ ℂ
167164, 166, 68mulassi 9905 . . . . . . . . . . . 12 ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) · 𝑀) = (((𝑁 − 1)↑𝐾) · ((𝑀↑(𝑁 − 1)) · 𝑀))
168167oveq2i 6538 . . . . . . . . . . 11 (((2↑𝐾) · 𝑁) · ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) · 𝑀)) = (((2↑𝐾) · 𝑁) · (((𝑁 − 1)↑𝐾) · ((𝑀↑(𝑁 − 1)) · 𝑀)))
169134nn0cni 11151 . . . . . . . . . . . 12 ((2↑𝐾) · 𝑁) ∈ ℂ
170133recni 9908 . . . . . . . . . . . 12 (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ∈ ℂ
171169, 170, 68mul12i 10082 . . . . . . . . . . 11 (((2↑𝐾) · 𝑁) · ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) · 𝑀)) = ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀))
172165, 168, 1713eqtr2i 2637 . . . . . . . . . 10 (((2↑𝐾) · ((𝑁 − 1)↑𝐾)) · (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀))) = ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀))
173162, 172syl6breq 4618 . . . . . . . . 9 (1 < 𝑁 → ((𝑁𝐾) · (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀))) ≤ ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)))
174173adantr 479 . . . . . . . 8 ((1 < 𝑁 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((𝑁𝐾) · (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀))) ≤ ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)))
175135nn0ge0i 11167 . . . . . . . . . . . 12 0 ≤ (((2↑𝐾) · 𝑁) · 𝑀)
176136, 175pm3.2i 469 . . . . . . . . . . 11 ((((2↑𝐾) · 𝑁) · 𝑀) ∈ ℝ ∧ 0 ≤ (((2↑𝐾) · 𝑁) · 𝑀))
177133, 146, 1763pm3.2i 1231 . . . . . . . . . 10 ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ∈ ℝ ∧ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) ∈ ℝ ∧ ((((2↑𝐾) · 𝑁) · 𝑀) ∈ ℝ ∧ 0 ≤ (((2↑𝐾) · 𝑁) · 𝑀)))
178 lemul1a 10726 . . . . . . . . . 10 ((((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ∈ ℝ ∧ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) ∈ ℝ ∧ ((((2↑𝐾) · 𝑁) · 𝑀) ∈ ℝ ∧ 0 ≤ (((2↑𝐾) · 𝑁) · 𝑀))) ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)) ≤ ((((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)))
179177, 178mpan 701 . . . . . . . . 9 ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) → ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)) ≤ ((((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)))
180179adantl 480 . . . . . . . 8 ((1 < 𝑁 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)) ≤ ((((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)))
181128, 138, 148, 174, 180letrd 10045 . . . . . . 7 ((1 < 𝑁 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((𝑁𝐾) · (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀))) ≤ ((((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)))
182163, 108, 68mul32i 10083 . . . . . . . . 9 (((2↑𝐾) · 𝑁) · 𝑀) = (((2↑𝐾) · 𝑀) · 𝑁)
183182oveq2i 6538 . . . . . . . 8 ((((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)) = ((((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) · (((2↑𝐾) · 𝑀) · 𝑁))
184 expp1 12684 . . . . . . . . . . . . . 14 ((𝑀 ∈ ℂ ∧ (𝑀 + 𝐾) ∈ ℕ0) → (𝑀↑((𝑀 + 𝐾) + 1)) = ((𝑀↑(𝑀 + 𝐾)) · 𝑀))
18568, 139, 184mp2an 703 . . . . . . . . . . . . 13 (𝑀↑((𝑀 + 𝐾) + 1)) = ((𝑀↑(𝑀 + 𝐾)) · 𝑀)
18613nn0cni 11151 . . . . . . . . . . . . . . 15 𝐾 ∈ ℂ
187 ax-1cn 9850 . . . . . . . . . . . . . . 15 1 ∈ ℂ
18868, 186, 187addassi 9904 . . . . . . . . . . . . . 14 ((𝑀 + 𝐾) + 1) = (𝑀 + (𝐾 + 1))
189188oveq2i 6538 . . . . . . . . . . . . 13 (𝑀↑((𝑀 + 𝐾) + 1)) = (𝑀↑(𝑀 + (𝐾 + 1)))
190185, 189eqtr3i 2633 . . . . . . . . . . . 12 ((𝑀↑(𝑀 + 𝐾)) · 𝑀) = (𝑀↑(𝑀 + (𝐾 + 1)))
191190oveq2i 6538 . . . . . . . . . . 11 (((2↑(𝐾↑2)) · (2↑𝐾)) · ((𝑀↑(𝑀 + 𝐾)) · 𝑀)) = (((2↑(𝐾↑2)) · (2↑𝐾)) · (𝑀↑(𝑀 + (𝐾 + 1))))
19295recni 9908 . . . . . . . . . . . 12 (2↑(𝐾↑2)) ∈ ℂ
193141recni 9908 . . . . . . . . . . . 12 (𝑀↑(𝑀 + 𝐾)) ∈ ℂ
194192, 163, 193, 68mul4i 10084 . . . . . . . . . . 11 (((2↑(𝐾↑2)) · (2↑𝐾)) · ((𝑀↑(𝑀 + 𝐾)) · 𝑀)) = (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · ((2↑𝐾) · 𝑀))
195191, 194eqtr3i 2633 . . . . . . . . . 10 (((2↑(𝐾↑2)) · (2↑𝐾)) · (𝑀↑(𝑀 + (𝐾 + 1)))) = (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · ((2↑𝐾) · 𝑀))
196 facnn2 12886 . . . . . . . . . . 11 (𝑁 ∈ ℕ → (!‘𝑁) = ((!‘(𝑁 − 1)) · 𝑁))
1971, 196ax-mp 5 . . . . . . . . . 10 (!‘𝑁) = ((!‘(𝑁 − 1)) · 𝑁)
198195, 197oveq12i 6539 . . . . . . . . 9 ((((2↑(𝐾↑2)) · (2↑𝐾)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · (!‘𝑁)) = ((((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · ((2↑𝐾) · 𝑀)) · ((!‘(𝑁 − 1)) · 𝑁))
199142recni 9908 . . . . . . . . . 10 ((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) ∈ ℂ
200144nncni 10877 . . . . . . . . . 10 (!‘(𝑁 − 1)) ∈ ℂ
201163, 68mulcli 9901 . . . . . . . . . 10 ((2↑𝐾) · 𝑀) ∈ ℂ
202199, 200, 201, 108mul4i 10084 . . . . . . . . 9 ((((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) · (((2↑𝐾) · 𝑀) · 𝑁)) = ((((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · ((2↑𝐾) · 𝑀)) · ((!‘(𝑁 − 1)) · 𝑁))
203198, 202eqtr4i 2634 . . . . . . . 8 ((((2↑(𝐾↑2)) · (2↑𝐾)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · (!‘𝑁)) = ((((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) · (((2↑𝐾) · 𝑀) · 𝑁))
20498recni 9908 . . . . . . . . 9 ((2↑(𝐾↑2)) · (2↑𝐾)) ∈ ℂ
205100nncni 10877 . . . . . . . . 9 (!‘𝑁) ∈ ℂ
206204, 78, 205mulassi 9905 . . . . . . . 8 ((((2↑(𝐾↑2)) · (2↑𝐾)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · (!‘𝑁)) = (((2↑(𝐾↑2)) · (2↑𝐾)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁)))
207183, 203, 2063eqtr2i 2637 . . . . . . 7 ((((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) · (((2↑𝐾) · 𝑁) · 𝑀)) = (((2↑(𝐾↑2)) · (2↑𝐾)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁)))
208181, 207syl6breq 4618 . . . . . 6 ((1 < 𝑁 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((𝑁𝐾) · (𝑁 · ((𝑀↑(𝑁 − 1)) · 𝑀))) ≤ (((2↑(𝐾↑2)) · (2↑𝐾)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁))))
209124, 208syl5eqbr 4612 . . . . 5 ((1 < 𝑁 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) ≤ (((2↑(𝐾↑2)) · (2↑𝐾)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁))))
210102nn0ge0i 11167 . . . . . . . . 9 0 ≤ ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁))
211103, 210pm3.2i 469 . . . . . . . 8 (((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁)) ∈ ℝ ∧ 0 ≤ ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁)))
21298, 21, 2113pm3.2i 1231 . . . . . . 7 (((2↑(𝐾↑2)) · (2↑𝐾)) ∈ ℝ ∧ (2↑((𝐾 + 1)↑2)) ∈ ℝ ∧ (((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁)) ∈ ℝ ∧ 0 ≤ ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁))))
213 expadd 12719 . . . . . . . . 9 ((2 ∈ ℂ ∧ (𝐾↑2) ∈ ℕ0𝐾 ∈ ℕ0) → (2↑((𝐾↑2) + 𝐾)) = ((2↑(𝐾↑2)) · (2↑𝐾)))
21434, 93, 13, 213mp3an 1415 . . . . . . . 8 (2↑((𝐾↑2) + 𝐾)) = ((2↑(𝐾↑2)) · (2↑𝐾))
21519nn0zi 11235 . . . . . . . . . 10 ((𝐾 + 1)↑2) ∈ ℤ
21613nn0rei 11150 . . . . . . . . . . . . 13 𝐾 ∈ ℝ
21716nnrei 10876 . . . . . . . . . . . . 13 (𝐾 + 1) ∈ ℝ
21817nn0ge0i 11167 . . . . . . . . . . . . . 14 0 ≤ (𝐾 + 1)
219217, 218pm3.2i 469 . . . . . . . . . . . . 13 ((𝐾 + 1) ∈ ℝ ∧ 0 ≤ (𝐾 + 1))
220216, 217, 2193pm3.2i 1231 . . . . . . . . . . . 12 (𝐾 ∈ ℝ ∧ (𝐾 + 1) ∈ ℝ ∧ ((𝐾 + 1) ∈ ℝ ∧ 0 ≤ (𝐾 + 1)))
221216ltp1i 10776 . . . . . . . . . . . . 13 𝐾 < (𝐾 + 1)
222216, 217, 221ltleii 10011 . . . . . . . . . . . 12 𝐾 ≤ (𝐾 + 1)
223 lemul1a 10726 . . . . . . . . . . . 12 (((𝐾 ∈ ℝ ∧ (𝐾 + 1) ∈ ℝ ∧ ((𝐾 + 1) ∈ ℝ ∧ 0 ≤ (𝐾 + 1))) ∧ 𝐾 ≤ (𝐾 + 1)) → (𝐾 · (𝐾 + 1)) ≤ ((𝐾 + 1) · (𝐾 + 1)))
224220, 222, 223mp2an 703 . . . . . . . . . . 11 (𝐾 · (𝐾 + 1)) ≤ ((𝐾 + 1) · (𝐾 + 1))
225186sqvali 12760 . . . . . . . . . . . . 13 (𝐾↑2) = (𝐾 · 𝐾)
226186mulid1i 9898 . . . . . . . . . . . . . 14 (𝐾 · 1) = 𝐾
227226eqcomi 2618 . . . . . . . . . . . . 13 𝐾 = (𝐾 · 1)
228225, 227oveq12i 6539 . . . . . . . . . . . 12 ((𝐾↑2) + 𝐾) = ((𝐾 · 𝐾) + (𝐾 · 1))
229186, 186, 187adddii 9906 . . . . . . . . . . . 12 (𝐾 · (𝐾 + 1)) = ((𝐾 · 𝐾) + (𝐾 · 1))
230228, 229eqtr4i 2634 . . . . . . . . . . 11 ((𝐾↑2) + 𝐾) = (𝐾 · (𝐾 + 1))
23116nncni 10877 . . . . . . . . . . . 12 (𝐾 + 1) ∈ ℂ
232231sqvali 12760 . . . . . . . . . . 11 ((𝐾 + 1)↑2) = ((𝐾 + 1) · (𝐾 + 1))
233224, 230, 2323brtr4i 4607 . . . . . . . . . 10 ((𝐾↑2) + 𝐾) ≤ ((𝐾 + 1)↑2)
23493, 13nn0addcli 11177 . . . . . . . . . . . 12 ((𝐾↑2) + 𝐾) ∈ ℕ0
235234nn0zi 11235 . . . . . . . . . . 11 ((𝐾↑2) + 𝐾) ∈ ℤ
236235eluz1i 11527 . . . . . . . . . 10 (((𝐾 + 1)↑2) ∈ (ℤ‘((𝐾↑2) + 𝐾)) ↔ (((𝐾 + 1)↑2) ∈ ℤ ∧ ((𝐾↑2) + 𝐾) ≤ ((𝐾 + 1)↑2)))
237215, 233, 236mpbir2an 956 . . . . . . . . 9 ((𝐾 + 1)↑2) ∈ (ℤ‘((𝐾↑2) + 𝐾))
238 leexp2a 12733 . . . . . . . . 9 ((2 ∈ ℝ ∧ 1 ≤ 2 ∧ ((𝐾 + 1)↑2) ∈ (ℤ‘((𝐾↑2) + 𝐾))) → (2↑((𝐾↑2) + 𝐾)) ≤ (2↑((𝐾 + 1)↑2)))
23912, 37, 237, 238mp3an 1415 . . . . . . . 8 (2↑((𝐾↑2) + 𝐾)) ≤ (2↑((𝐾 + 1)↑2))
240214, 239eqbrtrri 4600 . . . . . . 7 ((2↑(𝐾↑2)) · (2↑𝐾)) ≤ (2↑((𝐾 + 1)↑2))
241 lemul1a 10726 . . . . . . 7 (((((2↑(𝐾↑2)) · (2↑𝐾)) ∈ ℝ ∧ (2↑((𝐾 + 1)↑2)) ∈ ℝ ∧ (((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁)) ∈ ℝ ∧ 0 ≤ ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁)))) ∧ ((2↑(𝐾↑2)) · (2↑𝐾)) ≤ (2↑((𝐾 + 1)↑2))) → (((2↑(𝐾↑2)) · (2↑𝐾)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁))) ≤ ((2↑((𝐾 + 1)↑2)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁))))
242212, 240, 241mp2an 703 . . . . . 6 (((2↑(𝐾↑2)) · (2↑𝐾)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁))) ≤ ((2↑((𝐾 + 1)↑2)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁)))
243242a1i 11 . . . . 5 ((1 < 𝑁 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → (((2↑(𝐾↑2)) · (2↑𝐾)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁))) ≤ ((2↑((𝐾 + 1)↑2)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁))))
24492, 105, 107, 209, 243letrd 10045 . . . 4 ((1 < 𝑁 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) ≤ ((2↑((𝐾 + 1)↑2)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁))))
24577, 78, 205mulassi 9905 . . . 4 (((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · (!‘𝑁)) = ((2↑((𝐾 + 1)↑2)) · ((𝑀↑(𝑀 + (𝐾 + 1))) · (!‘𝑁)))
246244, 245syl6breqr 4619 . . 3 ((1 < 𝑁 ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) ≤ (((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · (!‘𝑁)))
24785, 246jaoian 819 . 2 (((𝑁 ≤ 1 ∨ 1 < 𝑁) ∧ (((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1)))) → ((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) ≤ (((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · (!‘𝑁)))
2485, 247mpan 701 1 ((((𝑁 − 1)↑𝐾) · (𝑀↑(𝑁 − 1))) ≤ (((2↑(𝐾↑2)) · (𝑀↑(𝑀 + 𝐾))) · (!‘(𝑁 − 1))) → ((𝑁↑(𝐾 + 1)) · (𝑀𝑁)) ≤ (((2↑((𝐾 + 1)↑2)) · (𝑀↑(𝑀 + (𝐾 + 1)))) · (!‘𝑁)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 194  wo 381  wa 382  w3a 1030   = wceq 1474  wcel 1976   class class class wbr 4577  cfv 5790  (class class class)co 6527  cc 9790  cr 9791  0cc0 9792  1c1 9793   + caddc 9795   · cmul 9797   < clt 9930  cle 9931  cmin 10117  cn 10867  2c2 10917  0cn0 11139  cz 11210  cuz 11519  cexp 12677  !cfa 12877
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1712  ax-4 1727  ax-5 1826  ax-6 1874  ax-7 1921  ax-8 1978  ax-9 1985  ax-10 2005  ax-11 2020  ax-12 2033  ax-13 2233  ax-ext 2589  ax-sep 4703  ax-nul 4712  ax-pow 4764  ax-pr 4828  ax-un 6824  ax-cnex 9848  ax-resscn 9849  ax-1cn 9850  ax-icn 9851  ax-addcl 9852  ax-addrcl 9853  ax-mulcl 9854  ax-mulrcl 9855  ax-mulcom 9856  ax-addass 9857  ax-mulass 9858  ax-distr 9859  ax-i2m1 9860  ax-1ne0 9861  ax-1rid 9862  ax-rnegex 9863  ax-rrecex 9864  ax-cnre 9865  ax-pre-lttri 9866  ax-pre-lttrn 9867  ax-pre-ltadd 9868  ax-pre-mulgt0 9869
This theorem depends on definitions:  df-bi 195  df-or 383  df-an 384  df-3or 1031  df-3an 1032  df-tru 1477  df-ex 1695  df-nf 1700  df-sb 1867  df-eu 2461  df-mo 2462  df-clab 2596  df-cleq 2602  df-clel 2605  df-nfc 2739  df-ne 2781  df-nel 2782  df-ral 2900  df-rex 2901  df-reu 2902  df-rmo 2903  df-rab 2904  df-v 3174  df-sbc 3402  df-csb 3499  df-dif 3542  df-un 3544  df-in 3546  df-ss 3553  df-pss 3555  df-nul 3874  df-if 4036  df-pw 4109  df-sn 4125  df-pr 4127  df-tp 4129  df-op 4131  df-uni 4367  df-iun 4451  df-br 4578  df-opab 4638  df-mpt 4639  df-tr 4675  df-eprel 4939  df-id 4943  df-po 4949  df-so 4950  df-fr 4987  df-we 4989  df-xp 5034  df-rel 5035  df-cnv 5036  df-co 5037  df-dm 5038  df-rn 5039  df-res 5040  df-ima 5041  df-pred 5583  df-ord 5629  df-on 5630  df-lim 5631  df-suc 5632  df-iota 5754  df-fun 5792  df-fn 5793  df-f 5794  df-f1 5795  df-fo 5796  df-f1o 5797  df-fv 5798  df-riota 6489  df-ov 6530  df-oprab 6531  df-mpt2 6532  df-om 6935  df-2nd 7037  df-wrecs 7271  df-recs 7332  df-rdg 7370  df-er 7606  df-en 7819  df-dom 7820  df-sdom 7821  df-pnf 9932  df-mnf 9933  df-xr 9934  df-ltxr 9935  df-le 9936  df-sub 10119  df-neg 10120  df-div 10534  df-nn 10868  df-2 10926  df-n0 11140  df-z 11211  df-uz 11520  df-rp 11665  df-seq 12619  df-exp 12678  df-fac 12878
This theorem is referenced by:  faclbnd4lem2  12898
  Copyright terms: Public domain W3C validator