Klotski Haskell program is OK