[1]> ( load 'genetic-route.l ) ;; Loading file genetic-route.l ... ;; Loading file route.l ... ;; Loaded file route.l ;; Loaded file genetic-route.l T [2]> ( setf r ( random-individual ) ) # [3]> ( display r ) 0 Style: JUG Orientation: RIGHT Position: (2 9) Style: CRIMP Orientation: UP Position: (0 10) Style: CRIMP Orientation: LEFT Position: (0 10) Style: CRIMP Orientation: LEFT Position: (8 10) Fitness: -10.0 NIL [4]> ( display ( random-individual ) ) 0 Style: SLOPER Orientation: UP Position: (8 2) Style: CRIMP Orientation: LEFT Position: (11 4) Style: PINCH Orientation: RIGHT Position: (9 10) Style: SLOPER Orientation: LEFT Position: (6 10) Style: SLOPER Orientation: LEFT Position: (5 10) Fitness: -69.35 NIL [5]> ( display ( random-individual ) ) 0 Style: CRIMP Orientation: UP Position: (9 3) Style: CRIMP Orientation: LEFT Position: (2 10) Style: SLOPER Orientation: UP Position: (6 10) Style: CRIMP Orientation: UP Position: (0 10) Style: CRIMP Orientation: RIGHT Position: (3 10) Fitness: -25.55 NIL [6]> ( display ( random-individual ) ) 0 Style: JUG Orientation: UP Position: (14 9) Style: JUG Orientation: UP Position: (3 9) Style: SLOPER Orientation: LEFT Position: (5 9) Style: PINCH Orientation: RIGHT Position: (4 9) Style: PINCH Orientation: RIGHT Position: (12 10) Style: PINCH Orientation: RIGHT Position: (14 10) Fitness: -80.2 NIL [7]> ( display ( random-individual ) ) 0 Style: SLOPER Orientation: RIGHT Position: (0 7) Style: CRIMP Orientation: UP Position: (4 10) Style: SLOPER Orientation: UP Position: (13 10) Style: PINCH Orientation: UP Position: (8 10) Style: JUG Orientation: RIGHT Position: (0 10) Style: CRIMP Orientation: UP Position: (14 10) Fitness: -60.75 NIL [8]> ( display ( random-individual ) ) 0 Style: PINCH Orientation: LEFT Position: (10 3) Style: SLOPER Orientation: UP Position: (3 3) Style: SLOPER Orientation: UP Position: (13 5) Style: SLOPER Orientation: RIGHT Position: (2 7) Fitness: -25.3 NIL [9]>