repetidos

(define (aux-unir-listas lista)
  (cond
    [(empty? lista) lista]
    [(member (car lista) (cdr lista)) (aux-unir-listas (cdr lista))]
    [else (cons (car lista) (aux-unir-listas (cdr lista)))]))

(define (unir-listas lista1 lista2)
    (aux-unir-listas (append lista1 lista2)))