Started RPSLP game in Haskell