Step
*
of Lemma
list_accum'_wf
∀[A,B:Type].
  ∀[f:B ⟶ {L:A List| 0 < ||L||}  ⟶ B]. ∀[L:A List]. ∀[v:B].  (list_accum'(f;v;L) ∈ B) supposing valueall-type(B)
BY
{ ((InductionOnList THEN Auto)
   THEN RecUnfold `list_accum\'` 0
   THEN Reduce 0
   THEN Try (Trivial)
   THEN CallByValueReduce 0⋅
   THEN Auto) }
Latex:
Latex:
\mforall{}[A,B:Type].
    \mforall{}[f:B  {}\mrightarrow{}  \{L:A  List|  0  <  ||L||\}    {}\mrightarrow{}  B].  \mforall{}[L:A  List].  \mforall{}[v:B].    (list\_accum'(f;v;L)  \mmember{}  B) 
    supposing  valueall-type(B)
By
Latex:
((InductionOnList  THEN  Auto)
  THEN  RecUnfold  `list\_accum\mbackslash{}'`  0
  THEN  Reduce  0
  THEN  Try  (Trivial)
  THEN  CallByValueReduce  0\mcdot{}
  THEN  Auto)
Home
Index