Fixes part(uex,...)

1 : set(a,list(1,2,3))
1=> list(1, 2, 3)

2 : part(a,3)
2=> 3

3 : part(a,1)
3=> 1

4 : part(a,0)
4=> list

5 : part(a,-1)
5=> 3