DOT shifting traffic for the Haskell