---

Step * of Lemma polyconst_wf

∀[n:ℕ]. ∀[k:ℤ].  (polyconst(n;k) ∈ polynom(n))
BY
{ (InductionOnNat
   THEN RecUnfold `polyconst` 0
   THEN RecUnfold `polynom` 0
   THEN Reduce 0
   THEN Auto
   THEN AutoSplit
   THEN MemTypeCD
   THEN Auto
   THEN ((RecUnfold `polyform` 0 THEN Auto) ORELSE (D 0 THEN Reduce 0 THEN Auto))) }

1
1. n : ℤ
2. n ≠ 0
3. 0 < n
4. ∀[k:ℤ]. (polyconst(n - 1;k) ∈ polynom(n - 1))
5. k : ℤ
6. ¬(n = 0 ∈ ℤ)
7. ¬(k = 0 ∈ ℤ)
8. 0 < n
9. 0 < 1
⊢ ¬↑poly-zero(n - 1;polyconst(n - 1;k))

---

Latex:

---

Latex:
\mforall{}[n:\mBbbN{}].  \mforall{}[k:\mBbbZ{}].    (polyconst(n;k)  \mmember{}  polynom(n))


By

---

Latex:
(InductionOnNat
  THEN  RecUnfold  `polyconst`  0
  THEN  RecUnfold  `polynom`  0
  THEN  Reduce  0
  THEN  Auto
  THEN  AutoSplit
  THEN  MemTypeCD
  THEN  Auto
  THEN  ((RecUnfold  `polyform`  0  THEN  Auto)  ORELSE  (D  0  THEN  Reduce  0  THEN  Auto)))

---

Home Index