chickadee » aima » display-world

display-world worldprocedure

Display the two-square vacuum world as a vector.

world
The two-square vacuum world to be displayed
(define (display-world world)
  (pp (vector-append
        '#(world)
        (vector-map
          (lambda (i location) (if (clean? location) 'clean 'dirty))
          world))))