[Haskell-cafe] coding a queue with reactive