Haskell virtualised (network) router