P17

(de splitAt (Lst N)
   (list (cut N 'Lst) Lst) )

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

10jul10

abu