P18

(de slice (Lst I K)
   (head (inc (- K I)) (nth Lst I)) )

http://picolisp.com/wiki/?99p18

10jul10

abu