---

Step * 1 1 of Lemma gammaFIM_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. l :  List@i
 (l,b. (((g l) = 0)  (l = b))) l list_ind_reverse(l;[];r,f,l. if (g (r @ [l]) = 0) then r @ [l] else r @ [h r] fi \000C)
BY
{ (BLemma `list_ind_reverse_wf_dependent`  THEN Auto THEN All Reduce THEN Auto) }

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. l :  List@i
6. L :  List@i
7. x : @i
8. b :  List@i
9. b = list_ind_reverse(L;[];r,f,l. if (g (r @ [l]) = 0) then r @ [l] else r @ [h r] fi )@i
10. ((g L) = 0)  (L = b)@i
11. (g (L @ [x])) = 0@i
 (L @ [x]) = if (g (b @ [x]) = 0) then b @ [x] else b @ [h b] fi 



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.  l  :  \mBbbN{}  List@i
\mvdash{}  (\mlambda{}l,b.  (((g  l)  =  0)  {}\mRightarrow{}  (l  =  b)))  l 
    list\_ind\_reverse(l;[];\mlambda{}r,f,l.  if  (g  (r  @  [l])  =\msubz{}  0)  then  r  @  [l]  else  r  @  [h  r]  fi  )


By

(BLemma  `list\_ind\_reverse\_wf\_dependent`    THEN  Auto  THEN  All  Reduce\mcdot{}  THEN  Auto)



Home Index