del(i,il,il).
del(1,_,[]):-!.
del(Num,[X|T],[X|T1]):- Num > 0, N1 is int(N+1), del(N,T,T1).