---

Step * of Lemma rem-exact

∀[g:ℤ-o]. ∀[v:ℤ].  ((g * v rem g) = 0 ∈ ℤ)
BY
{ (Auto
   THEN (InstLemma `div_rem_sum` [⌜g * v⌝;⌜g⌝]⋅ THENA Auto)
   THEN (RWO "divide-exact" (-1) THENA Auto)
   THEN Add ⌜-(v * g)⌝ (-1)⋅
   THEN RW IntNormC (-1)
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[g:\mBbbZ{}\msupminus{}\msupzero{}].  \mforall{}[v:\mBbbZ{}].    ((g  *  v  rem  g)  =  0)


By

---

Latex:
(Auto
  THEN  (InstLemma  `div\_rem\_sum`  [\mkleeneopen{}g  *  v\mkleeneclose{};\mkleeneopen{}g\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  (RWO  "divide-exact"  (-1)  THENA  Auto)
  THEN  Add  \mkleeneopen{}-(v  *  g)\mkleeneclose{}  (-1)\mcdot{}
  THEN  RW  IntNormC  (-1)
  THEN  Auto)

---

Home Index