---

Step * 1 1 2 1 of Lemma loop-class-state-program_wf


1. Info : Type
2. B : Type
3. valueall-type(B)
4. X : EClass(B ─→ B)
5. init : Id ─→ bag(B)
6. pr : Id ─→ hdataflow(Info;B ─→ B)
7. ∀es:EO+(Info). ∀e:E.  (X(e) = (snd(pr loc(e)*(map(λx.info(x);before(e)))(info(e)))) ∈ bag(B ─→ B))
8. es : EO+(Info)@i'
9. e : E@i
10. ∀e1:E
      ((e1 < e)
      ⇒ (hdf-state(pr loc(e1);init loc(e1))*(map(λx.info(x);before(e1)))
         = hdf-state(pr loc(e1)*(map(λx.info(x);before(e1)));Prior(loop-class-state(X;init))?init(e1))
         ∈ hdataflow(Info;B)))
11. ¬↑first(e)
12. hdf-state(pr loc(e);init loc(e))*(map(λx.info(x);before(pred(e))))
= hdf-state(pr loc(e)*(map(λx.info(x);before(pred(e))));Prior(loop-class-state(X;init))?init(pred(e)))
∈ hdataflow(Info;B)
13. v : bag(B)@i
14. Prior(loop-class-state(X;init))?init(pred(e)) = v ∈ bag(B)@i
15. y : 0 = 0 ∈ ℤ
16. 0 < #(loop-class-state(X;init)(pred(e)))
17. pr loc(pred(e))*(map(λx.info(x);before(pred(e)))) = hdf-halt() ∈ hdataflow(Info;B ─→ B)@i
⊢ hdf-state(hdf-halt();v) = hdf-state(hdf-halt();loop-class-state(X;init)(pred(e))) ∈ hdataflow(Info;B)
BY
{ (MoveToConcl (-2)
   THEN RecUnfold `loop-class-state` 0
   THEN RepUR ``eclass-cond class-ap member-eclass eclass3`` 0
   THEN Fold `class-ap` 0
   THEN (RWO "7" 0 THENA Auto)
   THEN (HypSubst' (-1) 0 THENA Auto)
   THEN Reduce 0
   THEN HypSubst' (-3) 0
   THEN Auto)⋅ }

---

Latex:

---

Latex:

1.  Info  :  Type
2.  B  :  Type
3.  valueall-type(B)
4.  X  :  EClass(B  {}\mrightarrow{}  B)
5.  init  :  Id  {}\mrightarrow{}  bag(B)
6.  pr  :  Id  {}\mrightarrow{}  hdataflow(Info;B  {}\mrightarrow{}  B)
7.  \mforall{}es:EO+(Info).  \mforall{}e:E.    (X(e)  =  (snd(pr  loc(e)*(map(\mlambda{}x.info(x);before(e)))(info(e)))))
8.  es  :  EO+(Info)@i'
9.  e  :  E@i
10.  \mforall{}e1:E
            ((e1  <  e)
            {}\mRightarrow{}  (hdf-state(pr  loc(e1);init  loc(e1))*(map(\mlambda{}x.info(x);before(e1)))
                  =  hdf-state(pr  loc(e1)*(map(\mlambda{}x.info(x);
                                                                          before(e1)));Prior(loop-class-state(X;init))?init(e1))))
11.  \mneg{}\muparrow{}first(e)
12.  hdf-state(pr  loc(e);init  loc(e))*(map(\mlambda{}x.info(x);before(pred(e))))
=  hdf-state(pr  loc(e)*(map(\mlambda{}x.info(x);
                                                      before(pred(e))));Prior(loop-class-state(X;init))?init(pred(e)))
13.  v  :  bag(B)@i
14.  Prior(loop-class-state(X;init))?init(pred(e))  =  v@i
15.  y  :  0  =  0
16.  0  <  \#(loop-class-state(X;init)(pred(e)))
17.  pr  loc(pred(e))*(map(\mlambda{}x.info(x);before(pred(e))))  =  hdf-halt()@i
\mvdash{}  hdf-state(hdf-halt();v)  =  hdf-state(hdf-halt();loop-class-state(X;init)(pred(e)))


By

---

Latex:
(MoveToConcl  (-2)
  THEN  RecUnfold  `loop-class-state`  0
  THEN  RepUR  ``eclass-cond  class-ap  member-eclass  eclass3``  0
  THEN  Fold  `class-ap`  0
  THEN  (RWO  "7"  0  THENA  Auto)
  THEN  (HypSubst'  (-1)  0  THENA  Auto)
  THEN  Reduce  0
  THEN  HypSubst'  (-3)  0
  THEN  Auto)\mcdot{}

---

Home Index