problems in set?



Hello!

I found that some functions from set package are broken. The following is for maxima-5.9.0.rc4 under clisp
Maxima 5.9.0.rc4 http://maxima.sourceforge.net
Distributed under the GNU Public License. See the file COPYING.
Dedicated to the memory of William Schelter.
This is a development version of Maxima. The function bug_report()
provides bug reporting information.
(C1) load(set);
(D1)            /usr/local/share/maxima/5.9.0.rc4/src/set.lisp
(C2)  (l1:[i,j],l2:[i,l])$
(C3)  union(l1,l2);
(D3)                                [i, l]
(C4)  intersection(l1,l2);
(D4)                                [i, l]
(C5) load(nset);
(D5)        /usr/local/share/maxima/5.9.0.rc4/share/misc/nset.lisp
(C6) union(l1,l2);
(D6)                               {i, j, l}
(C7) intersection(l1,l2);
(D7)                                  {i}
Note the correct results with nset. 

Best regards,
Valerij