Step
*
of Lemma
loop-class2_wf
∀[Info,B:Type]. ∀[X:EClass(B ─→ B)]. ∀[init:Id ─→ bag(B)].  (loop-class2(X;init) ∈ EClass(B))
BY
{ (Auto
   THEN (Unfold `eclass` 0 THEN RepeatFor 2 ((BetterExt THEN Auto)))
   THEN MoveToConcl (-1)
   THEN CausalInd'
   THEN (RecUnfold `loop-class2` 0 THEN RepUR ``eclass3`` 0 THEN RepeatFor 2 ((MemCD THEN Try (Complete (Auto)))))⋅) }
1
.....subterm..... T:t
2:n
1. Info : Type
2. B : Type
3. X : EClass(B ─→ B)
4. init : Id ─→ bag(B)
5. es : EO+(Info)@i'
6. e : E@i
7. ∀e1:E. ((e1 < e) 
⇒ (loop-class2(X;init) es e1 ∈ bag(B)))
8. f : B ─→ B@i
⊢ Prior(loop-class2(X;init))?init(e) ∈ bag(B)
Latex:
Latex:
\mforall{}[Info,B:Type].  \mforall{}[X:EClass(B  {}\mrightarrow{}  B)].  \mforall{}[init:Id  {}\mrightarrow{}  bag(B)].    (loop-class2(X;init)  \mmember{}  EClass(B))
By
Latex:
(Auto
  THEN  (Unfold  `eclass`  0  THEN  RepeatFor  2  ((BetterExt  THEN  Auto)))
  THEN  MoveToConcl  (-1)
  THEN  CausalInd'
  THEN  (RecUnfold  `loop-class2`  0
              THEN  RepUR  ``eclass3``  0
              THEN  RepeatFor  2  ((MemCD  THEN  Try  (Complete  (Auto)))))\mcdot{})
Home
Index