added Queue in Haskell