Fonction de programmation fonctionnelle

Question

Comment écrire un programme fonctionnel pour l'union de deux listes ou ensembles?

Answer 1

Cela dépend de la langue, mais généralement, il y aura une solution récursive impliquant la traversée des ensembles identifiant les éléments partagés.

E.g. en Haskell sur le type Data.Set natif,

union :: Ord a => Set a -> Set a -> Set a 
union Tip t2 = t2 
union t1 Tip = t1 
union t1 t2 = hedgeUnion (const LT) (const GT) t1 t2 

hedgeUnion _  _  t1 Tip 
    = t1 
hedgeUnion cmplo cmphi Tip (Bin _ x l r) 
    = join x (filterGt cmplo l) (filterLt cmphi r) 
hedgeUnion cmplo cmphi (Bin _ x l r) t2 
    = join x (hedgeUnion cmplo cmpx l (trim cmplo cmpx t2)) 
      (hedgeUnion cmpx cmphi r (trim cmpx cmphi t2)) 
    where 
    cmpx y = compare x y 

Ou plus simplement, pour les listes:

unionBy     :: (a -> a -> Bool) -> [a] -> [a] -> [a] 
unionBy eq xs ys  = xs ++ foldl (flip (deleteBy eq)) (nubBy eq ys) xs 

Answer 2

Cela ressemble à une question de devoirs, mais je vais mordre. En Python:

lambda x, y: x + filter(lambda z: z not in x, y)