Haskell User's Reinforcement Learning System