CC> (let ((s (make-instance 'solution :initial-solution '((nil nil nil 2 nil nil 6 5 nil)
                                                          (nil nil 6 nil nil nil nil 7 nil)
                                                          (nil nil nil nil 4 6 nil nil 1)
                                                          (6 nil 3 7 8 nil nil nil nil)
                                                          (nil 2 nil nil nil nil nil 3 nil)
                                                          (nil nil nil nil 2 4 1 nil 5)
                                                          (5 nil nil 4 3 nil nil nil nil)
                                                          (nil 7 nil nil nil nil 8 nil nil)
                                                          (nil 9 1 nil nil 2 nil nil nil)))))
      (time (solve s)))
Evaluation took:
  0.208 seconds of real time
  0.208013 seconds of user run time
  0.0 seconds of system run time
  0 calls to %EVAL
  0 page faults and
  9,349,808 bytes consed.
9 3 8    2 1 7    6 5 4    
1 4 6    8 5 3    2 7 9    
2 5 7    9 4 6    3 8 1    

6 1 3    7 8 5    4 9 2    
4 2 5    1 6 9    7 3 8    
7 8 9    3 2 4    1 6 5    

5 6 2    4 3 8    9 1 7    
3 7 4    5 9 1    8 2 6    
8 9 1    6 7 2    5 4 3 
CC>