(defun print_lab(labyrinth)
(dotimes (xx 10)
  (dotimes (yy 10) 
    (format t "~03A" (aref labyrinth xx yy))
  )
  (format t "~%")
))