Tracing the Robot Mouse
>(mouse maze 4 9 '())
1> (MOUSE #2A((* * * * * * * * * *)
(* 0 0 * * * * * * *)
(* 0 * * * * * * * *)
(* 0 * * * * * * * *)
(* 0 0 0 0 0 0 * * *)
(* * * * 0 * 0 * * *)
(* * * * 0 * 0 * C *)
(* * * * 0 * 0 * 0 *)
(* * * * 0 * 0 0 0 *)
(* * * * 0 * * * * *)) 4 9 NIL)
2> (MOUSE 3 9 ((4 9))) ; west
<2 (MOUSE NIL) ; hit the wall
2> (MOUSE 4 8 ((4 9))) ; north
3> (MOUSE 3 8 ((4 8) (4 9))) ; west
<3 (MOUSE NIL) ; hit the wall
3> (MOUSE 4 7 ((4 8) (4 9))) ; north
4> (MOUSE 4 6 ((4 7) (4 8) (4 9))) ; north
5> (MOUSE 4 5 ((4 6) (4 7) (4 8) (4 9))) ; north
6> (MOUSE 4 4 ((4 5) (4 6) (4 7) (4 8) (4 9))) ; north
7> (MOUSE 3 4 ((4 4) (4 5) (4 6) (4 7) (4 8) ; west
8> (MOUSE 2 4 ((3 4) (4 4) (4 5) (4 6) ; west
9> (MOUSE 1 4 ((2 4) (3 4) (4 4) (4 5) ; west
10> (MOUSE 0 4 ((1 4) (2 4) (3 4) (4 4) ; west
<10 (MOUSE NIL) ; hit the wall
10> (MOUSE 1 3 ((1 4) (2 4) (3 4) (4 4) ; north
11> (MOUSE 1 2 ((1 3) (1 4) (2 4) (3 4)
12> (MOUSE 1 1 ((1 2) (1 3) (1 4) (2 4)
13> (MOUSE 1 0 ((1 1) (1 2) (1 3) (1 4) ; north
<13 (MOUSE NIL) ; hit the wall
13> (MOUSE 2 1 ((1 1) (1 2) (1 3) (1 4) ; east
14> (MOUSE 1 1 ((2 1) (1 1) (1 2) (1 3) ; west
<14 (MOUSE NIL) ; ! loop