Step * 2 of Lemma mul-list-append


1. : ℤ
2. : ℤ List
3. ∀[ns2:ℤ List]. (v ns2)  ~ Π(v)  * Π(ns2) )
⊢ ∀[ns2:ℤ List]. ([u (v ns2)])  ~ Π([u v])  * Π(ns2) )
BY
xxx(Unfold `mul-list` THEN Reduce THEN Fold `mul-list` THEN Auto)xxx }


Latex:


Latex:

1.  u  :  \mBbbZ{}
2.  v  :  \mBbbZ{}  List
3.  \mforall{}[ns2:\mBbbZ{}  List].  (\mPi{}(v  @  ns2)    \msim{}  \mPi{}(v)    *  \mPi{}(ns2)  )
\mvdash{}  \mforall{}[ns2:\mBbbZ{}  List].  (\mPi{}([u  /  (v  @  ns2)])    \msim{}  \mPi{}([u  /  v])    *  \mPi{}(ns2)  )


By


Latex:
xxx(Unfold  `mul-list`  0  THEN  Reduce  0  THEN  Fold  `mul-list`  0  THEN  Auto)xxx




Home Index