P21

(de insert-at (X Lst N)
   (insert N Lst X) )

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

10jul10    abu