(remove-duplicates "heyyyy cooooool aaaaaa" :test #'(lambda (x y) (unless (eql x #\space) (char-equal x y))) :from-end t)