Step
*
of Lemma
decide-ite
∀[b:𝔹]. ∀[x,y,f,g:Top].
(case if b then x else y fi of inl(a) => f[a] | inr(a) => g[a] ~ if b
then case x of inl(a) => f[a] | inr(a) => g[a]
else case y of inl(a) => f[a] | inr(a) => g[a]
fi )
BY
{ ((D 0 THENA Auto) THEN AutoBoolCase ⌜b⌝⋅) }
Latex:
Latex:
\mforall{}[b:\mBbbB{}]. \mforall{}[x,y,f,g:Top].
(case if b then x else y fi of inl(a) => f[a] | inr(a) => g[a] \msim{} if b
then case x of inl(a) => f[a] | inr(a) => g[a]
else case y of inl(a) => f[a] | inr(a) => g[a]
fi )
By
Latex:
((D 0 THENA Auto) THEN AutoBoolCase \mkleeneopen{}b\mkleeneclose{}\mcdot{})
Home
Index