i i i i i i i       ooooo    o        ooooooo   ooooo   ooooo
  I I I I I I I      8     8   8           8     8     o  8    8
  I  \ `+' /  I      8         8           8     8        8    8
   \  `-+-'  /       8         8           8      ooooo   8oooo
    `-__|__-'        8         8           8           8  8
        |            8     o   8           8     o     8  8
  ------+------       ooooo    8oooooo  ooo8ooo   ooooo   8

Welcome to GNU CLISP 2.49 (2010-07-07) <http://clisp.cons.org/>

Copyright (c) Bruno Haible, Michael Stoll 1992, 1993
Copyright (c) Bruno Haible, Marcus Daniels 1994-1997
Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998
Copyright (c) Bruno Haible, Sam Steingold 1999-2000
Copyright (c) Sam Steingold, Bruno Haible 2001-2010

Type :h and hit Enter for context help.

[1]> (load "tsp.lsp")
;; Loading file tsp.lsp ...
;;  Loading file lp.lsp ...
;;  Loaded file lp.lsp
;; Loaded file tsp.lsp
T
[2]> (mutate-demo)
0       (R D H B K N M F G O L E S P I C Q J A)    3658
0       (R D H B K N M F G O L P S E I C Q J A)    3822
0       (R D H B K N M F G O L E S P I C Q J A)    3658
0       (R D H B K N J F G O L E S P I C Q M A)    3374
0       (R D H B K N J F G O L I S P E C Q M A)    3251
0       (R M H B K N J F G O L I S P E C Q D A)    3343
0       (R M H B K N Q F G O L I S P E C J D A)    3123
0       (R M H B K N A F G O L I S P E C J D Q)    3073
0       (R M O B K N A F G H L I S P E C J D Q)    2652
0       (R M O B I N A F G H L K S P E C J D Q)    2650
0       (R M O B I N A F G H L C S P E K J D Q)    2553
0       (R M O B I L A F G H N C S P E K J D Q)    2553
0       (R M O B I L A K G H N C S P E F J D Q)    2497
0       (R M O B I L A K G H F C S P E N J D Q)    2579
0       (R M O B I L A K G Q F C S P E N J D H)    2571
0       (R M O B I L A K G Q E C S P F N J D H)    2556
0       (R M O A I L B K G Q E C S P F N J D H)    2729
0       (R M O A I L B K G Q E C S P F N J D H)    2729
0       (R M O G I L B K A Q E C S P F N J D H)    2294
0       (R M O J I L B K A Q E C S P F N G D H)    2581
0       (R M O J E L B K A Q I C S P F N G D H)    2691
NIL
[3]> (maybe-mutate-demo)
0       (N S P R H L A B Q O C E J F I K D M G)    2591
0       (N S P R H L A B Q O C E J F I K D M G)    2591
0       (N S P R H L A O Q B C E J F I K D M G)    2566     *
0       (N S P R H L A O Q B C E J F I K D M G)    2566
0       (N S P R H L A O Q B C E J F I K D M G)    2566
0       (N S P R H L A O Q B C E J F I K D M G)    2566
0       (N S P R H L A O Q B C E J F I K D M G)    2566
0       (N S P R H L A O G B C E J F I K D M Q)    2631     *
0       (O S P R H L A N G B C E J F I K D M Q)    2367     *
0       (O S P R I L A N G B C E J F H K D M Q)    2069     *
0       (O S P R I L Q N G B C E J F H K D M A)    2316     *
0       (O S P R I L Q M G B C E J F H K D N A)    2328     *
0       (O S P R I L Q M G B C E J F H K D N A)    2328
0       (O S P R I L Q M G B C E J F H K D N A)    2328
0       (O S P R I L Q M G B C E J F H K D N A)    2328
0       (O S P R I L Q M G B C E J F H K D N A)    2328
0       (O S P R I L Q M J B C E G F H K D N A)    2539     *
0       (O S P R I L Q M J B C E G F H K D N A)    2539
0       (O S P R I L Q M J B C E G F H K D N A)    2539
0       (C S P R I L Q M J B O E G F H K D N A)    2892     *
0       (C S P R I G Q M J B O E L F H K D N A)    2657     *
NIL
[4]> (bye)
Bye.