list$\rightarrow$unordered

The list$\rightarrow$unorderd function converts a list to an unordered set.

(define list->unordered
(function sset
((a slist))
(cons 'set a)))