---

Step * of Lemma iterated-classrel-iff

∀[Info,A,S:Type]. ∀[init:Id ─→ bag(S)]. ∀[f:A ─→ S ─→ S]. ∀[X:EClass(A)]. ∀[es:EO+(Info)]. ∀[e:E]. ∀[v:S].
  uiff(iterated_classrel(es;S;A;f;init;X;e;v);↓iterated-classrel(es;S;A;f;init;X;e;v))
BY
{ (Auto
   THEN Try ((D (-1) THEN (Unhide THENA Auto)))
   THEN RepeatFor 3 (MoveToConcl (-1))
   THEN StrongCausalInd
   THEN Auto
   THEN RW (AddrC [] RecUnfoldTopAbC) (-1)
   THEN SquashExRepD
   THEN (SplitOnHypITE (-2) THENA Auto)
   THEN Try ((FHyp (-6) [-3] THENA Auto))
   THEN SquashExRepD
   THEN (RW (AddrC [] RecUnfoldTopAbC) 0 ORELSE RW (AddrC [1] RecUnfoldTopAbC) 0)
   THEN D 0
   THEN InstConcl [⌈z⌉]⋅
   THEN Auto) }

---

Latex:


\mforall{}[Info,A,S:Type].  \mforall{}[init:Id  {}\mrightarrow{}  bag(S)].  \mforall{}[f:A  {}\mrightarrow{}  S  {}\mrightarrow{}  S].  \mforall{}[X:EClass(A)].  \mforall{}[es:EO+(Info)].  \mforall{}[e:E].
\mforall{}[v:S].
    uiff(iterated\_classrel(es;S;A;f;init;X;e;v);\mdownarrow{}iterated-classrel(es;S;A;f;init;X;e;v))


By

(Auto
  THEN  Try  ((D  (-1)  THEN  (Unhide  THENA  Auto)))
  THEN  RepeatFor  3  (MoveToConcl  (-1))
  THEN  StrongCausalInd
  THEN  Auto
  THEN  RW  (AddrC  []  RecUnfoldTopAbC)  (-1)
  THEN  SquashExRepD
  THEN  (SplitOnHypITE  (-2)  THENA  Auto)
  THEN  Try  ((FHyp  (-6)  [-3]  THENA  Auto))
  THEN  SquashExRepD
  THEN  (RW  (AddrC  []  RecUnfoldTopAbC)  0  ORELSE  RW  (AddrC  [1]  RecUnfoldTopAbC)  0)
  THEN  D  0
  THEN  InstConcl  [\mkleeneopen{}z\mkleeneclose{}]\mcdot{}
  THEN  Auto)

---

Home Index