Companion to a blog post on testing patterns in Haskell - View it on GitHub