Theorem isprm4 11007

Description: The predicate "is a prime number". A prime number is an integer greater than or equal to 2 whose only divisor greater than or equal to 2 is itself. (Contributed by Paul Chapman, 26-Oct-2012.)

Assertion

Ref	Expression
isprm4	⊢ (𝑃 ∈ ℙ ↔ (𝑃 ∈ (ℤ≥‘2) ∧ ∀𝑧 ∈ (ℤ≥‘2)(𝑧 ∥ 𝑃 → 𝑧 = 𝑃)))

Distinct variable group:   𝑧,𝑃

Proof of Theorem isprm4

Step	Hyp	Ref	Expression
1		isprm2 11005	. 2 ⊢ (𝑃 ∈ ℙ ↔ (𝑃 ∈ (ℤ≥‘2) ∧ ∀𝑧 ∈ ℕ (𝑧 ∥ 𝑃 → (𝑧 = 1 ∨ 𝑧 = 𝑃))))
2		eluz2nn 8992	. . . . . . . 8 ⊢ (𝑧 ∈ (ℤ≥‘2) → 𝑧 ∈ ℕ)
3	2	pm4.71ri 384	. . . . . . 7 ⊢ (𝑧 ∈ (ℤ≥‘2) ↔ (𝑧 ∈ ℕ ∧ 𝑧 ∈ (ℤ≥‘2)))
4	3	imbi1i 236	. . . . . 6 ⊢ ((𝑧 ∈ (ℤ≥‘2) → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃)) ↔ ((𝑧 ∈ ℕ ∧ 𝑧 ∈ (ℤ≥‘2)) → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃)))
5		impexp 259	. . . . . 6 ⊢ (((𝑧 ∈ ℕ ∧ 𝑧 ∈ (ℤ≥‘2)) → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃)) ↔ (𝑧 ∈ ℕ → (𝑧 ∈ (ℤ≥‘2) → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃))))
6	4, 5	bitri 182	. . . . 5 ⊢ ((𝑧 ∈ (ℤ≥‘2) → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃)) ↔ (𝑧 ∈ ℕ → (𝑧 ∈ (ℤ≥‘2) → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃))))
7		eluz2b3 9026	. . . . . . . 8 ⊢ (𝑧 ∈ (ℤ≥‘2) ↔ (𝑧 ∈ ℕ ∧ 𝑧 ≠ 1))
8	7	imbi1i 236	. . . . . . 7 ⊢ ((𝑧 ∈ (ℤ≥‘2) → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃)) ↔ ((𝑧 ∈ ℕ ∧ 𝑧 ≠ 1) → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃)))
9		impexp 259	. . . . . . . 8 ⊢ (((𝑧 ∈ ℕ ∧ 𝑧 ≠ 1) → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃)) ↔ (𝑧 ∈ ℕ → (𝑧 ≠ 1 → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃))))
10		bi2.04 246	. . . . . . . . . 10 ⊢ ((𝑧 ≠ 1 → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃)) ↔ (𝑧 ∥ 𝑃 → (𝑧 ≠ 1 → 𝑧 = 𝑃)))
11		nnz 8705	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ ℕ → 𝑧 ∈ ℤ)
12		1zzd 8713	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ ℕ → 1 ∈ ℤ)
13		zdceq 8758	. . . . . . . . . . . . . 14 ⊢ ((𝑧 ∈ ℤ ∧ 1 ∈ ℤ) → DECID 𝑧 = 1)
14	11, 12, 13	syl2anc 403	. . . . . . . . . . . . 13 ⊢ (𝑧 ∈ ℕ → DECID 𝑧 = 1)
15		dfordc 827	. . . . . . . . . . . . 13 ⊢ (DECID 𝑧 = 1 → ((𝑧 = 1 ∨ 𝑧 = 𝑃) ↔ (¬ 𝑧 = 1 → 𝑧 = 𝑃)))
16	14, 15	syl 14	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ ℕ → ((𝑧 = 1 ∨ 𝑧 = 𝑃) ↔ (¬ 𝑧 = 1 → 𝑧 = 𝑃)))
17		df-ne 2252	. . . . . . . . . . . . 13 ⊢ (𝑧 ≠ 1 ↔ ¬ 𝑧 = 1)
18	17	imbi1i 236	. . . . . . . . . . . 12 ⊢ ((𝑧 ≠ 1 → 𝑧 = 𝑃) ↔ (¬ 𝑧 = 1 → 𝑧 = 𝑃))
19	16, 18	syl6rbbr 197	. . . . . . . . . . 11 ⊢ (𝑧 ∈ ℕ → ((𝑧 ≠ 1 → 𝑧 = 𝑃) ↔ (𝑧 = 1 ∨ 𝑧 = 𝑃)))
20	19	imbi2d 228	. . . . . . . . . 10 ⊢ (𝑧 ∈ ℕ → ((𝑧 ∥ 𝑃 → (𝑧 ≠ 1 → 𝑧 = 𝑃)) ↔ (𝑧 ∥ 𝑃 → (𝑧 = 1 ∨ 𝑧 = 𝑃))))
21	10, 20	syl5bb 190	. . . . . . . . 9 ⊢ (𝑧 ∈ ℕ → ((𝑧 ≠ 1 → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃)) ↔ (𝑧 ∥ 𝑃 → (𝑧 = 1 ∨ 𝑧 = 𝑃))))
22	21	imbi2d 228	. . . . . . . 8 ⊢ (𝑧 ∈ ℕ → ((𝑧 ∈ ℕ → (𝑧 ≠ 1 → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃))) ↔ (𝑧 ∈ ℕ → (𝑧 ∥ 𝑃 → (𝑧 = 1 ∨ 𝑧 = 𝑃)))))
23	9, 22	syl5bb 190	. . . . . . 7 ⊢ (𝑧 ∈ ℕ → (((𝑧 ∈ ℕ ∧ 𝑧 ≠ 1) → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃)) ↔ (𝑧 ∈ ℕ → (𝑧 ∥ 𝑃 → (𝑧 = 1 ∨ 𝑧 = 𝑃)))))
24	8, 23	syl5bb 190	. . . . . 6 ⊢ (𝑧 ∈ ℕ → ((𝑧 ∈ (ℤ≥‘2) → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃)) ↔ (𝑧 ∈ ℕ → (𝑧 ∥ 𝑃 → (𝑧 = 1 ∨ 𝑧 = 𝑃)))))
25	24	pm5.74i 178	. . . . 5 ⊢ ((𝑧 ∈ ℕ → (𝑧 ∈ (ℤ≥‘2) → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃))) ↔ (𝑧 ∈ ℕ → (𝑧 ∈ ℕ → (𝑧 ∥ 𝑃 → (𝑧 = 1 ∨ 𝑧 = 𝑃)))))
26		pm5.4 247	. . . . 5 ⊢ ((𝑧 ∈ ℕ → (𝑧 ∈ ℕ → (𝑧 ∥ 𝑃 → (𝑧 = 1 ∨ 𝑧 = 𝑃)))) ↔ (𝑧 ∈ ℕ → (𝑧 ∥ 𝑃 → (𝑧 = 1 ∨ 𝑧 = 𝑃))))
27	6, 25, 26	3bitri 204	. . . 4 ⊢ ((𝑧 ∈ (ℤ≥‘2) → (𝑧 ∥ 𝑃 → 𝑧 = 𝑃)) ↔ (𝑧 ∈ ℕ → (𝑧 ∥ 𝑃 → (𝑧 = 1 ∨ 𝑧 = 𝑃))))
28	27	ralbii2 2384	. . 3 ⊢ (∀𝑧 ∈ (ℤ≥‘2)(𝑧 ∥ 𝑃 → 𝑧 = 𝑃) ↔ ∀𝑧 ∈ ℕ (𝑧 ∥ 𝑃 → (𝑧 = 1 ∨ 𝑧 = 𝑃)))
29	28	anbi2i 445	. 2 ⊢ ((𝑃 ∈ (ℤ≥‘2) ∧ ∀𝑧 ∈ (ℤ≥‘2)(𝑧 ∥ 𝑃 → 𝑧 = 𝑃)) ↔ (𝑃 ∈ (ℤ≥‘2) ∧ ∀𝑧 ∈ ℕ (𝑧 ∥ 𝑃 → (𝑧 = 1 ∨ 𝑧 = 𝑃))))
30	1, 29	bitr4i 185	1 ⊢ (𝑃 ∈ ℙ ↔ (𝑃 ∈ (ℤ≥‘2) ∧ ∀𝑧 ∈ (ℤ≥‘2)(𝑧 ∥ 𝑃 → 𝑧 = 𝑃)))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 102   ↔ wb 103   ∨ wo 662  DECID wdc 778   = wceq 1287   ∈ wcel 1436   ≠ wne 2251  ∀wral 2355   class class class wbr 3822  ‘cfv 4983  1c1 7298  ℕcn 8360  2c2 8410  ℤcz 8686  ℤ_≥cuz 8954   ∥ cdvds 10702  ℙcprime 10995

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-in1 577  ax-in2 578  ax-io 663  ax-5 1379  ax-7 1380  ax-gen 1381  ax-ie1 1425  ax-ie2 1426  ax-8 1438  ax-10 1439  ax-11 1440  ax-i12 1441  ax-bndl 1442  ax-4 1443  ax-13 1447  ax-14 1448  ax-17 1462  ax-i9 1466  ax-ial 1470  ax-i5r 1471  ax-ext 2067  ax-coll 3931  ax-sep 3934  ax-nul 3942  ax-pow 3986  ax-pr 4012  ax-un 4236  ax-setind 4328  ax-iinf 4378  ax-cnex 7383  ax-resscn 7384  ax-1cn 7385  ax-1re 7386  ax-icn 7387  ax-addcl 7388  ax-addrcl 7389  ax-mulcl 7390  ax-mulrcl 7391  ax-addcom 7392  ax-mulcom 7393  ax-addass 7394  ax-mulass 7395  ax-distr 7396  ax-i2m1 7397  ax-0lt1 7398  ax-1rid 7399  ax-0id 7400  ax-rnegex 7401  ax-precex 7402  ax-cnre 7403  ax-pre-ltirr 7404  ax-pre-ltwlin 7405  ax-pre-lttrn 7406  ax-pre-apti 7407  ax-pre-ltadd 7408  ax-pre-mulgt0 7409  ax-pre-mulext 7410  ax-arch 7411  ax-caucvg 7412

This theorem depends on definitions:  df-bi 115  df-dc 779  df-3or 923  df-3an 924  df-tru 1290  df-fal 1293  df-nf 1393  df-sb 1690  df-eu 1948  df-mo 1949  df-clab 2072  df-cleq 2078  df-clel 2081  df-nfc 2214  df-ne 2252  df-nel 2347  df-ral 2360  df-rex 2361  df-reu 2362  df-rmo 2363  df-rab 2364  df-v 2617  df-sbc 2830  df-csb 2923  df-dif 2990  df-un 2992  df-in 2994  df-ss 3001  df-nul 3276  df-if 3380  df-pw 3417  df-sn 3437  df-pr 3438  df-op 3440  df-uni 3639  df-int 3674  df-iun 3717  df-br 3823  df-opab 3877  df-mpt 3878  df-tr 3914  df-id 4096  df-po 4099  df-iso 4100  df-iord 4169  df-on 4171  df-ilim 4172  df-suc 4174  df-iom 4381  df-xp 4419  df-rel 4420  df-cnv 4421  df-co 4422  df-dm 4423  df-rn 4424  df-res 4425  df-ima 4426  df-iota 4948  df-fun 4985  df-fn 4986  df-f 4987  df-f1 4988  df-fo 4989  df-f1o 4990  df-fv 4991  df-riota 5571  df-ov 5618  df-oprab 5619  df-mpt2 5620  df-1st 5870  df-2nd 5871  df-recs 6026  df-frec 6112  df-1o 6137  df-2o 6138  df-er 6246  df-en 6412  df-pnf 7471  df-mnf 7472  df-xr 7473  df-ltxr 7474  df-le 7475  df-sub 7602  df-neg 7603  df-reap 7996  df-ap 8003  df-div 8082  df-inn 8361  df-2 8419  df-3 8420  df-4 8421  df-n0 8610  df-z 8687  df-uz 8955  df-q 9040  df-rp 9070  df-iseq 9783  df-iexp 9857  df-cj 10175  df-re 10176  df-im 10177  df-rsqrt 10330  df-abs 10331  df-dvds 10703  df-prm 10996

This theorem is referenced by:  nprm  11011  prmuz2  11018  dvdsprm  11024