(format t"~(~{~A ~}~)"(sort(union(#1=set-difference(setf a #2=(read-from-string(format()"(~A)"(read-line)))b #2#)a)(#1#a b))'string<))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page