Step
*
2
1
of Lemma
compose-polynom_wf
.....falsecase..... 
1. n : ℕ
2. p : polynom(n)
3. q : polynom(n)
4. ¬(n = 0 ∈ ℤ)
5. q ∈ polynom(n - 1) List
6. z : polynom(n)
7. a : polynom(n - 1)
8. ¬↑poly-zero(n - 1;a)
9. ¬(n = 0 ∈ ℤ)
⊢ [a] ∈ {p:polynom(n - 1) List| polyform-lead-nonzero(n;p)} 
BY
{ (RepUR ``polyform-lead-nonzero`` 0 THEN MemTypeCD THEN Reduce 0 THEN Auto) }
Latex:
Latex:
.....falsecase..... 
1.  n  :  \mBbbN{}
2.  p  :  polynom(n)
3.  q  :  polynom(n)
4.  \mneg{}(n  =  0)
5.  q  \mmember{}  polynom(n  -  1)  List
6.  z  :  polynom(n)
7.  a  :  polynom(n  -  1)
8.  \mneg{}\muparrow{}poly-zero(n  -  1;a)
9.  \mneg{}(n  =  0)
\mvdash{}  [a]  \mmember{}  \{p:polynom(n  -  1)  List|  polyform-lead-nonzero(n;p)\} 
By
Latex:
(RepUR  ``polyform-lead-nonzero``  0  THEN  MemTypeCD  THEN  Reduce  0  THEN  Auto)
Home
Index