My earliest efforts in haskell