A simple maze solver algorithm implemented in Haskell