Step * 2 of Lemma real_polynomial_null


1. int_term()
2. iMonomial()
3. iMonomial() List
4. ipolynomial-term([u v]) ≡ t
5. inl Ax ≤ ff
⊢ t ≡ "0"
BY
(Fold `it` (-1) THEN Fold `btrue` (-1) THEN Assert ⌜¬(tt ≤ ff)⌝⋅ THEN Auto) }


Latex:


Latex:

1.  t  :  int\_term()
2.  u  :  iMonomial()
3.  v  :  iMonomial()  List
4.  ipolynomial-term([u  /  v])  \mequiv{}  t
5.  inl  Ax  \mleq{}  ff
\mvdash{}  t  \mequiv{}  "0"


By


Latex:
(Fold  `it`  (-1)  THEN  Fold  `btrue`  (-1)  THEN  Assert  \mkleeneopen{}\mneg{}(tt  \mleq{}  ff)\mkleeneclose{}\mcdot{}  THEN  Auto)




Home Index