Edmonton-eulers is a project mainly written in Haskell, it's free.

Project Euler solutions in Haskell.