Haskell solution to the "Rock Bottom" puzzle on puzzlenode - View it on GitHub