[Haskell-beginners] ODP: howto Pipe

[PICCA Frederic-Emmanuel]

except that if I use this 

    runEffect $ each engines >-> solveTrajPipe factory geometry detector sample >-> P.drain

instead of 
    -- >-> P.print

I get a segfault when I do a big number of coputation ???

It seems to me that the dif object is released as I am still using the underlying foreign ptr...