An implementation of the spreader in F# - View it on GitHub