Step
*
of Lemma
no_repeats-polynomial-mon-vars
∀p:iMonomial() List. ∀L:ℤ List List.  (no_repeats(ℤ List;L) 
⇒ no_repeats(ℤ List;polynomial-mon-vars(L;p)))
BY
{ (Unfold `polynomial-mon-vars` 0 THEN InductionOnList THEN Reduce 0 THEN Auto THEN BHyp 3  THEN Auto) }
1
1. u : iMonomial()@i
2. v : iMonomial() List@i
3. ∀L:ℤ List List
     (no_repeats(ℤ List;L)
     
⇒ no_repeats(ℤ List;accumulate (with value vss and list item m):
                           let c,vs = m 
                           in insert(vs;vss)
                          over list:
                            v
                          with starting value:
                           L)))@i
4. L : ℤ List List@i
5. no_repeats(ℤ List;L)@i
⊢ no_repeats(ℤ List;let c,vs = u 
                    in insert(vs;L))
Latex:
Latex:
\mforall{}p:iMonomial()  List.  \mforall{}L:\mBbbZ{}  List  List.
    (no\_repeats(\mBbbZ{}  List;L)  {}\mRightarrow{}  no\_repeats(\mBbbZ{}  List;polynomial-mon-vars(L;p)))
By
Latex:
(Unfold  `polynomial-mon-vars`  0  THEN  InductionOnList  THEN  Reduce  0  THEN  Auto  THEN  BHyp  3    THEN  Auto)
Home
Index