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

Theorem bposlem4 26717
Description: Lemma for bpos 26723. (Contributed by Mario Carneiro, 13-Mar-2014.)
Hypotheses
Ref Expression
bpos.1 (𝜑𝑁 ∈ (ℤ‘5))
bpos.2 (𝜑 → ¬ ∃𝑝 ∈ ℙ (𝑁 < 𝑝𝑝 ≤ (2 · 𝑁)))
bpos.3 𝐹 = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (𝑛↑(𝑛 pCnt ((2 · 𝑁)C𝑁))), 1))
bpos.4 𝐾 = (⌊‘((2 · 𝑁) / 3))
bpos.5 𝑀 = (⌊‘(√‘(2 · 𝑁)))
Assertion
Ref Expression
bposlem4 (𝜑𝑀 ∈ (3...𝐾))
Distinct variable groups:   𝐹,𝑝   𝑛,𝑝,𝐾   𝑀,𝑝   𝑛,𝑁,𝑝   𝜑,𝑛,𝑝
Allowed substitution hints:   𝐹(𝑛)   𝑀(𝑛)

Proof of Theorem bposlem4
StepHypRef Expression
1 2nn 12267 . . . . . . . 8 2 ∈ ℕ
2 5nn 12280 . . . . . . . . 9 5 ∈ ℕ
3 bpos.1 . . . . . . . . 9 (𝜑𝑁 ∈ (ℤ‘5))
4 eluznn 12884 . . . . . . . . 9 ((5 ∈ ℕ ∧ 𝑁 ∈ (ℤ‘5)) → 𝑁 ∈ ℕ)
52, 3, 4sylancr 587 . . . . . . . 8 (𝜑𝑁 ∈ ℕ)
6 nnmulcl 12218 . . . . . . . 8 ((2 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 · 𝑁) ∈ ℕ)
71, 5, 6sylancr 587 . . . . . . 7 (𝜑 → (2 · 𝑁) ∈ ℕ)
87nnred 12209 . . . . . 6 (𝜑 → (2 · 𝑁) ∈ ℝ)
97nnrpd 12996 . . . . . . 7 (𝜑 → (2 · 𝑁) ∈ ℝ+)
109rpge0d 13002 . . . . . 6 (𝜑 → 0 ≤ (2 · 𝑁))
118, 10resqrtcld 15346 . . . . 5 (𝜑 → (√‘(2 · 𝑁)) ∈ ℝ)
1211flcld 13745 . . . 4 (𝜑 → (⌊‘(√‘(2 · 𝑁))) ∈ ℤ)
13 sqrt9 15202 . . . . . 6 (√‘9) = 3
14 9re 12293 . . . . . . . . 9 9 ∈ ℝ
1514a1i 11 . . . . . . . 8 (𝜑 → 9 ∈ ℝ)
16 10re 12678 . . . . . . . . 9 10 ∈ ℝ
1716a1i 11 . . . . . . . 8 (𝜑10 ∈ ℝ)
18 lep1 12037 . . . . . . . . . . 11 (9 ∈ ℝ → 9 ≤ (9 + 1))
1914, 18ax-mp 5 . . . . . . . . . 10 9 ≤ (9 + 1)
20 9p1e10 12661 . . . . . . . . . 10 (9 + 1) = 10
2119, 20breqtri 5166 . . . . . . . . 9 9 ≤ 10
2221a1i 11 . . . . . . . 8 (𝜑 → 9 ≤ 10)
23 5cn 12282 . . . . . . . . . 10 5 ∈ ℂ
24 2cn 12269 . . . . . . . . . 10 2 ∈ ℂ
25 5t2e10 12759 . . . . . . . . . 10 (5 · 2) = 10
2623, 24, 25mulcomli 11205 . . . . . . . . 9 (2 · 5) = 10
27 eluzle 12817 . . . . . . . . . . 11 (𝑁 ∈ (ℤ‘5) → 5 ≤ 𝑁)
283, 27syl 17 . . . . . . . . . 10 (𝜑 → 5 ≤ 𝑁)
295nnred 12209 . . . . . . . . . . 11 (𝜑𝑁 ∈ ℝ)
30 5re 12281 . . . . . . . . . . . 12 5 ∈ ℝ
31 2re 12268 . . . . . . . . . . . . 13 2 ∈ ℝ
32 2pos 12297 . . . . . . . . . . . . 13 0 < 2
3331, 32pm3.2i 471 . . . . . . . . . . . 12 (2 ∈ ℝ ∧ 0 < 2)
34 lemul2 12049 . . . . . . . . . . . 12 ((5 ∈ ℝ ∧ 𝑁 ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → (5 ≤ 𝑁 ↔ (2 · 5) ≤ (2 · 𝑁)))
3530, 33, 34mp3an13 1452 . . . . . . . . . . 11 (𝑁 ∈ ℝ → (5 ≤ 𝑁 ↔ (2 · 5) ≤ (2 · 𝑁)))
3629, 35syl 17 . . . . . . . . . 10 (𝜑 → (5 ≤ 𝑁 ↔ (2 · 5) ≤ (2 · 𝑁)))
3728, 36mpbid 231 . . . . . . . . 9 (𝜑 → (2 · 5) ≤ (2 · 𝑁))
3826, 37eqbrtrrid 5177 . . . . . . . 8 (𝜑10 ≤ (2 · 𝑁))
3915, 17, 8, 22, 38letrd 11353 . . . . . . 7 (𝜑 → 9 ≤ (2 · 𝑁))
40 0re 11198 . . . . . . . . . 10 0 ∈ ℝ
41 9pos 12307 . . . . . . . . . 10 0 < 9
4240, 14, 41ltleii 11319 . . . . . . . . 9 0 ≤ 9
4314, 42pm3.2i 471 . . . . . . . 8 (9 ∈ ℝ ∧ 0 ≤ 9)
449rprege0d 13005 . . . . . . . 8 (𝜑 → ((2 · 𝑁) ∈ ℝ ∧ 0 ≤ (2 · 𝑁)))
45 sqrtle 15189 . . . . . . . 8 (((9 ∈ ℝ ∧ 0 ≤ 9) ∧ ((2 · 𝑁) ∈ ℝ ∧ 0 ≤ (2 · 𝑁))) → (9 ≤ (2 · 𝑁) ↔ (√‘9) ≤ (√‘(2 · 𝑁))))
4643, 44, 45sylancr 587 . . . . . . 7 (𝜑 → (9 ≤ (2 · 𝑁) ↔ (√‘9) ≤ (√‘(2 · 𝑁))))
4739, 46mpbid 231 . . . . . 6 (𝜑 → (√‘9) ≤ (√‘(2 · 𝑁)))
4813, 47eqbrtrrid 5177 . . . . 5 (𝜑 → 3 ≤ (√‘(2 · 𝑁)))
49 3z 12577 . . . . . 6 3 ∈ ℤ
50 flge 13752 . . . . . 6 (((√‘(2 · 𝑁)) ∈ ℝ ∧ 3 ∈ ℤ) → (3 ≤ (√‘(2 · 𝑁)) ↔ 3 ≤ (⌊‘(√‘(2 · 𝑁)))))
5111, 49, 50sylancl 586 . . . . 5 (𝜑 → (3 ≤ (√‘(2 · 𝑁)) ↔ 3 ≤ (⌊‘(√‘(2 · 𝑁)))))
5248, 51mpbid 231 . . . 4 (𝜑 → 3 ≤ (⌊‘(√‘(2 · 𝑁))))
5349eluz1i 12812 . . . 4 ((⌊‘(√‘(2 · 𝑁))) ∈ (ℤ‘3) ↔ ((⌊‘(√‘(2 · 𝑁))) ∈ ℤ ∧ 3 ≤ (⌊‘(√‘(2 · 𝑁)))))
5412, 52, 53sylanbrc 583 . . 3 (𝜑 → (⌊‘(√‘(2 · 𝑁))) ∈ (ℤ‘3))
55 3nn 12273 . . . . 5 3 ∈ ℕ
56 nndivre 12235 . . . . 5 (((2 · 𝑁) ∈ ℝ ∧ 3 ∈ ℕ) → ((2 · 𝑁) / 3) ∈ ℝ)
578, 55, 56sylancl 586 . . . 4 (𝜑 → ((2 · 𝑁) / 3) ∈ ℝ)
58 3re 12274 . . . . . . . . 9 3 ∈ ℝ
5958a1i 11 . . . . . . . 8 (𝜑 → 3 ∈ ℝ)
609sqrtgt0d 15341 . . . . . . . 8 (𝜑 → 0 < (√‘(2 · 𝑁)))
61 lemul2 12049 . . . . . . . 8 ((3 ∈ ℝ ∧ (√‘(2 · 𝑁)) ∈ ℝ ∧ ((√‘(2 · 𝑁)) ∈ ℝ ∧ 0 < (√‘(2 · 𝑁)))) → (3 ≤ (√‘(2 · 𝑁)) ↔ ((√‘(2 · 𝑁)) · 3) ≤ ((√‘(2 · 𝑁)) · (√‘(2 · 𝑁)))))
6259, 11, 11, 60, 61syl112anc 1374 . . . . . . 7 (𝜑 → (3 ≤ (√‘(2 · 𝑁)) ↔ ((√‘(2 · 𝑁)) · 3) ≤ ((√‘(2 · 𝑁)) · (√‘(2 · 𝑁)))))
6348, 62mpbid 231 . . . . . 6 (𝜑 → ((√‘(2 · 𝑁)) · 3) ≤ ((√‘(2 · 𝑁)) · (√‘(2 · 𝑁))))
64 remsqsqrt 15185 . . . . . . 7 (((2 · 𝑁) ∈ ℝ ∧ 0 ≤ (2 · 𝑁)) → ((√‘(2 · 𝑁)) · (√‘(2 · 𝑁))) = (2 · 𝑁))
658, 10, 64syl2anc 584 . . . . . 6 (𝜑 → ((√‘(2 · 𝑁)) · (√‘(2 · 𝑁))) = (2 · 𝑁))
6663, 65breqtrd 5167 . . . . 5 (𝜑 → ((√‘(2 · 𝑁)) · 3) ≤ (2 · 𝑁))
67 3pos 12299 . . . . . . . 8 0 < 3
6858, 67pm3.2i 471 . . . . . . 7 (3 ∈ ℝ ∧ 0 < 3)
6968a1i 11 . . . . . 6 (𝜑 → (3 ∈ ℝ ∧ 0 < 3))
70 lemuldiv 12076 . . . . . 6 (((√‘(2 · 𝑁)) ∈ ℝ ∧ (2 · 𝑁) ∈ ℝ ∧ (3 ∈ ℝ ∧ 0 < 3)) → (((√‘(2 · 𝑁)) · 3) ≤ (2 · 𝑁) ↔ (√‘(2 · 𝑁)) ≤ ((2 · 𝑁) / 3)))
7111, 8, 69, 70syl3anc 1371 . . . . 5 (𝜑 → (((√‘(2 · 𝑁)) · 3) ≤ (2 · 𝑁) ↔ (√‘(2 · 𝑁)) ≤ ((2 · 𝑁) / 3)))
7266, 71mpbid 231 . . . 4 (𝜑 → (√‘(2 · 𝑁)) ≤ ((2 · 𝑁) / 3))
73 flword2 13760 . . . 4 (((√‘(2 · 𝑁)) ∈ ℝ ∧ ((2 · 𝑁) / 3) ∈ ℝ ∧ (√‘(2 · 𝑁)) ≤ ((2 · 𝑁) / 3)) → (⌊‘((2 · 𝑁) / 3)) ∈ (ℤ‘(⌊‘(√‘(2 · 𝑁)))))
7411, 57, 72, 73syl3anc 1371 . . 3 (𝜑 → (⌊‘((2 · 𝑁) / 3)) ∈ (ℤ‘(⌊‘(√‘(2 · 𝑁)))))
75 elfzuzb 13477 . . 3 ((⌊‘(√‘(2 · 𝑁))) ∈ (3...(⌊‘((2 · 𝑁) / 3))) ↔ ((⌊‘(√‘(2 · 𝑁))) ∈ (ℤ‘3) ∧ (⌊‘((2 · 𝑁) / 3)) ∈ (ℤ‘(⌊‘(√‘(2 · 𝑁))))))
7654, 74, 75sylanbrc 583 . 2 (𝜑 → (⌊‘(√‘(2 · 𝑁))) ∈ (3...(⌊‘((2 · 𝑁) / 3))))
77 bpos.5 . 2 𝑀 = (⌊‘(√‘(2 · 𝑁)))
78 bpos.4 . . 3 𝐾 = (⌊‘((2 · 𝑁) / 3))
7978oveq2i 7404 . 2 (3...𝐾) = (3...(⌊‘((2 · 𝑁) / 3)))
8076, 77, 793eltr4g 2849 1 (𝜑𝑀 ∈ (3...𝐾))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 396   = wceq 1541  wcel 2106  wrex 3069  ifcif 4522   class class class wbr 5141  cmpt 5224  cfv 6532  (class class class)co 7393  cr 11091  0cc0 11092  1c1 11093   + caddc 11095   · cmul 11097   < clt 11230  cle 11231   / cdiv 11853  cn 12194  2c2 12249  3c3 12250  5c5 12252  9c9 12256  cz 12540  cdc 12659  cuz 12804  ...cfz 13466  cfl 13737  cexp 14009  Ccbc 14244  csqrt 15162  cprime 16590   pCnt cpc 16751
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2702  ax-sep 5292  ax-nul 5299  ax-pow 5356  ax-pr 5420  ax-un 7708  ax-cnex 11148  ax-resscn 11149  ax-1cn 11150  ax-icn 11151  ax-addcl 11152  ax-addrcl 11153  ax-mulcl 11154  ax-mulrcl 11155  ax-mulcom 11156  ax-addass 11157  ax-mulass 11158  ax-distr 11159  ax-i2m1 11160  ax-1ne0 11161  ax-1rid 11162  ax-rnegex 11163  ax-rrecex 11164  ax-cnre 11165  ax-pre-lttri 11166  ax-pre-lttrn 11167  ax-pre-ltadd 11168  ax-pre-mulgt0 11169  ax-pre-sup 11170
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-nel 3046  df-ral 3061  df-rex 3070  df-rmo 3375  df-reu 3376  df-rab 3432  df-v 3475  df-sbc 3774  df-csb 3890  df-dif 3947  df-un 3949  df-in 3951  df-ss 3961  df-pss 3963  df-nul 4319  df-if 4523  df-pw 4598  df-sn 4623  df-pr 4625  df-op 4629  df-uni 4902  df-iun 4992  df-br 5142  df-opab 5204  df-mpt 5225  df-tr 5259  df-id 5567  df-eprel 5573  df-po 5581  df-so 5582  df-fr 5624  df-we 5626  df-xp 5675  df-rel 5676  df-cnv 5677  df-co 5678  df-dm 5679  df-rn 5680  df-res 5681  df-ima 5682  df-pred 6289  df-ord 6356  df-on 6357  df-lim 6358  df-suc 6359  df-iota 6484  df-fun 6534  df-fn 6535  df-f 6536  df-f1 6537  df-fo 6538  df-f1o 6539  df-fv 6540  df-riota 7349  df-ov 7396  df-oprab 7397  df-mpo 7398  df-om 7839  df-1st 7957  df-2nd 7958  df-frecs 8248  df-wrecs 8279  df-recs 8353  df-rdg 8392  df-er 8686  df-en 8923  df-dom 8924  df-sdom 8925  df-sup 9419  df-inf 9420  df-pnf 11232  df-mnf 11233  df-xr 11234  df-ltxr 11235  df-le 11236  df-sub 11428  df-neg 11429  df-div 11854  df-nn 12195  df-2 12257  df-3 12258  df-4 12259  df-5 12260  df-6 12261  df-7 12262  df-8 12263  df-9 12264  df-n0 12455  df-z 12541  df-dec 12660  df-uz 12805  df-rp 12957  df-fz 13467  df-fl 13739  df-seq 13949  df-exp 14010  df-cj 15028  df-re 15029  df-im 15030  df-sqrt 15164
This theorem is referenced by:  bposlem6  26719
  Copyright terms: Public domain W3C validator