---

Step * of Lemma hdf-base-ap

∀[A,B:Type]. ∀[F:A ─→ bag(B)]. ∀[a:A].  (hdf-base(m.F[m])(a) = <hdf-base(m.F[m]), F[a]> ∈ (hdataflow(A;B) × bag(B)))
BY
{ (Auto
   THEN RepUR ``hdf-base`` 0
   THEN RW (AddrC [2] (RecUnfoldC `mk-hdf`)) 0
   THEN Reduce 0
   THEN RWO "hdf-ap-run" 0
   THEN Reduce 0
   THEN Try (Fold `hdf-base` 0)
   THEN Auto) }

---

Latex:


\mforall{}[A,B:Type].  \mforall{}[F:A  {}\mrightarrow{}  bag(B)].  \mforall{}[a:A].    (hdf-base(m.F[m])(a)  =  <hdf-base(m.F[m]),  F[a]>)


By

(Auto
  THEN  RepUR  ``hdf-base``  0
  THEN  RW  (AddrC  [2]  (RecUnfoldC  `mk-hdf`))  0
  THEN  Reduce  0
  THEN  RWO  "hdf-ap-run"  0
  THEN  Reduce  0
  THEN  Try  (Fold  `hdf-base`  0)
  THEN  Auto)

---

Home Index