Personal Haskell-study code