Code for studying Haskell