Fork/Join implementation on Haskell