removing duplicates in a list

[Lt Dan's legs]

problem solved

 

typo

(vl-sort lst '

Edited September 21, 2010 by Lt Dan's legs

[Tharwat]

Your question is not clear .

Is this what you mean .

 

(setq elist (list 5 2 4 1 3))    
(vl-sort elist '<)
;;;-> Return ;[b][color="red"] (1 2 3 4 5) [/color][/b]

 

Tharwat

Edited September 21, 2010 by Tharwat
Result of codes added

[Lt Dan's legs]

It was a typo. but not on this part. I thought for sure this was giving me the error

[alanjt]

Your question is not clear .

Is this what you mean .

 

(setq elist (list 5 2 4 1 3))    
(vl-sort elist '<)
;;;-> Return ;[b][color=red] (1 2 3 4 5) [/color][/b]

Tharwat

 

FYI:

(vl-sort '(5 4 2 3 6 7 7 7) '[/b] (2 3 4 5 6 7)

[Lee Mac]

(defun LM:Unique ( l )
 (if l
   (cons (car l)
     (LM:Unique (vl-remove (car l) (cdr l)))
   )
 )
)