Hi
subst e l' = concat.map (\x->if x==e then l' else [x])
subst e l' = concatMap (\x->if x==e then l' else [x]) Let's save an extra character :) Thanks Neil _______________________________________________ Haskell-Cafe mailing list Haskell-Cafe@haskell.org http://www.haskell.org/mailman/listinfo/haskell-cafe
