---

Step * 3 of Lemma int-eq-constraint-factor


1. a : ℤ
2. g : ℤ-o
3. xs : ℤ List
4. L : ℤ List
5. (a rem g) = 0 ∈ ℤ
6. ((1 * (a ÷ g)) + xs ⋅ L) = 0 ∈ ℤ
⊢ ((1 * a) + xs ⋅ g * L) = 0 ∈ ℤ
BY
{ (Mul ⌜g⌝ (-1)⋅ THEN (RW  IntNormC (-1) THENA Auto) THEN NthHypEq (-1) THEN RepeatFor 2 ((EqCD THEN Auto))) }

1
.....subterm..... T:t
1:n
1. a : ℤ
2. g : ℤ-o
3. xs : ℤ List
4. L : ℤ List
5. (a rem g) = 0 ∈ ℤ
6. ((1 * (a ÷ g)) + xs ⋅ L) = 0 ∈ ℤ
7. ((g * (a ÷ g)) + (g * xs ⋅ L)) = 0 ∈ ℤ
⊢ (1 * a) = (g * (a ÷ g)) ∈ ℤ

---

Latex:

---

Latex:

1.  a  :  \mBbbZ{}
2.  g  :  \mBbbZ{}\msupminus{}\msupzero{}
3.  xs  :  \mBbbZ{}  List
4.  L  :  \mBbbZ{}  List
5.  (a  rem  g)  =  0
6.  ((1  *  (a  \mdiv{}  g))  +  xs  \mcdot{}  L)  =  0
\mvdash{}  ((1  *  a)  +  xs  \mcdot{}  g  *  L)  =  0


By

---

Latex:
(Mul  \mkleeneopen{}g\mkleeneclose{}  (-1)\mcdot{}
  THEN  (RW    IntNormC  (-1)  THENA  Auto)
  THEN  NthHypEq  (-1)
  THEN  RepeatFor  2  ((EqCD  THEN  Auto)))

---

Home Index