Looks good, but please use `where` indentation consistent with the rest of the project. [This style guide](https://github.com/tibbe/haskell-style-guide/blob/master/haskell-style.md) is used. :-)