---

Step * 2 1 1 of Lemma fin_spr_is_spr


1. B :  List  @i
2. a :  List@i
3. 1 > 0@i
4. s : @i
5. (a  fspr(B))
 if (||a @ [s]|| = 0)
then tt
else (firstn(||a @ [s]|| - 1;a @ [s])  fspr(B))  last(a @ [s]) z B firstn(||a @ [s]|| - 1;a @ [s])
fi 
BY
{ (AutoSplit THEN MaAuto) }

1
1. B :  List  @i
2. a :  List@i
3. 1 > 0@i
4. s : @i
5. ||a @ [s]||  0
6. (a  fspr(B))
 ((firstn(||a @ [s]|| - 1;a @ [s])  fspr(B))  last(a @ [s]) z B firstn(||a @ [s]|| - 1;a @ [s]))



1.  B  :  \mBbbN{}  List  {}\mrightarrow{}  \mBbbN{}@i
2.  a  :  \mBbbN{}  List@i
3.  1  >  0@i
4.  s  :  \mBbbN{}@i
5.  \mneg{}\muparrow{}(a  \mmember{}  fspr(B))
\mvdash{}  \mneg{}\muparrow{}if  (||a  @  [s]||  =\msubz{}  0)
then  tt
else  (firstn(||a  @  [s]||  -  1;a  @  [s])  \mmember{}  fspr(B))
          \mwedge{}\msubb{}  last(a  @  [s])  \mleq{}z  B  firstn(||a  @  [s]||  -  1;a  @  [s])
fi 


By

(AutoSplit  THEN  MaAuto)



Home Index