Step
*
of Lemma
length_zip
∀[T1,T2:Type]. ∀[as:T1 List]. ∀[bs:T2 List].  ||zip(as;bs)|| = ||as|| ∈ ℤ supposing ||as|| = ||bs|| ∈ ℤ
BY
{ (InductionOnList THEN Try (InductionOnList⋅) THEN RecUnfold `zip` 0 THEN Reduce 0 THEN Auto) }
Latex:
Latex:
\mforall{}[T1,T2:Type].  \mforall{}[as:T1  List].  \mforall{}[bs:T2  List].    ||zip(as;bs)||  =  ||as||  supposing  ||as||  =  ||bs||
By
Latex:
(InductionOnList  THEN  Try  (InductionOnList\mcdot{})  THEN  RecUnfold  `zip`  0  THEN  Reduce  0  THEN  Auto)
Home
Index