;; conversions between collections and lists

(define m (list->mset-int '(1 2 2 3)))
(describe m)
(define s (list->set-int (mset-int->list m)))
(describe s)
(define sq (list->sequence-int '(3 1)))
(describe sq)
(define l (mset-int->list m))
