Step * of Lemma decide-atom2-if-has-value

t:Base. ((t)↓  Dec(t ∈ Atom2))
BY
((UnivCD THENA Auto)
   THEN UseWitness ⌜isatom2(t;inl Ax;inr x.Ax) )⌝⋅
   THEN CanonicalAuto
   THEN Auto
   THEN (Assert ⌜↑isatom2(t)⌝⋅ THENA Auto)
   THEN RWO "-3" (-1)
   THEN AllReduce
   THEN Auto) }


Latex:


Latex:
\mforall{}t:Base.  ((t)\mdownarrow{}  {}\mRightarrow{}  Dec(t  \mmember{}  Atom2))


By


Latex:
((UnivCD  THENA  Auto)
  THEN  UseWitness  \mkleeneopen{}isatom2(t;inl  Ax;inr  (\mlambda{}x.Ax)  )\mkleeneclose{}\mcdot{}
  THEN  CanonicalAuto
  THEN  Auto
  THEN  (Assert  \mkleeneopen{}\muparrow{}isatom2(t)\mkleeneclose{}\mcdot{}  THENA  Auto)
  THEN  RWO  "-3"  (-1)
  THEN  AllReduce
  THEN  Auto)




Home Index