Step
*
of Lemma
eager-map-is-map
∀[A,B:Type].  ∀[f:A ⟶ B]. ∀[l:A List].  (eager-map(f;l) ~ map(f;l)) supposing value-type(B)
BY
{ ((UnivCD THENA Auto)
   THEN Unfold `eager-map` 0
   THEN ListInd (-1)
   THEN Reduce 0
   THEN Auto
   THEN HypSubst' (-1) 0
   THEN RepeatFor 2 ((CallByValueReduce 0 THEN Auto))) }
Latex:
Latex:
\mforall{}[A,B:Type].    \mforall{}[f:A  {}\mrightarrow{}  B].  \mforall{}[l:A  List].    (eager-map(f;l)  \msim{}  map(f;l))  supposing  value-type(B)
By
Latex:
((UnivCD  THENA  Auto)
  THEN  Unfold  `eager-map`  0
  THEN  ListInd  (-1)
  THEN  Reduce  0
  THEN  Auto
  THEN  HypSubst'  (-1)  0
  THEN  RepeatFor  2  ((CallByValueReduce  0  THEN  Auto)))
Home
Index