Theorem lcmineqlem22 42627

Description: The lcm inequality lemma without base cases 7 and 8. (Contributed by metakunt, 12-May-2024.)

Hypotheses

Ref	Expression
lcmineqlem22.1	⊢ (𝜑 → 𝑁 ∈ ℕ)
lcmineqlem22.2	⊢ (𝜑 → 4 ≤ 𝑁)

Assertion

Ref	Expression
lcmineqlem22	⊢ (𝜑 → ((2↑((2 · 𝑁) + 1)) ≤ (lcm‘(1...((2 · 𝑁) + 1))) ∧ (2↑((2 · 𝑁) + 2)) ≤ (lcm‘(1...((2 · 𝑁) + 2)))))

Proof of Theorem lcmineqlem22

Step	Hyp	Ref	Expression
1		2re 12285	. . . . 5 ⊢ 2 ∈ ℝ
2	1	a1i 11	. . . 4 ⊢ (𝜑 → 2 ∈ ℝ)
3		2nn0 12491	. . . . . . 7 ⊢ 2 ∈ ℕ0
4	3	a1i 11	. . . . . 6 ⊢ (𝜑 → 2 ∈ ℕ0)
5		lcmineqlem22.1	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ ℕ)
6	5	nnnn0d 12535	. . . . . 6 ⊢ (𝜑 → 𝑁 ∈ ℕ0)
7	4, 6	nn0mulcld 12540	. . . . 5 ⊢ (𝜑 → (2 · 𝑁) ∈ ℕ0)
8		1nn0 12490	. . . . . 6 ⊢ 1 ∈ ℕ0
9	8	a1i 11	. . . . 5 ⊢ (𝜑 → 1 ∈ ℕ0)
10	7, 9	nn0addcld 12539	. . . 4 ⊢ (𝜑 → ((2 · 𝑁) + 1) ∈ ℕ0)
11	2, 10	reexpcld 14169	. . 3 ⊢ (𝜑 → (2↑((2 · 𝑁) + 1)) ∈ ℝ)
12	7, 4	nn0addcld 12539	. . . 4 ⊢ (𝜑 → ((2 · 𝑁) + 2) ∈ ℕ0)
13	2, 12	reexpcld 14169	. . 3 ⊢ (𝜑 → (2↑((2 · 𝑁) + 2)) ∈ ℝ)
14		fz1ssnn 13553	. . . . . 6 ⊢ (1...((2 · 𝑁) + 1)) ⊆ ℕ
15		fzfi 13978	. . . . . 6 ⊢ (1...((2 · 𝑁) + 1)) ∈ Fin
16		lcmfnncl 16653	. . . . . 6 ⊢ (((1...((2 · 𝑁) + 1)) ⊆ ℕ ∧ (1...((2 · 𝑁) + 1)) ∈ Fin) → (lcm‘(1...((2 · 𝑁) + 1))) ∈ ℕ)
17	14, 15, 16	mp2an 702	. . . . 5 ⊢ (lcm‘(1...((2 · 𝑁) + 1))) ∈ ℕ
18	17	a1i 11	. . . 4 ⊢ (𝜑 → (lcm‘(1...((2 · 𝑁) + 1))) ∈ ℕ)
19	18	nnred 12218	. . 3 ⊢ (𝜑 → (lcm‘(1...((2 · 𝑁) + 1))) ∈ ℝ)
20		1red 11175	. . . . 5 ⊢ (𝜑 → 1 ∈ ℝ)
21	5	nnred 12218	. . . . . 6 ⊢ (𝜑 → 𝑁 ∈ ℝ)
22	2, 21	remulcld 11205	. . . . 5 ⊢ (𝜑 → (2 · 𝑁) ∈ ℝ)
23		1lt2 12383	. . . . . . 7 ⊢ 1 < 2
24	23	a1i 11	. . . . . 6 ⊢ (𝜑 → 1 < 2)
25	20, 2, 24	ltled 11324	. . . . 5 ⊢ (𝜑 → 1 ≤ 2)
26	20, 2, 22, 25	leadd2dd 11795	. . . 4 ⊢ (𝜑 → ((2 · 𝑁) + 1) ≤ ((2 · 𝑁) + 2))
27		2z 12596	. . . . . . . 8 ⊢ 2 ∈ ℤ
28	27	a1i 11	. . . . . . 7 ⊢ (𝜑 → 2 ∈ ℤ)
29	5	nnzd 12587	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ ℤ)
30	28, 29	zmulcld 12676	. . . . . 6 ⊢ (𝜑 → (2 · 𝑁) ∈ ℤ)
31	30	peano2zd 12673	. . . . 5 ⊢ (𝜑 → ((2 · 𝑁) + 1) ∈ ℤ)
32	30, 28	zaddcld 12674	. . . . 5 ⊢ (𝜑 → ((2 · 𝑁) + 2) ∈ ℤ)
33	2, 31, 32, 24	leexp2d 14258	. . . 4 ⊢ (𝜑 → (((2 · 𝑁) + 1) ≤ ((2 · 𝑁) + 2) ↔ (2↑((2 · 𝑁) + 1)) ≤ (2↑((2 · 𝑁) + 2))))
34	26, 33	mpbid 234	. . 3 ⊢ (𝜑 → (2↑((2 · 𝑁) + 1)) ≤ (2↑((2 · 𝑁) + 2)))
35		lcmineqlem22.2	. . . 4 ⊢ (𝜑 → 4 ≤ 𝑁)
36	5, 35	lcmineqlem21 42626	. . 3 ⊢ (𝜑 → (2↑((2 · 𝑁) + 2)) ≤ (lcm‘(1...((2 · 𝑁) + 1))))
37	11, 13, 19, 34, 36	letrd 11333	. 2 ⊢ (𝜑 → (2↑((2 · 𝑁) + 1)) ≤ (lcm‘(1...((2 · 𝑁) + 1))))
38		fz1ssnn 13553	. . . . . 6 ⊢ (1...((2 · 𝑁) + 2)) ⊆ ℕ
39		fzfi 13978	. . . . . 6 ⊢ (1...((2 · 𝑁) + 2)) ∈ Fin
40		lcmfnncl 16653	. . . . . 6 ⊢ (((1...((2 · 𝑁) + 2)) ⊆ ℕ ∧ (1...((2 · 𝑁) + 2)) ∈ Fin) → (lcm‘(1...((2 · 𝑁) + 2))) ∈ ℕ)
41	38, 39, 40	mp2an 702	. . . . 5 ⊢ (lcm‘(1...((2 · 𝑁) + 2))) ∈ ℕ
42	41	a1i 11	. . . 4 ⊢ (𝜑 → (lcm‘(1...((2 · 𝑁) + 2))) ∈ ℕ)
43	42	nnred 12218	. . 3 ⊢ (𝜑 → (lcm‘(1...((2 · 𝑁) + 2))) ∈ ℝ)
44	18	nnzd 12587	. . . . . . . 8 ⊢ (𝜑 → (lcm‘(1...((2 · 𝑁) + 1))) ∈ ℤ)
45	44, 32	jca 519	. . . . . . 7 ⊢ (𝜑 → ((lcm‘(1...((2 · 𝑁) + 1))) ∈ ℤ ∧ ((2 · 𝑁) + 2) ∈ ℤ))
46		dvdslcm 16622	. . . . . . 7 ⊢ (((lcm‘(1...((2 · 𝑁) + 1))) ∈ ℤ ∧ ((2 · 𝑁) + 2) ∈ ℤ) → ((lcm‘(1...((2 · 𝑁) + 1))) ∥ ((lcm‘(1...((2 · 𝑁) + 1))) lcm ((2 · 𝑁) + 2)) ∧ ((2 · 𝑁) + 2) ∥ ((lcm‘(1...((2 · 𝑁) + 1))) lcm ((2 · 𝑁) + 2))))
47	45, 46	syl 17	. . . . . 6 ⊢ (𝜑 → ((lcm‘(1...((2 · 𝑁) + 1))) ∥ ((lcm‘(1...((2 · 𝑁) + 1))) lcm ((2 · 𝑁) + 2)) ∧ ((2 · 𝑁) + 2) ∥ ((lcm‘(1...((2 · 𝑁) + 1))) lcm ((2 · 𝑁) + 2))))
48	47	simpld 498	. . . . 5 ⊢ (𝜑 → (lcm‘(1...((2 · 𝑁) + 1))) ∥ ((lcm‘(1...((2 · 𝑁) + 1))) lcm ((2 · 𝑁) + 2)))
49		2nn 12284	. . . . . . . . . 10 ⊢ 2 ∈ ℕ
50	49	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 2 ∈ ℕ)
51	50, 5	nnmulcld 12259	. . . . . . . 8 ⊢ (𝜑 → (2 · 𝑁) ∈ ℕ)
52	51, 50	nnaddcld 12258	. . . . . . 7 ⊢ (𝜑 → ((2 · 𝑁) + 2) ∈ ℕ)
53	52	lcmfunnnd 42589	. . . . . 6 ⊢ (𝜑 → (lcm‘(1...((2 · 𝑁) + 2))) = ((lcm‘(1...(((2 · 𝑁) + 2) − 1))) lcm ((2 · 𝑁) + 2)))
54	22	recnd 11203	. . . . . . . . . . 11 ⊢ (𝜑 → (2 · 𝑁) ∈ ℂ)
55	2	recnd 11203	. . . . . . . . . . 11 ⊢ (𝜑 → 2 ∈ ℂ)
56		1cnd 11168	. . . . . . . . . . 11 ⊢ (𝜑 → 1 ∈ ℂ)
57	54, 55, 56	addsubassd 11555	. . . . . . . . . 10 ⊢ (𝜑 → (((2 · 𝑁) + 2) − 1) = ((2 · 𝑁) + (2 − 1)))
58		2m1e1 12335	. . . . . . . . . . 11 ⊢ (2 − 1) = 1
59	58	oveq2i 7401	. . . . . . . . . 10 ⊢ ((2 · 𝑁) + (2 − 1)) = ((2 · 𝑁) + 1)
60	57, 59	eqtrdi 2812	. . . . . . . . 9 ⊢ (𝜑 → (((2 · 𝑁) + 2) − 1) = ((2 · 𝑁) + 1))
61	60	oveq2d 7406	. . . . . . . 8 ⊢ (𝜑 → (1...(((2 · 𝑁) + 2) − 1)) = (1...((2 · 𝑁) + 1)))
62	61	fveq2d 6865	. . . . . . 7 ⊢ (𝜑 → (lcm‘(1...(((2 · 𝑁) + 2) − 1))) = (lcm‘(1...((2 · 𝑁) + 1))))
63	62	oveq1d 7405	. . . . . 6 ⊢ (𝜑 → ((lcm‘(1...(((2 · 𝑁) + 2) − 1))) lcm ((2 · 𝑁) + 2)) = ((lcm‘(1...((2 · 𝑁) + 1))) lcm ((2 · 𝑁) + 2)))
64	53, 63	eqtrd 2796	. . . . 5 ⊢ (𝜑 → (lcm‘(1...((2 · 𝑁) + 2))) = ((lcm‘(1...((2 · 𝑁) + 1))) lcm ((2 · 𝑁) + 2)))
65	48, 64	breqtrrd 5125	. . . 4 ⊢ (𝜑 → (lcm‘(1...((2 · 𝑁) + 1))) ∥ (lcm‘(1...((2 · 𝑁) + 2))))
66	44, 42	jca 519	. . . . 5 ⊢ (𝜑 → ((lcm‘(1...((2 · 𝑁) + 1))) ∈ ℤ ∧ (lcm‘(1...((2 · 𝑁) + 2))) ∈ ℕ))
67		dvdsle 16334	. . . . 5 ⊢ (((lcm‘(1...((2 · 𝑁) + 1))) ∈ ℤ ∧ (lcm‘(1...((2 · 𝑁) + 2))) ∈ ℕ) → ((lcm‘(1...((2 · 𝑁) + 1))) ∥ (lcm‘(1...((2 · 𝑁) + 2))) → (lcm‘(1...((2 · 𝑁) + 1))) ≤ (lcm‘(1...((2 · 𝑁) + 2)))))
68	66, 67	syl 17	. . . 4 ⊢ (𝜑 → ((lcm‘(1...((2 · 𝑁) + 1))) ∥ (lcm‘(1...((2 · 𝑁) + 2))) → (lcm‘(1...((2 · 𝑁) + 1))) ≤ (lcm‘(1...((2 · 𝑁) + 2)))))
69	65, 68	mpd 15	. . 3 ⊢ (𝜑 → (lcm‘(1...((2 · 𝑁) + 1))) ≤ (lcm‘(1...((2 · 𝑁) + 2))))
70	13, 19, 43, 36, 69	letrd 11333	. 2 ⊢ (𝜑 → (2↑((2 · 𝑁) + 2)) ≤ (lcm‘(1...((2 · 𝑁) + 2))))
71	37, 70	jca 519	1 ⊢ (𝜑 → ((2↑((2 · 𝑁) + 1)) ≤ (lcm‘(1...((2 · 𝑁) + 1))) ∧ (2↑((2 · 𝑁) + 2)) ≤ (lcm‘(1...((2 · 𝑁) + 2)))))

Syntax hints:   → wi 4   ∧ wa 399   ∈ wcel 2141   ⊆ wss 3902   class class class wbr 5097  ‘cfv 6515  (class class class)co 7390  Fincfn 8920  ℝcr 11065  1c1 11067   + caddc 11069   · cmul 11071   < clt 11209   ≤ cle 11210   − cmin 11407  ℕcn 12203  2c2 12265  4c4 12267  ℕ₀cn0 12474  ℤcz 12561  ...cfz 13505  ↑cexp 14067   ∥ cdvds 16276   lcm clcm 16612  lcmclcmf 16613

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1814  ax-4 1828  ax-5 1929  ax-6 1986  ax-7 2027  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-rep 5224  ax-sep 5243  ax-nul 5253  ax-pow 5319  ax-pr 5387  ax-un 7712  ax-inf2 9589  ax-cc 10385  ax-cnex 11122  ax-resscn 11123  ax-1cn 11124  ax-icn 11125  ax-addcl 11126  ax-addrcl 11127  ax-mulcl 11128  ax-mulrcl 11129  ax-mulcom 11130  ax-addass 11131  ax-mulass 11132  ax-distr 11133  ax-i2m1 11134  ax-1ne0 11135  ax-1rid 11136  ax-rnegex 11137  ax-rrecex 11138  ax-cnre 11139  ax-pre-lttri 11140  ax-pre-lttrn 11141  ax-pre-ltadd 11142  ax-pre-mulgt0 11143  ax-pre-sup 11144  ax-addf 11145

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1098  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3061  df-ral 3076  df-rex 3086  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-symdif 4203  df-nul 4284  df-if 4478  df-pw 4554  df-sn 4580  df-pr 4582  df-tp 4584  df-op 4586  df-uni 4863  df-int 4903  df-iun 4948  df-iin 4949  df-disj 5065  df-br 5098  df-opab 5160  df-mpt 5179  df-tr 5205  df-id 5538  df-eprel 5543  df-po 5551  df-so 5552  df-fr 5596  df-se 5597  df-we 5598  df-xp 5649  df-rel 5650  df-cnv 5651  df-co 5652  df-dm 5653  df-rn 5654  df-res 5655  df-ima 5656  df-pred 6282  df-ord 6343  df-on 6344  df-lim 6345  df-suc 6346  df-iota 6471  df-fun 6517  df-fn 6518  df-f 6519  df-f1 6520  df-fo 6521  df-f1o 6522  df-fv 6523  df-isom 6524  df-riota 7347  df-ov 7393  df-oprab 7394  df-mpo 7395  df-of 7654  df-ofr 7655  df-om 7841  df-1st 7964  df-2nd 7965  df-supp 8134  df-frecs 8255  df-wrecs 8286  df-recs 8335  df-rdg 8374  df-1o 8430  df-2o 8431  df-oadd 8434  df-omul 8435  df-er 8671  df-map 8803  df-pm 8804  df-ixp 8873  df-en 8921  df-dom 8922  df-sdom 8923  df-fin 8924  df-fsupp 9301  df-fi 9350  df-sup 9381  df-inf 9382  df-oi 9451  df-dju 9852  df-card 9890  df-acn 9893  df-pnf 11211  df-mnf 11212  df-xr 11213  df-ltxr 11214  df-le 11215  df-sub 11409  df-neg 11410  df-div 11838  df-nn 12204  df-2 12273  df-3 12274  df-4 12275  df-5 12276  df-6 12277  df-7 12278  df-8 12279  df-9 12280  df-n0 12475  df-z 12562  df-dec 12682  df-uz 12833  df-q 12943  df-rp 12987  df-xneg 13107  df-xadd 13108  df-xmul 13109  df-ioo 13346  df-ioc 13347  df-ico 13348  df-icc 13349  df-fz 13506  df-fzo 13653  df-fl 13795  df-mod 13873  df-seq 14008  df-exp 14068  df-fac 14280  df-bc 14309  df-hash 14337  df-cj 15116  df-re 15117  df-im 15118  df-sqrt 15252  df-abs 15253  df-limsup 15488  df-clim 15505  df-rlim 15506  df-sum 15704  df-prod 15924  df-dvds 16277  df-gcd 16519  df-lcm 16614  df-lcmf 16615  df-struct 17173  df-sets 17190  df-slot 17208  df-ndx 17220  df-base 17236  df-ress 17257  df-plusg 17289  df-mulr 17290  df-starv 17291  df-sca 17292  df-vsca 17293  df-ip 17294  df-tset 17295  df-ple 17296  df-ds 17298  df-unif 17299  df-hom 17300  df-cco 17301  df-rest 17441  df-topn 17442  df-0g 17460  df-gsum 17461  df-topgen 17462  df-pt 17463  df-prds 17466  df-xrs 17522  df-qtop 17527  df-imas 17528  df-xps 17530  df-mre 17604  df-mrc 17605  df-acs 17607  df-mgm 18664  df-sgrp 18743  df-mnd 18759  df-submnd 18808  df-mulg 19100  df-cntz 19347  df-cmn 19812  df-psmet 21403  df-xmet 21404  df-met 21405  df-bl 21406  df-mopn 21407  df-fbas 21408  df-fg 21409  df-cnfld 21412  df-top 22941  df-topon 22958  df-topsp 22980  df-bases 22993  df-cld 23066  df-ntr 23067  df-cls 23068  df-nei 23145  df-lp 23183  df-perf 23184  df-cn 23274  df-cnp 23275  df-haus 23362  df-cmp 23434  df-tx 23609  df-hmeo 23802  df-fil 23893  df-fm 23985  df-flim 23986  df-flf 23987  df-xms 24367  df-ms 24368  df-tms 24369  df-cncf 24927  df-ovol 25513  df-vol 25514  df-mbf 25668  df-itg1 25669  df-itg2 25670  df-ibl 25671  df-itg 25672  df-0p 25719  df-limc 25915  df-dv 25916

This theorem is referenced by:  lcmineqlem23  42628