Just random scraps of haskell