Step
*
of Lemma
decide-pair-if-has-value
∀t:Base. ((t)↓ 
⇒ Dec(t ~ <fst(t), snd(t)>))
BY
{ (Auto THEN UseWitness ⌜if t is a 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