more idiomatic 001

haskell/euler001.hs

@@ -1,6 +1,6 @@
 module Main where
 
-divisible_by_3_or_5 x = (x `mod` 3 == 0) || (x `mod` 5 == 0)
+divisible_by_3_or_5 x = (mod x 3 == 0) || (mod x 5 == 0)
 
 main = do
     print (sum (filter divisible_by_3_or_5 [1..999]))