Chip8 Emulator, in Haskell