Short pieces of haskell for learning/demonstrating