Theorem nn0sub 12384

Description: Subtraction of nonnegative integers. (Contributed by NM, 9-May-2004.) (Proof shortened by Mario Carneiro, 16-May-2014.)

Assertion

Ref	Expression
nn0sub	⊢ ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → (𝑀 ≤ 𝑁 ↔ (𝑁 − 𝑀) ∈ ℕ0))

Proof of Theorem nn0sub

Step	Hyp	Ref	Expression
1		nn0re 12343	. . . 4 ⊢ (𝑀 ∈ ℕ0 → 𝑀 ∈ ℝ)
2		nn0re 12343	. . . 4 ⊢ (𝑁 ∈ ℕ0 → 𝑁 ∈ ℝ)
3		leloe 11162	. . . 4 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (𝑀 ≤ 𝑁 ↔ (𝑀 < 𝑁 ∨ 𝑀 = 𝑁)))
4	1, 2, 3	syl2an 596	. . 3 ⊢ ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → (𝑀 ≤ 𝑁 ↔ (𝑀 < 𝑁 ∨ 𝑀 = 𝑁)))
5		elnn0 12336	. . . . . 6 ⊢ (𝑁 ∈ ℕ0 ↔ (𝑁 ∈ ℕ ∨ 𝑁 = 0))
6		elnn0 12336	. . . . . . . 8 ⊢ (𝑀 ∈ ℕ0 ↔ (𝑀 ∈ ℕ ∨ 𝑀 = 0))
7		nnsub 12118	. . . . . . . . . 10 ⊢ ((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑀 < 𝑁 ↔ (𝑁 − 𝑀) ∈ ℕ))
8	7	ex 413	. . . . . . . . 9 ⊢ (𝑀 ∈ ℕ → (𝑁 ∈ ℕ → (𝑀 < 𝑁 ↔ (𝑁 − 𝑀) ∈ ℕ)))
9		nngt0 12105	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → 0 < 𝑁)
10		nncn 12082	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℂ)
11	10	subid1d 11422	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → (𝑁 − 0) = 𝑁)
12		id 22	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℕ)
13	11, 12	eqeltrd 2837	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → (𝑁 − 0) ∈ ℕ)
14	9, 13	2thd 264	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → (0 < 𝑁 ↔ (𝑁 − 0) ∈ ℕ))
15		breq1 5095	. . . . . . . . . . 11 ⊢ (𝑀 = 0 → (𝑀 < 𝑁 ↔ 0 < 𝑁))
16		oveq2 7345	. . . . . . . . . . . 12 ⊢ (𝑀 = 0 → (𝑁 − 𝑀) = (𝑁 − 0))
17	16	eleq1d 2821	. . . . . . . . . . 11 ⊢ (𝑀 = 0 → ((𝑁 − 𝑀) ∈ ℕ ↔ (𝑁 − 0) ∈ ℕ))
18	15, 17	bibi12d 345	. . . . . . . . . 10 ⊢ (𝑀 = 0 → ((𝑀 < 𝑁 ↔ (𝑁 − 𝑀) ∈ ℕ) ↔ (0 < 𝑁 ↔ (𝑁 − 0) ∈ ℕ)))
19	14, 18	syl5ibr 245	. . . . . . . . 9 ⊢ (𝑀 = 0 → (𝑁 ∈ ℕ → (𝑀 < 𝑁 ↔ (𝑁 − 𝑀) ∈ ℕ)))
20	8, 19	jaoi 854	. . . . . . . 8 ⊢ ((𝑀 ∈ ℕ ∨ 𝑀 = 0) → (𝑁 ∈ ℕ → (𝑀 < 𝑁 ↔ (𝑁 − 𝑀) ∈ ℕ)))
21	6, 20	sylbi 216	. . . . . . 7 ⊢ (𝑀 ∈ ℕ0 → (𝑁 ∈ ℕ → (𝑀 < 𝑁 ↔ (𝑁 − 𝑀) ∈ ℕ)))
22		nn0nlt0 12360	. . . . . . . . . 10 ⊢ (𝑀 ∈ ℕ0 → ¬ 𝑀 < 0)
23	22	pm2.21d 121	. . . . . . . . 9 ⊢ (𝑀 ∈ ℕ0 → (𝑀 < 0 → (0 − 𝑀) ∈ ℕ))
24		nngt0 12105	. . . . . . . . . 10 ⊢ ((0 − 𝑀) ∈ ℕ → 0 < (0 − 𝑀))
25		0re 11078	. . . . . . . . . . 11 ⊢ 0 ∈ ℝ
26		posdif 11569	. . . . . . . . . . 11 ⊢ ((𝑀 ∈ ℝ ∧ 0 ∈ ℝ) → (𝑀 < 0 ↔ 0 < (0 − 𝑀)))
27	1, 25, 26	sylancl 586	. . . . . . . . . 10 ⊢ (𝑀 ∈ ℕ0 → (𝑀 < 0 ↔ 0 < (0 − 𝑀)))
28	24, 27	syl5ibr 245	. . . . . . . . 9 ⊢ (𝑀 ∈ ℕ0 → ((0 − 𝑀) ∈ ℕ → 𝑀 < 0))
29	23, 28	impbid 211	. . . . . . . 8 ⊢ (𝑀 ∈ ℕ0 → (𝑀 < 0 ↔ (0 − 𝑀) ∈ ℕ))
30		breq2 5096	. . . . . . . . 9 ⊢ (𝑁 = 0 → (𝑀 < 𝑁 ↔ 𝑀 < 0))
31		oveq1 7344	. . . . . . . . . 10 ⊢ (𝑁 = 0 → (𝑁 − 𝑀) = (0 − 𝑀))
32	31	eleq1d 2821	. . . . . . . . 9 ⊢ (𝑁 = 0 → ((𝑁 − 𝑀) ∈ ℕ ↔ (0 − 𝑀) ∈ ℕ))
33	30, 32	bibi12d 345	. . . . . . . 8 ⊢ (𝑁 = 0 → ((𝑀 < 𝑁 ↔ (𝑁 − 𝑀) ∈ ℕ) ↔ (𝑀 < 0 ↔ (0 − 𝑀) ∈ ℕ)))
34	29, 33	syl5ibrcom 246	. . . . . . 7 ⊢ (𝑀 ∈ ℕ0 → (𝑁 = 0 → (𝑀 < 𝑁 ↔ (𝑁 − 𝑀) ∈ ℕ)))
35	21, 34	jaod 856	. . . . . 6 ⊢ (𝑀 ∈ ℕ0 → ((𝑁 ∈ ℕ ∨ 𝑁 = 0) → (𝑀 < 𝑁 ↔ (𝑁 − 𝑀) ∈ ℕ)))
36	5, 35	biimtrid 241	. . . . 5 ⊢ (𝑀 ∈ ℕ0 → (𝑁 ∈ ℕ0 → (𝑀 < 𝑁 ↔ (𝑁 − 𝑀) ∈ ℕ)))
37	36	imp 407	. . . 4 ⊢ ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → (𝑀 < 𝑁 ↔ (𝑁 − 𝑀) ∈ ℕ))
38		nn0cn 12344	. . . . . 6 ⊢ (𝑁 ∈ ℕ0 → 𝑁 ∈ ℂ)
39		nn0cn 12344	. . . . . 6 ⊢ (𝑀 ∈ ℕ0 → 𝑀 ∈ ℂ)
40		subeq0 11348	. . . . . 6 ⊢ ((𝑁 ∈ ℂ ∧ 𝑀 ∈ ℂ) → ((𝑁 − 𝑀) = 0 ↔ 𝑁 = 𝑀))
41	38, 39, 40	syl2anr 597	. . . . 5 ⊢ ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → ((𝑁 − 𝑀) = 0 ↔ 𝑁 = 𝑀))
42		eqcom 2743	. . . . 5 ⊢ (𝑁 = 𝑀 ↔ 𝑀 = 𝑁)
43	41, 42	bitr2di 287	. . . 4 ⊢ ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → (𝑀 = 𝑁 ↔ (𝑁 − 𝑀) = 0))
44	37, 43	orbi12d 916	. . 3 ⊢ ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → ((𝑀 < 𝑁 ∨ 𝑀 = 𝑁) ↔ ((𝑁 − 𝑀) ∈ ℕ ∨ (𝑁 − 𝑀) = 0)))
45	4, 44	bitrd 278	. 2 ⊢ ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → (𝑀 ≤ 𝑁 ↔ ((𝑁 − 𝑀) ∈ ℕ ∨ (𝑁 − 𝑀) = 0)))
46		elnn0 12336	. 2 ⊢ ((𝑁 − 𝑀) ∈ ℕ0 ↔ ((𝑁 − 𝑀) ∈ ℕ ∨ (𝑁 − 𝑀) = 0))
47	45, 46	bitr4di 288	1 ⊢ ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → (𝑀 ≤ 𝑁 ↔ (𝑁 − 𝑀) ∈ ℕ0))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 396   ∨ wo 844   = wceq 1540   ∈ wcel 2105   class class class wbr 5092  (class class class)co 7337  ℂcc 10970  ℝcr 10971  0cc0 10972   < clt 11110   ≤ cle 11111   − cmin 11306  ℕcn 12074  ℕ₀cn0 12334

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2707  ax-sep 5243  ax-nul 5250  ax-pow 5308  ax-pr 5372  ax-un 7650  ax-resscn 11029  ax-1cn 11030  ax-icn 11031  ax-addcl 11032  ax-addrcl 11033  ax-mulcl 11034  ax-mulrcl 11035  ax-mulcom 11036  ax-addass 11037  ax-mulass 11038  ax-distr 11039  ax-i2m1 11040  ax-1ne0 11041  ax-1rid 11042  ax-rnegex 11043  ax-rrecex 11044  ax-cnre 11045  ax-pre-lttri 11046  ax-pre-lttrn 11047  ax-pre-ltadd 11048  ax-pre-mulgt0 11049

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2886  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-reu 3350  df-rab 3404  df-v 3443  df-sbc 3728  df-csb 3844  df-dif 3901  df-un 3903  df-in 3905  df-ss 3915  df-pss 3917  df-nul 4270  df-if 4474  df-pw 4549  df-sn 4574  df-pr 4576  df-op 4580  df-uni 4853  df-iun 4943  df-br 5093  df-opab 5155  df-mpt 5176  df-tr 5210  df-id 5518  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5575  df-we 5577  df-xp 5626  df-rel 5627  df-cnv 5628  df-co 5629  df-dm 5630  df-rn 5631  df-res 5632  df-ima 5633  df-pred 6238  df-ord 6305  df-on 6306  df-lim 6307  df-suc 6308  df-iota 6431  df-fun 6481  df-fn 6482  df-f 6483  df-f1 6484  df-fo 6485  df-f1o 6486  df-fv 6487  df-riota 7293  df-ov 7340  df-oprab 7341  df-mpo 7342  df-om 7781  df-2nd 7900  df-frecs 8167  df-wrecs 8198  df-recs 8272  df-rdg 8311  df-er 8569  df-en 8805  df-dom 8806  df-sdom 8807  df-pnf 11112  df-mnf 11113  df-xr 11114  df-ltxr 11115  df-le 11116  df-sub 11308  df-neg 11309  df-nn 12075  df-n0 12335

This theorem is referenced by:  ltsubnn0  12385  nn0n0n1ge2  12401  elz2  12438  nn0sub2  12482  fz0fzdiffz0  13466  ubmelfzo  13553  repswcshw  14623  swrd2lsw  14764  2swrd2eqwrdeq  14765  psrbagcon  21239  psrbagconOLD  21240  mhpmulcl  21445  coe1tmmul2  21553  aaliou3lem6  25614  basellem5  26340  crctcshwlkn0lem5  28467  eucrctshift  28895  pfxlsw2ccat  31511  wrdt2ind  31512  omndmul3  31626  lpadleft  32963  lcmineqlem1  40299  lcmineqlem2  40300  sticksstones12a  40378  jm2.27c  41100  binomcxplemnn0  42296  dvnxpaek  43827  subsubelfzo0  45177  fmtnoprmfac2lem1  45377  digexp  46312  itcovalt2lem2lem1  46378  ackval42  46401