This is lisp code that starts an "agent" out in a 5*5 world.  The agent then must find its way to a corner of the world while avoiding obstacles.