toy haskell apps