Step
*
of Lemma
pi-new-decompose
∀[P:pi_term()]. P = pinew(pinew-name(P);pinew-body(P)) ∈ pi_term() supposing ↑pinew?(P)
BY
{ (D 0 THENA Auto)
THEN SimpleDatatypeInduction 1
THEN Auto }
Latex:
Latex:
\mforall{}[P:pi\_term()]. P = pinew(pinew-name(P);pinew-body(P)) supposing \muparrow{}pinew?(P)
By
Latex:
(D 0 THENA Auto)
THEN SimpleDatatypeInduction 1
THEN Auto
Home
Index