Zippers from the haskell book @ wikibooks, get, put, labyrinth,
turnLeft, right and keepStraight implemented