Users' Mathboxes Mathbox for Alexander van der Vekens < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  fmtno4prmfac193 Structured version   Visualization version   GIF version

Theorem fmtno4prmfac193 48366
Description: If P was a (prime) factor of the fourth Fermat number, it would be 193. (Contributed by AV, 28-Jul-2021.)
Assertion
Ref Expression
fmtno4prmfac193 ((𝑃 ∈ ℙ ∧ 𝑃 ∥ (FermatNo‘4) ∧ 𝑃 ≤ (⌊‘(√‘(FermatNo‘4)))) → 𝑃 = 193)

Proof of Theorem fmtno4prmfac193
StepHypRef Expression
1 fmtno4prmfac 48365 . 2 ((𝑃 ∈ ℙ ∧ 𝑃 ∥ (FermatNo‘4) ∧ 𝑃 ≤ (⌊‘(√‘(FermatNo‘4)))) → (𝑃 = 65 ∨ 𝑃 = 129 ∨ 𝑃 = 193))
2 5nn 12345 . . . . . . . 8 5 ∈ ℕ
3 1nn0 12538 . . . . . . . . 9 1 ∈ ℕ0
4 3nn 12338 . . . . . . . . 9 3 ∈ ℕ
53, 4decnncl 12753 . . . . . . . 8 13 ∈ ℕ
6 1lt5 12441 . . . . . . . 8 1 < 5
7 1nn 12262 . . . . . . . . 9 1 ∈ ℕ
8 3nn0 12540 . . . . . . . . 9 3 ∈ ℕ0
9 1lt10 12874 . . . . . . . . 9 1 < 10
107, 8, 3, 9declti 12772 . . . . . . . 8 1 < 13
11 eqid 2766 . . . . . . . 8 (5 · 13) = (5 · 13)
122, 5, 6, 10, 11nprmi 16772 . . . . . . 7 ¬ (5 · 13) ∈ ℙ
13 id 23 . . . . . . . . 9 (𝑃 = 65 → 𝑃 = 65)
14 5nn0 12542 . . . . . . . . . 10 5 ∈ ℕ0
15 eqid 2766 . . . . . . . . . 10 13 = 13
16 5cn 12347 . . . . . . . . . . . . 13 5 ∈ ℂ
1716mulridi 11231 . . . . . . . . . . . 12 (5 · 1) = 5
1817oveq1i 7433 . . . . . . . . . . 11 ((5 · 1) + 1) = (5 + 1)
19 5p1e6 12405 . . . . . . . . . . 11 (5 + 1) = 6
2018, 19eqtri 2789 . . . . . . . . . 10 ((5 · 1) + 1) = 6
21 5t3e15 12835 . . . . . . . . . 10 (5 · 3) = 15
2214, 3, 8, 15, 14, 3, 20, 21decmul2c 12800 . . . . . . . . 9 (5 · 13) = 65
2313, 22eqtr4di 2819 . . . . . . . 8 (𝑃 = 65 → 𝑃 = (5 · 13))
2423eleq1d 2851 . . . . . . 7 (𝑃 = 65 → (𝑃 ∈ ℙ ↔ (5 · 13) ∈ ℙ))
2512, 24mtbiri 330 . . . . . 6 (𝑃 = 65 → ¬ 𝑃 ∈ ℙ)
2625pm2.21d 122 . . . . 5 (𝑃 = 65 → (𝑃 ∈ ℙ → 𝑃 = 193))
27 4nn0 12541 . . . . . . . . 9 4 ∈ ℕ0
2827, 4decnncl 12753 . . . . . . . 8 43 ∈ ℕ
29 4nn 12342 . . . . . . . . 9 4 ∈ ℕ
3029, 8, 3, 9declti 12772 . . . . . . . 8 1 < 43
31 1lt3 12434 . . . . . . . 8 1 < 3
32 eqid 2766 . . . . . . . 8 (43 · 3) = (43 · 3)
3328, 4, 30, 31, 32nprmi 16772 . . . . . . 7 ¬ (43 · 3) ∈ ℙ
34 id 23 . . . . . . . . 9 (𝑃 = 129 → 𝑃 = 129)
35 eqid 2766 . . . . . . . . . 10 43 = 43
36 4t3e12 12832 . . . . . . . . . 10 (4 · 3) = 12
37 3t3e9 12426 . . . . . . . . . 10 (3 · 3) = 9
388, 27, 8, 35, 36, 37decmul1 12798 . . . . . . . . 9 (43 · 3) = 129
3934, 38eqtr4di 2819 . . . . . . . 8 (𝑃 = 129 → 𝑃 = (43 · 3))
4039eleq1d 2851 . . . . . . 7 (𝑃 = 129 → (𝑃 ∈ ℙ ↔ (43 · 3) ∈ ℙ))
4133, 40mtbiri 330 . . . . . 6 (𝑃 = 129 → ¬ 𝑃 ∈ ℙ)
4241pm2.21d 122 . . . . 5 (𝑃 = 129 → (𝑃 ∈ ℙ → 𝑃 = 193))
43 ax-1 6 . . . . 5 (𝑃 = 193 → (𝑃 ∈ ℙ → 𝑃 = 193))
4426, 42, 433jaoi 1454 . . . 4 ((𝑃 = 65 ∨ 𝑃 = 129 ∨ 𝑃 = 193) → (𝑃 ∈ ℙ → 𝑃 = 193))
4544com12 33 . . 3 (𝑃 ∈ ℙ → ((𝑃 = 65 ∨ 𝑃 = 129 ∨ 𝑃 = 193) → 𝑃 = 193))
46453ad2ant1 1151 . 2 ((𝑃 ∈ ℙ ∧ 𝑃 ∥ (FermatNo‘4) ∧ 𝑃 ≤ (⌊‘(√‘(FermatNo‘4)))) → ((𝑃 = 65 ∨ 𝑃 = 129 ∨ 𝑃 = 193) → 𝑃 = 193))
471, 46mpd 16 1 ((𝑃 ∈ ℙ ∧ 𝑃 ∥ (FermatNo‘4) ∧ 𝑃 ≤ (⌊‘(√‘(FermatNo‘4)))) → 𝑃 = 193)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  w3o 1102  w3a 1103   = wceq 1570  wcel 2146   class class class wbr 5114  cfv 6543  (class class class)co 7423  1c1 11119   + caddc 11121   · cmul 11123  cle 11262  2c2 12313  3c3 12314  4c4 12315  5c5 12316  6c6 12317  9c9 12320  cdc 12729  cfl 13843  csqrt 15310  cdvds 16335  cprime 16754  FermatNocfmtno 48320
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2738  ax-rep 5243  ax-sep 5262  ax-nul 5274  ax-pow 5341  ax-pr 5409  ax-un 7745  ax-inf2 9620  ax-cnex 11174  ax-resscn 11175  ax-1cn 11176  ax-icn 11177  ax-addcl 11178  ax-addrcl 11179  ax-mulcl 11180  ax-mulrcl 11181  ax-mulcom 11182  ax-addass 11183  ax-mulass 11184  ax-distr 11185  ax-i2m1 11186  ax-1ne0 11187  ax-1rid 11188  ax-rnegex 11189  ax-rrecex 11190  ax-cnre 11191  ax-pre-lttri 11192  ax-pre-lttrn 11193  ax-pre-ltadd 11194  ax-pre-mulgt0 11195  ax-pre-sup 11196
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-ne 2962  df-nel 3068  df-ral 3083  df-rex 3093  df-rmo 3372  df-reu 3373  df-rab 3420  df-v 3460  df-sbc 3748  df-csb 3857  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3928  df-nul 4290  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-tp 4599  df-op 4601  df-uni 4878  df-int 4918  df-iun 4963  df-br 5115  df-opab 5179  df-mpt 5198  df-tr 5224  df-id 5561  df-eprel 5566  df-po 5574  df-so 5575  df-fr 5619  df-se 5620  df-we 5621  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6309  df-ord 6370  df-on 6371  df-lim 6372  df-suc 6373  df-iota 6499  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-isom 6552  df-riota 7380  df-ov 7426  df-oprab 7427  df-mpo 7428  df-om 7872  df-1st 7995  df-2nd 7996  df-frecs 8287  df-wrecs 8318  df-recs 8367  df-rdg 8406  df-1o 8462  df-2o 8463  df-oadd 8466  df-er 8703  df-en 8953  df-dom 8954  df-sdom 8955  df-fin 8956  df-sup 9412  df-inf 9413  df-oi 9482  df-dju 9906  df-card 9944  df-pnf 11263  df-mnf 11264  df-xr 11265  df-ltxr 11266  df-le 11267  df-sub 11461  df-neg 11462  df-div 11890  df-nn 12252  df-2 12321  df-3 12322  df-4 12323  df-5 12324  df-6 12325  df-7 12326  df-8 12327  df-9 12328  df-n0 12523  df-xnn0 12596  df-z 12610  df-dec 12730  df-uz 12881  df-q 12991  df-rp 13035  df-ioo 13394  df-ico 13396  df-fz 13554  df-fzo 13702  df-fl 13845  df-mod 13923  df-seq 14058  df-exp 14118  df-fac 14330  df-hash 14387  df-cj 15176  df-re 15177  df-im 15178  df-sqrt 15312  df-abs 15313  df-clim 15565  df-prod 15984  df-dvds 16336  df-gcd 16578  df-prm 16755  df-odz 16849  df-phi 16850  df-pc 16922  df-lgs 27496  df-fmtno 48321
This theorem is used by:  fmtno4prm  48368
  Copyright terms: Public domain W3C validator