Step
*
1
of Lemma
fun_exp_unroll_1
1. n : ℕ+
2. f : Top
3. f^n ~ if (n =z 0) then λx.x else f o f^n - 1 fi 
⊢ f^n ~ λx.(f (f^n - 1 x))
BY
{ (HypSubst (-1) 0 THEN AutoSplit THEN RepUR ``compose`` 0 THEN Auto)⋅ }
Latex:
Latex:
1.  n  :  \mBbbN{}\msupplus{}
2.  f  :  Top
3.  f\^{}n  \msim{}  if  (n  =\msubz{}  0)  then  \mlambda{}x.x  else  f  o  f\^{}n  -  1  fi 
\mvdash{}  f\^{}n  \msim{}  \mlambda{}x.(f  (f\^{}n  -  1  x))
By
Latex:
(HypSubst  (-1)  0  THEN  AutoSplit  THEN  RepUR  ``compose``  0  THEN  Auto)\mcdot{}
Home
Index