Step * 7 of Lemma assert-dlo_eq


b:dl-Obj(). (↑dlo_eq(prop(0);b) ⇐⇒ prop(0) b ∈ dl-Obj())
BY
(dlObjInduction
   THEN Intros
   THEN Unfold `dlo_eq` 0
   THEN (Unfold `dlo-eq` THEN RW (HigherC MrecIndC) 0)
   THEN Try (Fold `dlo-eq` 0)
   THEN Try (Fold `dlo_eq` 0)
   THEN RW (SweepUpC BetaC) 0
   THEN RW (SweepUpC ReduceC) 0
   THEN Auto
   THEN Try (((Assert "prog" "prop" ∈ Atom BY Complete (Auto)) THEN Auto))) }


Latex:


Latex:

\mforall{}b:dl-Obj().  (\muparrow{}dlo\_eq(prop(0);b)  \mLeftarrow{}{}\mRightarrow{}  prop(0)  =  b)


By


Latex:
(dlObjInduction
  THEN  Intros
  THEN  Unfold  `dlo\_eq`  0
  THEN  (Unfold  `dlo-eq`  0  THEN  RW  (HigherC  MrecIndC)  0)
  THEN  Try  (Fold  `dlo-eq`  0)
  THEN  Try  (Fold  `dlo\_eq`  0)
  THEN  RW  (SweepUpC  BetaC)  0
  THEN  RW  (SweepUpC  ReduceC)  0
  THEN  Auto
  THEN  Try  (((Assert  "prog"  =  "prop"  BY  Complete  (Auto))  THEN  Auto)))




Home Index