Step
*
1
1
of Lemma
gammaFIM_fun_id
1. g : 
 List 
 
@i
2. h : 
 List 
 
@i
3. spr(g)@i
4. 
a:
 List. (((g a) = 0) 
 ((g (a @ [h a])) = 0))@i
5. (g []) = 0@i
6. f : 
 
 
@i
7. (f 
 spr(g))@i
8. x : 
 (f x) = ((
n.gammaFIM(mklist(n + 1;f);g;h)[n]) x)
BY
{ (Reduce 0 THEN Unfold `in_spr` 7) }
1
1. g : 
 List 
 
@i
2. h : 
 List 
 
@i
3. spr(g)@i
4. 
a:
 List. (((g a) = 0) 
 ((g (a @ [h a])) = 0))@i
5. (g []) = 0@i
6. f : 
 
 
@i
7. 
x:
. ((g mklist(x;f)) = 0)@i
8. x : 
 (f x) = gammaFIM(mklist(x + 1;f);g;h)[x]
1.  g  :  \mBbbN{}  List  {}\mrightarrow{}  \mBbbN{}@i
2.  h  :  \mBbbN{}  List  {}\mrightarrow{}  \mBbbN{}@i
3.  spr(g)@i
4.  \mforall{}a:\mBbbN{}  List.  (((g  a)  =  0)  {}\mRightarrow{}  ((g  (a  @  [h  a]))  =  0))@i
5.  (g  [])  =  0@i
6.  f  :  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}@i
7.  (f  \mmember{}  spr(g))@i
8.  x  :  \mBbbN{}
\mvdash{}  (f  x)  =  ((\mlambda{}n.gammaFIM(mklist(n  +  1;f);g;h)[n])  x)
By
(Reduce  0  THEN  Unfold  `in\_spr`  7)
Home
Index