---

Step * 1 of Lemma add-polynom_wf


1. k : ℕ
2. ∀k:ℕk. ∀[n:ℕ]. ∀[p,q:polyform(n)].  (((tree_size(p) + tree_size(q)) ≤ k) ⇒ (add-polynom(p;q) ∈ polyform(n)))
3. n : ℕ
4. p1 : ℤ
5. True
6. q1 : ℤ
7. True
8. 0 ≤ k
⊢ eval a = p1 + q1 in
  tree_leaf(a) ∈ polyform(n)
BY
{ (Fold `polyconst` 0 THEN Auto) }

---

Latex:

---

Latex:

1.  k  :  \mBbbN{}
2.  \mforall{}k:\mBbbN{}k
          \mforall{}[n:\mBbbN{}].  \mforall{}[p,q:polyform(n)].
              (((tree\_size(p)  +  tree\_size(q))  \mleq{}  k)  {}\mRightarrow{}  (add-polynom(p;q)  \mmember{}  polyform(n)))
3.  n  :  \mBbbN{}
4.  p1  :  \mBbbZ{}
5.  True
6.  q1  :  \mBbbZ{}
7.  True
8.  0  \mleq{}  k
\mvdash{}  eval  a  =  p1  +  q1  in
    tree\_leaf(a)  \mmember{}  polyform(n)


By

---

Latex:
(Fold  `polyconst`  0  THEN  Auto)

---

Home Index