Running through the sample code to learn myself a haskell - View it on GitHub