Contents    Page-10    Prev    Next    Page+10    Index   

Robot Mouse Example


(def maze
;  0 1 2 3 4 5 6 7 8 9
'((* * * * * * * * * *)    ; 0
  (* 0 0 * * * * * * *)    ; 1
  (* 0 * * * * * * * *)    ; 2
  (* 0 * * * * * * * *)    ; 3
  (* 0 0 0 0 0 0 * * *)    ; 4
  (* * * * 0 * 0 * * *)    ; 5
  (* * * * 0 * 0 * c *)    ; 6
  (* * * * 0 * 0 * 0 *)    ; 7
  (* * * * 0 * 0 0 0 *)    ; 8
  (* * * * 0 * * * * *)))  ; 9


user=> (mouse maze 4 9 '())
(n n n n n e e s s s s e e n n)