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

t:Base. ((t)↓  Dec(t ~ <fst(t), snd(t)>))
BY
(Auto THEN UseWitness ⌜if is pair then inl Ax otherwise inr x.Ax) ⌝⋅ THEN CanonicalAuto) }


Latex:


Latex:
\mforall{}t:Base.  ((t)\mdownarrow{}  {}\mRightarrow{}  Dec(t  \msim{}  <fst(t),  snd(t)>))


By


Latex:
(Auto  THEN  UseWitness  \mkleeneopen{}if  t  is  a  pair  then  inl  Ax  otherwise  inr  (\mlambda{}x.Ax)  \mkleeneclose{}\mcdot{}  THEN  CanonicalAuto)




Home Index