Bridson Poisson-Disc implementation in Main.hs