A breakable toy project for fun in Haskell