Competitive Programming in Haskell: Union-Find | Hacker News Reader