recreate the program in Raymond's talk using haskell

Raymond Hettinger Keynote — Python Russia Keynote documentation
https://dl.dropboxusercontent.com/u/3967849/pyru/_build/html/index.html

TODOs on the queue. throw exception when user try to writeQueue after calling
joinQueue.