((- - - - - - - - -) (- - - - - - - - -) (- - O O O - X - -) (- - O X X X X O -) (- - - O - - X - -) (- - - - - - X - -) (- - - O - - O - -) (- - - - - - - - -) (- - - - - - - - -)) #| If you want to use the above inside your scheme program (w/o getting it via read), you can put a leading quote on it, which is equivalent to: (list (list '- '- '- '- '- '- '- '- '-) (list '- '- '- '- '- '- '- '- '-) (list '- '- 'O 'O 'O '- 'X '- '-) (list '- '- 'O 'X 'X 'X 'X 'O '-) (list '- '- '- 'O '- '- 'X '- '-) (list '- '- '- '- '- '- 'X '- '-) (list '- '- '- 'O '- '- 'O '- '-) (list '- '- '- '- '- '- '- '- '-) (list '- '- '- '- '- '- '- '- '-)) |#