ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  zaddcllemneg GIF version

Theorem zaddcllemneg 9113
Description: Lemma for zaddcl 9114. Special case in which -𝑁 is a positive integer. (Contributed by Jim Kingdon, 14-Mar-2020.)
Assertion
Ref Expression
zaddcllemneg ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ) → (𝑀 + 𝑁) ∈ ℤ)

Proof of Theorem zaddcllemneg
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simp2 983 . . . . 5 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ) → 𝑁 ∈ ℝ)
21recnd 7814 . . . 4 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ) → 𝑁 ∈ ℂ)
32negnegd 8084 . . 3 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ) → --𝑁 = 𝑁)
43oveq2d 5794 . 2 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ) → (𝑀 + --𝑁) = (𝑀 + 𝑁))
5 negeq 7975 . . . . . . . 8 (𝑥 = 1 → -𝑥 = -1)
65oveq2d 5794 . . . . . . 7 (𝑥 = 1 → (𝑀 + -𝑥) = (𝑀 + -1))
76eleq1d 2209 . . . . . 6 (𝑥 = 1 → ((𝑀 + -𝑥) ∈ ℤ ↔ (𝑀 + -1) ∈ ℤ))
87imbi2d 229 . . . . 5 (𝑥 = 1 → (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → (𝑀 + -𝑥) ∈ ℤ) ↔ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → (𝑀 + -1) ∈ ℤ)))
9 negeq 7975 . . . . . . . 8 (𝑥 = 𝑦 → -𝑥 = -𝑦)
109oveq2d 5794 . . . . . . 7 (𝑥 = 𝑦 → (𝑀 + -𝑥) = (𝑀 + -𝑦))
1110eleq1d 2209 . . . . . 6 (𝑥 = 𝑦 → ((𝑀 + -𝑥) ∈ ℤ ↔ (𝑀 + -𝑦) ∈ ℤ))
1211imbi2d 229 . . . . 5 (𝑥 = 𝑦 → (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → (𝑀 + -𝑥) ∈ ℤ) ↔ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → (𝑀 + -𝑦) ∈ ℤ)))
13 negeq 7975 . . . . . . . 8 (𝑥 = (𝑦 + 1) → -𝑥 = -(𝑦 + 1))
1413oveq2d 5794 . . . . . . 7 (𝑥 = (𝑦 + 1) → (𝑀 + -𝑥) = (𝑀 + -(𝑦 + 1)))
1514eleq1d 2209 . . . . . 6 (𝑥 = (𝑦 + 1) → ((𝑀 + -𝑥) ∈ ℤ ↔ (𝑀 + -(𝑦 + 1)) ∈ ℤ))
1615imbi2d 229 . . . . 5 (𝑥 = (𝑦 + 1) → (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → (𝑀 + -𝑥) ∈ ℤ) ↔ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → (𝑀 + -(𝑦 + 1)) ∈ ℤ)))
17 negeq 7975 . . . . . . . 8 (𝑥 = -𝑁 → -𝑥 = --𝑁)
1817oveq2d 5794 . . . . . . 7 (𝑥 = -𝑁 → (𝑀 + -𝑥) = (𝑀 + --𝑁))
1918eleq1d 2209 . . . . . 6 (𝑥 = -𝑁 → ((𝑀 + -𝑥) ∈ ℤ ↔ (𝑀 + --𝑁) ∈ ℤ))
2019imbi2d 229 . . . . 5 (𝑥 = -𝑁 → (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → (𝑀 + -𝑥) ∈ ℤ) ↔ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → (𝑀 + --𝑁) ∈ ℤ)))
21 zcn 9079 . . . . . . . 8 (𝑀 ∈ ℤ → 𝑀 ∈ ℂ)
2221adantr 274 . . . . . . 7 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → 𝑀 ∈ ℂ)
23 1cnd 7802 . . . . . . 7 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → 1 ∈ ℂ)
2422, 23negsubd 8099 . . . . . 6 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → (𝑀 + -1) = (𝑀 − 1))
25 peano2zm 9112 . . . . . . 7 (𝑀 ∈ ℤ → (𝑀 − 1) ∈ ℤ)
2625adantr 274 . . . . . 6 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → (𝑀 − 1) ∈ ℤ)
2724, 26eqeltrd 2217 . . . . 5 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → (𝑀 + -1) ∈ ℤ)
28 nncn 8748 . . . . . . . . . . 11 (𝑦 ∈ ℕ → 𝑦 ∈ ℂ)
2928ad2antrr 480 . . . . . . . . . 10 (((𝑦 ∈ ℕ ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ)) ∧ (𝑀 + -𝑦) ∈ ℤ) → 𝑦 ∈ ℂ)
30 1cnd 7802 . . . . . . . . . 10 (((𝑦 ∈ ℕ ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ)) ∧ (𝑀 + -𝑦) ∈ ℤ) → 1 ∈ ℂ)
3129, 30negdi2d 8107 . . . . . . . . 9 (((𝑦 ∈ ℕ ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ)) ∧ (𝑀 + -𝑦) ∈ ℤ) → -(𝑦 + 1) = (-𝑦 − 1))
3231oveq2d 5794 . . . . . . . 8 (((𝑦 ∈ ℕ ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ)) ∧ (𝑀 + -𝑦) ∈ ℤ) → (𝑀 + -(𝑦 + 1)) = (𝑀 + (-𝑦 − 1)))
3322ad2antlr 481 . . . . . . . . . 10 (((𝑦 ∈ ℕ ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ)) ∧ (𝑀 + -𝑦) ∈ ℤ) → 𝑀 ∈ ℂ)
3429negcld 8080 . . . . . . . . . 10 (((𝑦 ∈ ℕ ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ)) ∧ (𝑀 + -𝑦) ∈ ℤ) → -𝑦 ∈ ℂ)
3533, 34, 30addsubassd 8113 . . . . . . . . 9 (((𝑦 ∈ ℕ ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ)) ∧ (𝑀 + -𝑦) ∈ ℤ) → ((𝑀 + -𝑦) − 1) = (𝑀 + (-𝑦 − 1)))
36 peano2zm 9112 . . . . . . . . . 10 ((𝑀 + -𝑦) ∈ ℤ → ((𝑀 + -𝑦) − 1) ∈ ℤ)
3736adantl 275 . . . . . . . . 9 (((𝑦 ∈ ℕ ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ)) ∧ (𝑀 + -𝑦) ∈ ℤ) → ((𝑀 + -𝑦) − 1) ∈ ℤ)
3835, 37eqeltrrd 2218 . . . . . . . 8 (((𝑦 ∈ ℕ ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ)) ∧ (𝑀 + -𝑦) ∈ ℤ) → (𝑀 + (-𝑦 − 1)) ∈ ℤ)
3932, 38eqeltrd 2217 . . . . . . 7 (((𝑦 ∈ ℕ ∧ (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ)) ∧ (𝑀 + -𝑦) ∈ ℤ) → (𝑀 + -(𝑦 + 1)) ∈ ℤ)
4039exp31 362 . . . . . 6 (𝑦 ∈ ℕ → ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → ((𝑀 + -𝑦) ∈ ℤ → (𝑀 + -(𝑦 + 1)) ∈ ℤ)))
4140a2d 26 . . . . 5 (𝑦 ∈ ℕ → (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → (𝑀 + -𝑦) ∈ ℤ) → ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → (𝑀 + -(𝑦 + 1)) ∈ ℤ)))
428, 12, 16, 20, 27, 41nnind 8756 . . . 4 (-𝑁 ∈ ℕ → ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) → (𝑀 + --𝑁) ∈ ℤ))
4342impcom 124 . . 3 (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ) ∧ -𝑁 ∈ ℕ) → (𝑀 + --𝑁) ∈ ℤ)
44433impa 1177 . 2 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ) → (𝑀 + --𝑁) ∈ ℤ)
454, 44eqeltrrd 2218 1 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ) → (𝑀 + 𝑁) ∈ ℤ)
Colors of variables: wff set class
Syntax hints:  wi 4  wa 103  w3a 963   = wceq 1332  wcel 1481  (class class class)co 5778  cc 7638  cr 7639  1c1 7641   + caddc 7643  cmin 7953  -cneg 7954  cn 8740  cz 9074
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-in1 604  ax-in2 605  ax-io 699  ax-5 1424  ax-7 1425  ax-gen 1426  ax-ie1 1470  ax-ie2 1471  ax-8 1483  ax-10 1484  ax-11 1485  ax-i12 1486  ax-bndl 1487  ax-4 1488  ax-13 1492  ax-14 1493  ax-17 1507  ax-i9 1511  ax-ial 1515  ax-i5r 1516  ax-ext 2122  ax-sep 4050  ax-pow 4102  ax-pr 4135  ax-un 4359  ax-setind 4456  ax-cnex 7731  ax-resscn 7732  ax-1cn 7733  ax-1re 7734  ax-icn 7735  ax-addcl 7736  ax-addrcl 7737  ax-mulcl 7738  ax-addcom 7740  ax-addass 7742  ax-distr 7744  ax-i2m1 7745  ax-0lt1 7746  ax-0id 7748  ax-rnegex 7749  ax-cnre 7751  ax-pre-ltirr 7752  ax-pre-ltwlin 7753  ax-pre-lttrn 7754  ax-pre-ltadd 7756
This theorem depends on definitions:  df-bi 116  df-3or 964  df-3an 965  df-tru 1335  df-fal 1338  df-nf 1438  df-sb 1737  df-eu 2003  df-mo 2004  df-clab 2127  df-cleq 2133  df-clel 2136  df-nfc 2271  df-ne 2310  df-nel 2405  df-ral 2422  df-rex 2423  df-reu 2424  df-rab 2426  df-v 2689  df-sbc 2911  df-dif 3074  df-un 3076  df-in 3078  df-ss 3085  df-pw 3513  df-sn 3534  df-pr 3535  df-op 3537  df-uni 3741  df-int 3776  df-br 3934  df-opab 3994  df-id 4219  df-xp 4549  df-rel 4550  df-cnv 4551  df-co 4552  df-dm 4553  df-iota 5092  df-fun 5129  df-fv 5135  df-riota 5734  df-ov 5781  df-oprab 5782  df-mpo 5783  df-pnf 7822  df-mnf 7823  df-xr 7824  df-ltxr 7825  df-le 7826  df-sub 7955  df-neg 7956  df-inn 8741  df-n0 8998  df-z 9075
This theorem is referenced by:  zaddcl  9114
  Copyright terms: Public domain W3C validator