AutoCad - Problemas con vl-remove

Buenas, el problema es que al eliminar un elemento de una lista, me elimina todos los que sean iguales.
Yo quiero eliminar un solo elemento, en una posición determinada. Algo así como:
Lo que hace:
(Setq elemento (nth 4 '(a b c d e f d g t d ))) -->d
(vl-remove elemento '(a b c d e f d g t d))--> (a b c e f g t)

Loque necesito que haga:
(Setq elemento (nth 4 '(a b c d e f d g t d ))) -->d
(vl-remove elemento '(a b c d e f d g t d))--> (a b c e f d g t d)

Resumiendo, necesito eliminar el n-esimo elemento de una lista, y solo ese, no otros aunque sean repetidos

Pues asunto resuelto,
Resulta que esa función no existe, pero el fantástico Lee-mac tiene una programada en su web
http://www.lee-mac.com/programs.html
Que recomiendo a todos junto con https://www.afralisp.net