Stuff I did trying to learn haskell