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)
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 "rbg.lsp")
;; Loading file rbg.lsp ...
;; Loading file lp.lsp ...
;; Loaded file lp.lsp
;; Loaded file rbg.lsp
T
[2]> (setf p (initial-population))
#
[3]> (display p)
Generation0 population ...
1 (G B B R R R G B R R B B B B G B R R G G G B R R R) 9
2 (G B R G B B G G R G G G G R G G B G R R B B B B B) 9
3 (G B G G R B B R R G G B R B G R G B R G R B G G B) 8
4 (B B R R R G B G R G G R R B B R B G R G B G G B R) 8
5 (G R B B G R G B B R G G B B B B B G B R R G B G G) 11
6 (B B G G G R B B B G G R B G R B B B B G G B R R B) 12
7 (G B G R B B R B G R G G R G B B G R G G R R R B B) 8
8 (R R R B R B B G G G R B B G R G B R G G B B R R B) 9
9 (B R B R R B G R G G G G G B R R R R R R R B B G G) 6
10 (G G G B G B B G B G B B B G G G R B G B G G B B R) 11
11 (G B B G G B B R B B B R B G R B G B B B R B R G G) 13
12 (B B B B B B R G R R R R B R B R G B G B G R G B R) 11
13 (B G R B R G G R G G G B R B B B G B G G G B B R B) 10
14 (R R G G R G B G B B G R G B B B B G G B G B G B B) 11
15 (R R R G G B B G G B R B G R R G R B R B R B B B R) 9
16 (B B B G B R R G R R R R B R B B R R B R B G G B B) 11
17 (B R B B R R G B B B G G B G G B R B B B B B B B B) 16
18 (R G R R B G R G B G G G G B G B G G B B G B G R G) 7
19 (R B B R R R R B G R B G B R G B B B R R G R B G G) 9
20 (B R G G G G R B R R G R G G G G G B R R G B R B R) 5
21 (G B G G G R B G R B R R B B G G R B B G B G G G B) 9
22 (G G B R B B G R R G B R G G G G R G R G G G B B R) 6
23 (B R B G G G B B R G G G G G B G R R R R G R B R R) 6
24 (G R G G G R G B G R R B B B R G G B R B G B B R G) 8
25 (R B B G B R B R R R G G G B R R G B B R B B B R B) 11
26 (G R B R B G G G G R B R G R R R R B R G R B G R R) 5
27 (R R R R B G G R R G G R B R R B G R B R B G G B R) 6
28 (B R B G B R R G R G G G B R G R R B R G G B G R G) 6
29 (B R G B R G G B G G G R R B B G B R G R B B B G R) 9
30 (G R R R R R B G R G G R G R G R B R B R G B B R B) 6
31 (G B G G B G G B B B R G G B R G R R G R R B R R G) 7
32 (G G R R B G G G B G G B G R R R G B G G R R G B G) 5
33 (R B G G R R G R G R B R R B B B B G G R G B R G G) 7
34 (B G R B B G G R G G G G G B B R G B G G B R B B R) 9
35 (B B G R R G B B R B G R G G B G B B R R R R G G R) 8
36 (G B B R G R G G R R R B G R G R R R B G G R B B B) 7
37 (B B G B G G G B R G B G G B R R R R G G G B G B B) 9
38 (B B R R B R G R B G G R G R G R R R B R R R R R G) 5
39 (G B R R R R R B B G G R G R R B G R G G B B R R G) 6
40 (B B B G R G B B B R R B G R B R G B R R G G R B R) 10
41 (B G B R R R G G G R B R B G R G G B R R B B R R B) 8
42 (R G G R G G B B G R B R G G R B B G B G R R G R G) 6
43 (G R G R B G R R G R R B B B B R R G G B G R B R R) 7
44 (G G B G R B G G R B B B G R G G G B G B G B R R R) 8
45 (R G R G B G B R R G G G R B R B B R R R R G G B B) 7
46 (G G R R G G G B R R R G R B R G R R G G R G R R G) 2
47 (G R G G R G B B B G B B G G R G G G G G R R B R G) 6
48 (B B R R G G B G G B R R B R G R B B R B G G G B G) 9
49 (G B R G G G R G G B G B B B R R G G G B B G G R G) 7
50 (G B G G G R G G R R G B B B G G R B B B B R R B G) 9
51 (B R B R R G B G G G R G R R G G B B R B B G B B R) 9
52 (B G G B R G R B B B B B R R R B G R G R B G R R R) 9
53 (B R R R R G B G G R R G R G B G R R R G B B G B G) 6
54 (G G G R G G R R G G R R G G R R R R B R G B G R B) 3
55 (R G G B G R B G G G R G R R G R R B B R B B G G B) 7
56 (G G G G B G R R R R G B R G B G G R R B R B G G R) 5
57 (R B R B B R R B R G B G G B B G R B B B B G G B B) 13
58 (B G B R R B B R B B R G G R R G R R B B G G G G G) 8
59 (B R R R G R R B G B B B G R R G G G R G B R R R B) 7
60 (G R R G G B R R R R G G B R R B B B G B G R B B B) 9
61 (B G G G G R R R B R G R B B R G G G R R B R G G B) 6
62 (R R R G R G G B G R R B B R G G B B B G R B G G B) 8
63 (B R R B G R G G B G R B B B G R R B B B G R R R R) 9
64 (R G B G R B G G G B R G B R B B R B R B G R G G G) 8
65 (G G R G G G R R G B G G R R G R R G B G B G R R G) 3
66 (R B G G R B G B R G R R B G B R G B G G B G R G B) 8
67 (G G R B G G G G B G G G B B B R G G B B B G R R G) 8
68 (G B R R B B B R G G R G G R R R R G R G R B B R R) 6
69 (G B B G R G G R G B R B B G R B R G R B R R R B R) 8
70 (R R G G B B G B G G G G B R G B R G B B R B R B B) 10
71 (B B G G B G R B R B B B G R G G R R G B R G B G B) 10
72 (R R G B R G R G G B G B B G G G G G R R B B G G B) 7
73 (B R R R R G B B B G R B G G B G R G G B G G B B R) 9
74 (G G B B B B G G B B B R B R G R B B R G R B G G B) 12
75 (B G G R R B R G R G B G B G B R R G G R B G G B G) 7
76 (R G G G R G R G G R G B G G R R R B G G G G G B R) 3
77 (R B B B G B G R G B B G G G R B G R R R B R G B B) 10
78 (G G R R R R G G R R R G B R B B B G B B B B R R R) 8
79 (G B B B G R R B R R R G G G R G G G G R G R B R B) 6
80 (G G R B G G G B G R R R B R R R B G B B B B B B B) 11
81 (R B G R G G G G G B G B G R R R B R R G R B B B B) 8
82 (R R G G B R B B B G B B B R G B R B G B R G G R G) 10
83 (B G R B B R G R G R G B B B R G G G R G R G B R R) 7
84 (B G B G B R B B R G G G R G G R B R B G R B B G R) 9
85 (B B B G R R R R R B B B R G R R B G B B G R B R B) 11
86 (G B B G B R R R R B R B R G G B B G G R B B R R G) 9
87 (G R G R B R G G B G G R B B G B B G G R B R B B R) 9
88 (R B R B G B G B G G R R B R G R R R B R R B R G R) 7
89 (B B B B B R B G B B B R B B R R R R R G R R R B G) 12
90 (B B G B B B R G R G G B R R B G B B G G R R G G R) 9
91 (R B R R G G R R G B B B B G B B R G G G G B R G G) 8
92 (R B B B R B R B G G B G B B B G R R B R B G R B B) 13
93 (G G R B G R B G R B B B B G G R B R R R G B B B G) 10
94 (G B B G R B R G B B G B B G R B G B R G B B B B G) 13
95 (R B R B G G B G G G B B R G B R R R G B B G G G R) 8
96 (G G B G B B R R B B B R B B R G B R B B B R R G G) 12
97 (R B G B G B R B R G G G R G G G B G R R G G R B B) 7
98 (R B B R B R R B B G R B G R B G G R R G R R G G G) 7
99 (R B G B B R R B G R G R B G R G G R R B R R B B G) 8
100 (B R R R G B R G R R R R R B B G R R B B R G G G R) 6
NIL
[4]> (average p)
8.23
[5]> (select-individual p)
#
[6]> (display (select-individual p))
48 (B B R R G G B G G B R R B R G R B B R B G G G B G) 9
NIL
[7]> (display (select-individual p))
57 (R B R B B R R B R G B G G B B G R B B B B G G B B) 13
NIL
[8]> (display (select-individual p))
90 (B B G B B B R G R G G B R R B G B B G G R R G G R) 9
NIL
[9]> (display (select-individual p))
25 (R B B G B R B R R R G G G B R R G B B R B B B R B) 11
NIL
[10]> (setf *select-demo* t)
T
[11]> (display (select-individual p))
the sample of individuals ...
78 (G G R R R R G G R R R G B R B B B G B B B B R R R) 8
13 (B G R B R G G R G G G B R B B B G B G G G B B R B) 10
21 (G B G G G R B G R B R R B B G G R B B G B G G G B) 9
8 (R R R B R B B G G G R B B G R G B R G G B B R R B) 9
7 (G B G R B B R B G R G G R G B B G R G G R R R B B) 8
7 (G B G R B B R B G R G G R G B B G R G G R R R B B) 8
2 (G B R G B B G G R G G G G R G G B G R R B B B B B) 9
80 (G G R B G G G B G R R R B R R R B G B B B B B B B) 11
the most fit of the sample...
80 (G G R B G G G B G R R R B R R R B G B B B B B B B) 11
80 (G G R B G G G B G R R R B R R R B G B B B B B B B) 11
NIL
[12]> (display (select-individual p))
the sample of individuals ...
16 (B B B G B R R G R R R R B R B B R R B R B G G B B) 11
33 (R B G G R R G R G R B R R B B B B G G R G B R G G) 7
93 (G G R B G R B G R B B B B G G R B R R R G B B B G) 10
54 (G G G R G G R R G G R R G G R R R R B R G B G R B) 3
57 (R B R B B R R B R G B G G B B G R B B B B G G B B) 13
2 (G B R G B B G G R G G G G R G G B G R R B B B B B) 9
66 (R B G G R B G B R G R R B G B R G B G G B G R G B) 8
47 (G R G G R G B B B G B B G G R G G G G G R R B R G) 6
the most fit of the sample...
57 (R B R B B R R B R G B G G B B G R B B B B G G B B) 13
57 (R B R B B R R B R G B G G B B G R B B B B G G B B) 13
NIL
[13]> (display (select-individual p))
the sample of individuals ...
37 (B B G B G G G B R G B G G B R R R R G G G B G B B) 9
48 (B B R R G G B G G B R R B R G R B B R B G G G B G) 9
38 (B B R R B R G R B G G R G R G R R R B R R R R R G) 5
20 (B R G G G G R B R R G R G G G G G B R R G B R B R) 5
2 (G B R G B B G G R G G G G R G G B G R R B B B B B) 9
56 (G G G G B G R R R R G B R G B G G R R B R B G G R) 5
51 (B R B R R G B G G G R G R R G G B B R B B G B B R) 9
55 (R G G B G R B G G G R G R R G R R B B R B B G G B) 7
the most fit of the sample...
37 (B B G B G G G B R G B G G B R R R R G G G B G B B) 9
37 (B B G B G G G B R G B G G B R R R R G G G B G B B) 9
NIL
[14]> (population-demo)
Generation0 population ...
1 (G G B R G B B R B R R B G R R B B B R B G R G R B) 10
2 (R G R R B B R G G R B R G B R G R G R B R G G B B) 7
3 (B G B B G G B B R B G R B B R B R G R R R R G R R) 9
4 (R G G G R B G R B G G G G B B G R B G R G B R R B) 7
5 (B B R R R G B B R B B B B G B G R G R B G R G G G) 10
6 (R R B B R R R B R R R R B R R G G R B R B B B B R) 9
7 (B G G G R B G R B B R R R G G G R R B R G G R G B) 6
8 (R B G R B G B G B B G B R G B G B B G R G G G G R) 9
9 (G B B G B R B B R G G R R B B B B G B B G G G R R) 11
10 (B G G B G R B R B B R B R B G G R B B G G R B B R) 11
11 (G B G R R B B G B G G R B R B R R R B B B R B B B) 12
12 (B G R R G R R B R B G R R G R G G R G B G G R R B) 5
13 (R B R R R B B G G G G R R B B R B R B G B R G B B) 10
14 (R G B R B R B R R R B G B R R G G G G G B R B B B) 9
15 (R R B R R G B G R R B B R B B R R G B R B R R G B) 9
16 (R B G B G R B R G B R B R B R R B G R G G R G R B) 8
17 (R B G R G B B B B G G B R G G G B B G G G B G G R) 9
18 (G G B B G B R G R B B B R R B G B R B G B G R R B) 11
19 (R B B R G G B B G G R R G R R G R G R R B B B G B) 8
20 (B B B G B B B G B R R R G B G B B G R R G R R R R) 10
21 (R B G B B R G R R R G R B R G B R G R B R B B B R) 9
22 (B G G G B G R R G G R B B B R R R B G B R G B R G) 8
23 (R R G G G R G R B B B R B R G G G R R R R G G B R) 5
24 (B G R G R G G R B B R B R B R G R G R R R R B B B) 8
25 (B G G R B G B G G R G R R R B R G G G B G R R G G) 5
26 (G B G G B B R R G R B R G G R R B R G G G G R G R) 5
27 (B B B B R R B G G G B R B R G B R G R G B B G B G) 11
28 (G B B G R G B R G B G G G R B B R B R R G B R G R) 8
29 (B B G B G R R B G B G G G G B R R G R B G G B R G) 8
30 (R B G G G R R G G R G B B B B B G R B R G B B B R) 10
31 (R B B R G B B B G R R B G B G G R G G G R B G G G) 8
32 (G G B R B R R R R B B G R R B R G R B R B B R R B) 9
33 (G B R G G R B R B R B G G R R G B B B R B B B G R) 10
34 (B B R R R R G B G G G G B R G B B R G B G G B R G) 8
35 (G R R R B B B G R B B B B B R B G B R G G G B B G) 12
36 (G B B B G R R G G R B G R B R R R R B B G R G B B) 9
37 (G B G G G G G B G G B G B B B B G R G B R R G B B) 10
38 (B B B B B G R B G R B G B R R R B R B G R B B R R) 12
39 (G R G B R R B R R B B G R B B R B R G B R B R G B) 10
40 (B B B R B R G G G G G G B R G G B B R G R G B B G) 9
41 (R B R R R R R B B G R B B B R B B R B G R R G R G) 9
42 (B G R G B B B R G B R R R B R B R B R G B G R R G) 9
43 (R G G R B G R R R B R R R B B R G G B R B G R R G) 6
44 (G G R R G R G B G G G R B B B R B R G R R B R R R) 6
45 (G R G B R R B B G R G B G G R G G G G G B B B R G) 7
46 (B R R G R R B B R R R G B B R R G R R G R B G G B) 7
47 (R G B G B G B R G G B B R G B B B R B B G R G B R) 11
48 (R B G R B G R B B B B R B R R R B R R B G G R R B) 10
49 (B B B G G R G R G G G R R B R G R G G R B G B B B) 8
50 (B R G G B B B B G B R B R G B G B B G B R R B R B) 13
51 (B R B B B R G R B R R B R B G R B R R R R B R B B) 11
52 (B B B G B B G G B B R B B R R G G B G R R G B G R) 11
53 (G R B G R R G R B G R G G B R R R B B B B G B R R) 8
54 (G G B G G R B G R B G R B B G G G R B G B R R G G) 7
55 (B G G B B G G R B G R B G B R R B R G B R G G B G) 9
56 (R R G G R R R R R G G B B R G G R B G B G B R G R) 5
57 (R G G B B B B R G B B R R R G G B B G G G B R B R) 10
58 (B R G G G G R G R R R B B B R B B B B G G B R G G) 9
59 (B B G R B B R G G G G B G G R R B B R B R G R R R) 8
60 (B R R G B R R R B B R G R B B B B R G B B B B G G) 12
61 (B B R B B R R G R B R G R R G R G B B R G G G B G) 8
62 (B R G B G G R G G G B G G G B R B R G R R B G R G) 6
63 (B G G G B G R G R R B G G R G G B G G B R G R B R) 6
64 (R G R B B G R B G R G B R R R B B R B G R G G G R) 7
65 (R B R G R G B R R G B B R G B G G B B R B G G R G) 8
66 (R R R R R B B G R B B B R B G R G G B R G G G B G) 8
67 (G G G B B G G B R B B R R R G G B R R G R B R R R) 7
68 (R B G G R R R B G G B B G R G G G B B G B B R R R) 8
69 (R B G B G B R R B B R R R R B G B R R B G B R G R) 9
70 (G R R B G G G G G G G R R B B R R G R G B G G G B) 5
71 (G B R B B B B B B B G G B R R B B G B G B B B R G) 15
72 (R R R R B R G B R G B B R R B R B B R R B G R G G) 8
73 (R G R G B G G G G B G G B R R B B G B B G G G R R) 7
74 (B B G B B R G R G G G G R G R B R B R G R B G R R) 7
75 (R R B B G G B G G R R B B B B B R B G G R R B R R) 10
76 (B B G R B B G B G G B G G B G R G B R B R G B R B) 11
77 (G B G B R G B B G R B G R G R B G B R G R B B R G) 9
78 (G R R R B B R B G B B B G G B B B G G R B R B R B) 12
79 (R G R B B B R R G B B R G R R B B R G B B B B G G) 11
80 (B R R R R G B R B B G G G B R B B B G B R R G B B) 11
81 (G G G R R B B R G G B B B R G B R B B B B B B R G) 12
82 (G B G R B B G R B R G R G G R G R R B G B B B R G) 8
83 (B R B B B R B G B B R B R R G R B R G B B R B G B) 13
84 (G R R B B R B R B R R G G R R R G R B G G R B R B) 7
85 (G R G R B G R G B B B G B B B G B G G B G R G R G) 9
86 (G B G B B B G G B G B R G B G R B R G G G B R G G) 9
87 (B G G R B B G B R G B R B R G B R R R R R R R B R) 8
88 (B G R G G R G G R B B G G G R R G R B R R R G B G) 5
89 (G R B B G R R G R G G R B G B R R B B R B R G G R) 7
90 (R R R G G R R R G G G R G B B G G B R B G B R R R) 5
91 (G G G R G G G G B R R G G R G B B B B G G B G R B) 7
92 (R G B G G B R B G R B G B R B G B G R B B G G B R) 10
93 (B B G R G R G R R B B R G R B R G G B R B R B G G) 8
94 (G G G R G R R G R G R R B G B R G G G R G G G R R) 2
95 (R B B B R B G G B R R R B G R R B R R R G R G B R) 8
96 (G B G B B R G R R B B R B R B B B R R B B R R R R) 11
97 (G G B R R G G R G B R R G R R B B B R B R R G R G) 6
98 (R B R B G G G G B R B B G R R B R G G B G B R R G) 8
99 (G R B R G B B G B B G B B G R G B G G B G G R G G) 9
100 (B G R G R B B R B G B G R R B R G G G G R G B G B) 8
Average fitness = 8.63
Sampling...
the sample of individuals ...
38 (B B B B B G R B G R B G B R R R B R B G R B B R R) 12
87 (B G G R B B G B R G B R B R G B R R R R R R R B R) 8
36 (G B B B G R R G G R B G R B R R R R B B G R G B B) 9
31 (R B B R G B B B G R R B G B G G R G G G R B G G G) 8
20 (B B B G B B B G B R R R G B G B B G R R G R R R R) 10
40 (B B B R B R G G G G G G B R G G B B R G R G B B G) 9
95 (R B B B R B G G B R R R B G R R B R R R G R G B R) 8
93 (B B G R G R G R R B B R G R B R G G B R B R B G G) 8
the most fit of the sample...
38 (B B B B B G R B G R B G B R R R B R B G R B B R R) 12
Sampling...
the sample of individuals ...
55 (B G G B B G G R B G R B G B R R B R G B R G G B G) 9
99 (G R B R G B B G B B G B B G R G B G G B G G R G G) 9
30 (R B G G G R R G G R G B B B B B G R B R G B B B R) 10
71 (G B R B B B B B B B G G B R R B B G B G B B B R G) 15
3 (B G B B G G B B R B G R B B R B R G R R R R G R R) 9
57 (R G G B B B B R G B B R R R G G B B G G G B R B R) 10
89 (G R B B G R R G R G G R B G B R R B B R B R G G R) 7
91 (G G G R G G G G B R R G G R G B B B B G G B G R B) 7
the most fit of the sample...
71 (G B R B B B B B B B G G B R R B B G B G B B B R G) 15
Sampling...
the sample of individuals ...
5 (B B R R R G B B R B B B B G B G R G R B G R G G G) 10
71 (G B R B B B B B B B G G B R R B B G B G B B B R G) 15
35 (G R R R B B B G R B B B B B R B G B R G G G B B G) 12
59 (B B G R B B R G G G G B G G R R B B R B R G R R R) 8
80 (B R R R R G B R B B G G G B R B B B G B R R G B B) 11
45 (G R G B R R B B G R G B G G R G G G G G B B B R G) 7
72 (R R R R B R G B R G B B R R B R B B R R B G R G G) 8
91 (G G G R G G G G B R R G G R G B B B B G G B G R B) 7
the most fit of the sample...
71 (G B R B B B B B B B G G B R R B B G B G B B B R G) 15
NIL
[15]> (bye)
Bye.