---

Step * of Lemma minus-polynom_wf

∀[n:ℕ]. ∀[p:polyform(n)].  (minus-polynom(n;p) ∈ polyform(n))
BY
{ (InductionOnNat
   THEN Auto
   THEN RecUnfold `polyform` 0
   THEN Reduce 0
   THEN RecUnfold `minus-polynom` 0
   THEN ((SplitOnConclITE THEN Auto) ORELSE (Reduce 0 THEN Auto))
   THEN RecUnfold `polyform` (-3)
   THEN SplitOnHypITE -3 
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[n:\mBbbN{}].  \mforall{}[p:polyform(n)].    (minus-polynom(n;p)  \mmember{}  polyform(n))


By

---

Latex:
(InductionOnNat
  THEN  Auto
  THEN  RecUnfold  `polyform`  0
  THEN  Reduce  0
  THEN  RecUnfold  `minus-polynom`  0
  THEN  ((SplitOnConclITE  THEN  Auto)  ORELSE  (Reduce  0  THEN  Auto))
  THEN  RecUnfold  `polyform`  (-3)
  THEN  SplitOnHypITE  -3 
  THEN  Auto)

---

Home Index