import Data.Bits findSingle :: [Int] -> Int findSingle = foldl xor 0 main = putStrLn $ show $ findSingle [1, 2, 2, 1, 5]
We use cookies to provide and improve our services. By using our site, you consent to our Cookies Policy. Accept Learn more