@#example@
@(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)@
@#endexample@
@(bye)@
