Step
*
of Lemma
Accum-class-es-sv1
∀[Info,A,B:Type]. ∀[es:EO+(Info)]. ∀[X:EClass(A)]. ∀[init:Id ─→ bag(B)]. ∀[f:A ─→ B ─→ B].
  (es-sv-class(es;Accum-class(f;init;X))) supposing ((∀l:Id. (#(init l) ≤ 1)) and es-sv-class(es;X))
BY
{ ((UnivCD THENA MaAuto) THEN Unfold `Accum-class` 0 THEN ProveEsSvClass THEN MaAuto) }
Latex:
Latex:
\mforall{}[Info,A,B:Type].  \mforall{}[es:EO+(Info)].  \mforall{}[X:EClass(A)].  \mforall{}[init:Id  {}\mrightarrow{}  bag(B)].  \mforall{}[f:A  {}\mrightarrow{}  B  {}\mrightarrow{}  B].
    (es-sv-class(es;Accum-class(f;init;X)))  supposing  ((\mforall{}l:Id.  (\#(init  l)  \mleq{}  1))  and  es-sv-class(es;X))
By
Latex:
((UnivCD  THENA  MaAuto)  THEN  Unfold  `Accum-class`  0  THEN  ProveEsSvClass  THEN  MaAuto)
Home
Index