---

Step * of Lemma class-at-program_wf

∀[Info,B:Type]. ∀[X:EClass(B)]. ∀[pr:LocalClass(X)]. ∀[locs:bag(Id)].
  (pr)@locs ∈ LocalClass(X@locs) supposing valueall-type(B)
BY
{ (Auto
   THEN D (-3)
   THEN RepUR ``class-at-program`` 0
   THEN MemTypeCD
   THEN Auto
   THEN RepUR ``class-at class-ap`` 0
   THEN Fold `class-ap` 0
   THEN (RWO "-5" 0 THENA Auto)
   THEN AutoSplit
   THEN (RWO "iterate-hdf-halt" 0 THENA MaAuto)
   THEN RepUR ``hdf-halt hdf-ap`` 0
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[Info,B:Type].  \mforall{}[X:EClass(B)].  \mforall{}[pr:LocalClass(X)].  \mforall{}[locs:bag(Id)].
    (pr)@locs  \mmember{}  LocalClass(X@locs)  supposing  valueall-type(B)


By

---

Latex:
(Auto
  THEN  D  (-3)
  THEN  RepUR  ``class-at-program``  0
  THEN  MemTypeCD
  THEN  Auto
  THEN  RepUR  ``class-at  class-ap``  0
  THEN  Fold  `class-ap`  0
  THEN  (RWO  "-5"  0  THENA  Auto)
  THEN  AutoSplit
  THEN  (RWO  "iterate-hdf-halt"  0  THENA  MaAuto)
  THEN  RepUR  ``hdf-halt  hdf-ap``  0
  THEN  Auto)

---

Home Index