A simple solitaire in Haskell.