Classical pong in Haskell Player 1 Keys: Arrow Up: Up Arrow Down: Down Player 2 Keys: E key: Up D key: Down