Theorem gausslemma2dlem0h 15100

Description: Auxiliary lemma 8 for gausslemma2d 15113. (Contributed by AV, 9-Jul-2021.)

Hypotheses

Ref	Expression
gausslemma2dlem0.p	⊢ (𝜑 → 𝑃 ∈ (ℙ ∖ {2}))
gausslemma2dlem0.m	⊢ 𝑀 = (⌊‘(𝑃 / 4))
gausslemma2dlem0.h	⊢ 𝐻 = ((𝑃 − 1) / 2)
gausslemma2dlem0.n	⊢ 𝑁 = (𝐻 − 𝑀)

Assertion

Ref	Expression
gausslemma2dlem0h	⊢ (𝜑 → 𝑁 ∈ ℕ0)

Proof of Theorem gausslemma2dlem0h

Step	Hyp	Ref	Expression
1		gausslemma2dlem0.n	. 2 ⊢ 𝑁 = (𝐻 − 𝑀)
2		gausslemma2dlem0.p	. . . . . 6 ⊢ (𝜑 → 𝑃 ∈ (ℙ ∖ {2}))
3		gausslemma2dlem0.h	. . . . . 6 ⊢ 𝐻 = ((𝑃 − 1) / 2)
4	2, 3	gausslemma2dlem0b 15094	. . . . 5 ⊢ (𝜑 → 𝐻 ∈ ℕ)
5	4	nnzd 9424	. . . 4 ⊢ (𝜑 → 𝐻 ∈ ℤ)
6		gausslemma2dlem0.m	. . . . . 6 ⊢ 𝑀 = (⌊‘(𝑃 / 4))
7	2, 6	gausslemma2dlem0d 15096	. . . . 5 ⊢ (𝜑 → 𝑀 ∈ ℕ0)
8	7	nn0zd 9423	. . . 4 ⊢ (𝜑 → 𝑀 ∈ ℤ)
9	5, 8	zsubcld 9430	. . 3 ⊢ (𝜑 → (𝐻 − 𝑀) ∈ ℤ)
10	2, 6, 3	gausslemma2dlem0g 15099	. . . 4 ⊢ (𝜑 → 𝑀 ≤ 𝐻)
11	4	nnred 8981	. . . . 5 ⊢ (𝜑 → 𝐻 ∈ ℝ)
12	7	nn0red 9280	. . . . 5 ⊢ (𝜑 → 𝑀 ∈ ℝ)
13	11, 12	subge0d 8540	. . . 4 ⊢ (𝜑 → (0 ≤ (𝐻 − 𝑀) ↔ 𝑀 ≤ 𝐻))
14	10, 13	mpbird 167	. . 3 ⊢ (𝜑 → 0 ≤ (𝐻 − 𝑀))
15		elnn0z 9316	. . 3 ⊢ ((𝐻 − 𝑀) ∈ ℕ0 ↔ ((𝐻 − 𝑀) ∈ ℤ ∧ 0 ≤ (𝐻 − 𝑀)))
16	9, 14, 15	sylanbrc 417	. 2 ⊢ (𝜑 → (𝐻 − 𝑀) ∈ ℕ0)
17	1, 16	eqeltrid 2276	1 ⊢ (𝜑 → 𝑁 ∈ ℕ0)

Syntax hints:   → wi 4   = wceq 1364   ∈ wcel 2160   ∖ cdif 3146  {csn 3614   class class class wbr 4025  ‘cfv 5242  (class class class)co 5906  0cc0 7858  1c1 7859   ≤ cle 8041   − cmin 8176   / cdiv 8677  2c2 9019  4c4 9021  ℕ₀cn0 9226  ℤcz 9303  ⌊cfl 10323  ℙcprime 12219

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 615  ax-in2 616  ax-io 710  ax-5 1458  ax-7 1459  ax-gen 1460  ax-ie1 1504  ax-ie2 1505  ax-8 1515  ax-10 1516  ax-11 1517  ax-i12 1518  ax-bndl 1520  ax-4 1521  ax-17 1537  ax-i9 1541  ax-ial 1545  ax-i5r 1546  ax-13 2162  ax-14 2163  ax-ext 2171  ax-coll 4140  ax-sep 4143  ax-nul 4151  ax-pow 4199  ax-pr 4234  ax-un 4458  ax-setind 4561  ax-iinf 4612  ax-cnex 7949  ax-resscn 7950  ax-1cn 7951  ax-1re 7952  ax-icn 7953  ax-addcl 7954  ax-addrcl 7955  ax-mulcl 7956  ax-mulrcl 7957  ax-addcom 7958  ax-mulcom 7959  ax-addass 7960  ax-mulass 7961  ax-distr 7962  ax-i2m1 7963  ax-0lt1 7964  ax-1rid 7965  ax-0id 7966  ax-rnegex 7967  ax-precex 7968  ax-cnre 7969  ax-pre-ltirr 7970  ax-pre-ltwlin 7971  ax-pre-lttrn 7972  ax-pre-apti 7973  ax-pre-ltadd 7974  ax-pre-mulgt0 7975  ax-pre-mulext 7976  ax-arch 7977  ax-caucvg 7978

This theorem depends on definitions:  df-bi 117  df-dc 836  df-3or 981  df-3an 982  df-tru 1367  df-fal 1370  df-xor 1387  df-nf 1472  df-sb 1774  df-eu 2041  df-mo 2042  df-clab 2176  df-cleq 2182  df-clel 2185  df-nfc 2321  df-ne 2361  df-nel 2456  df-ral 2473  df-rex 2474  df-reu 2475  df-rmo 2476  df-rab 2477  df-v 2758  df-sbc 2982  df-csb 3077  df-dif 3151  df-un 3153  df-in 3155  df-ss 3162  df-nul 3443  df-if 3554  df-pw 3599  df-sn 3620  df-pr 3621  df-op 3623  df-uni 3832  df-int 3867  df-iun 3910  df-br 4026  df-opab 4087  df-mpt 4088  df-tr 4124  df-id 4318  df-po 4321  df-iso 4322  df-iord 4391  df-on 4393  df-ilim 4394  df-suc 4396  df-iom 4615  df-xp 4657  df-rel 4658  df-cnv 4659  df-co 4660  df-dm 4661  df-rn 4662  df-res 4663  df-ima 4664  df-iota 5203  df-fun 5244  df-fn 5245  df-f 5246  df-f1 5247  df-fo 5248  df-f1o 5249  df-fv 5250  df-riota 5861  df-ov 5909  df-oprab 5910  df-mpo 5911  df-1st 6180  df-2nd 6181  df-recs 6345  df-frec 6431  df-1o 6456  df-2o 6457  df-er 6574  df-en 6782  df-pnf 8042  df-mnf 8043  df-xr 8044  df-ltxr 8045  df-le 8046  df-sub 8178  df-neg 8179  df-reap 8580  df-ap 8587  df-div 8678  df-inn 8969  df-2 9027  df-3 9028  df-4 9029  df-n0 9227  df-z 9304  df-uz 9579  df-q 9671  df-rp 9706  df-fl 10325  df-seqfrec 10505  df-exp 10584  df-cj 10960  df-re 10961  df-im 10962  df-rsqrt 11116  df-abs 11117  df-dvds 11905  df-prm 12220

This theorem is referenced by:  gausslemma2dlem0i  15101  gausslemma2dlem6  15111  gausslemma2dlem7  15112  gausslemma2d  15113