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