main = do
  let number = multiplesOf3or5 1000
  putStrLn $ "Sum: " ++ (show number)
main = do
  let number = multiplesOf3or5 1000
  putStrLn $ "Sum: " ++ (show number)
main = do
  let number = multiplesOf3or5 1000
  putStrLn $ "Sum: " ++ (show number)