---

Step * 4 1 of Lemma assert-dlo_eq


1. x : Prog
2. ∀b:dl-Obj(). (↑dlo_eq(prog(x);b) ⇐⇒ prog(x) = b ∈ dl-Obj())
3. x@0 : Prog
4. (↑dlo_eq(prog((x)*);prog(x@0))) ⇒ (prog((x)*) = prog(x@0) ∈ dl-Obj())
5. (↑dlo_eq(prog((x)*);prog(x@0))) ⇐ prog((x)*) = prog(x@0) ∈ dl-Obj()
6. ↑dlo_eq(prog(x);prog(x@0))
⊢ prog((x)*) = prog((x@0)*) ∈ dl-Obj()
BY
{ (ThinTrivial THEN (RWO "2" (-1) THENA Auto) THEN EqCD THEN Auto) }

---

Latex:

---

Latex:

1.  x  :  Prog
2.  \mforall{}b:dl-Obj().  (\muparrow{}dlo\_eq(prog(x);b)  \mLeftarrow{}{}\mRightarrow{}  prog(x)  =  b)
3.  x@0  :  Prog
4.  (\muparrow{}dlo\_eq(prog((x)*);prog(x@0)))  {}\mRightarrow{}  (prog((x)*)  =  prog(x@0))
5.  (\muparrow{}dlo\_eq(prog((x)*);prog(x@0)))  \mLeftarrow{}{}  prog((x)*)  =  prog(x@0)
6.  \muparrow{}dlo\_eq(prog(x);prog(x@0))
\mvdash{}  prog((x)*)  =  prog((x@0)*)


By

---

Latex:
(ThinTrivial  THEN  (RWO  "2"  (-1)  THENA  Auto)  THEN  EqCD  THEN  Auto)

---

Home Index