Microsoft Windows [Version 10.0.14393]
(c) 2016 Microsoft Corporation. All rights reserved.
C:\Users\Tara>clisp
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 "C:/Users/Tara/Desktop/416/rbg.l")
;; Loading file C:\Users\Tara\Desktop\416\rbg.l ...
;; Loading file C:\Users\Tara\Desktop\416\lp1.l ...
;; Loaded file C:\Users\Tara\Desktop\416\lp1.l
;; Loading file C:\Users\Tara\Desktop\416\accumulator.l ...
;; Loaded file C:\Users\Tara\Desktop\416\accumulator.l
;; Loaded file C:\Users\Tara\Desktop\416\rbg.l
T
[2]> (setf p (intitial-population) )
*** - EVAL: undefined function INTITIAL-POPULATION
The following restarts are available:
USE-VALUE :R1 Input a value to be used instead of (FDEFINITION 'INTITIAL-POPULATION).
RETRY :R2 Retry
STORE-VALUE :R3 Input a new value for (FDEFINITION 'INTITIAL-POPULATION).
ABORT :R4 Abort main loop
Break 1 [3]> :a
[4]> (setf p (initial-population) )
#
[5]> (display p)
Generation 0 population ...
1 (B G R R B G R B B B G G B B R R R G B R R B B B B) 12
2 (G B R R G G G B R R R G B R G B B G G R G G G G R) 5
3 (G G B G R R B B B B B G B G G R B B R R G G B R B) 11
4 (G R G B R G R B G G B B B R R R G B G R G G R R B) 7
5 (B R B G R G B G G B R G R B B G R G B B R G G B B) 10
6 (B B B G B R R G B G G B B G G G R B B B G G R B G) 11
7 (R B B B B G G B R R B G B G R B B R B G R G G R G) 10
8 (B B G R G G R R R B B R R R B R B B G G G R B B G) 9
9 (R G B R G G B B R R B B R B R R B G R G G G G G B) 8
10 (R R R R R R R B B G G G G G B G B B G B G B B B G) 9
11 (G G R B G B G G B B R G B B G G B B R B B B R B G) 12
12 (R B G B B B R B R G G B B B B B B R G R R R R B R) 12
13 (B R G B G B G R G B R B G R B R G G R G G G B R B) 8
14 (B B G B G G G B B R B R R G G R G B G B B G R G B) 10
15 (B B B G G B G B G B B R R R G G B B G G B R B G R) 11
16 (R G R B R B R B B B R B B B G B R R G R R R R B R) 10
17 (B B R R B R B G G B B B R B B R R G B B B G G B G) 13
18 (G B R B B B B B B B B R G R R B G R G B G G G G B) 12
19 (G B G G B B G B G R G R B B R R R R B G R B G B R) 9
20 (G B B B R R G R B G G B R G G G G R B R R G R G G) 6
21 (G G G B R R G B R B R G B G G G R B G R B R R B B) 8
22 (G G R B B G B G G G B G G B R B B G R R G B R G G) 8
23 (G G R G R G G G B B R B R B G G G B B R G G G G G) 6
24 (B G R R R R G R B R R G R G G G R G B G R R B B B) 6
25 (R G G B R B G B B R G R B B G B R B R R R G G G B) 9
26 (R R G B B R B B B R B G R B R B G G G G R B R G R) 9
27 (R R R B R G R B G R R R R R R B G G R R G G R B R) 4
28 (R B G R B R B G G B R B R B G B R R G R G G G B R) 8
29 (G R R B R G G B G R G B R G B R G G B G G G R R B) 6
30 (B G B R G R B B B G R G R R R R R B G R G G R G R) 6
31 (G R B R B R G B B R B G B G G B G G B B B R G G B) 11
32 (R G R R G R R B R R G G G R R B G G G B G G B G R) 4
33 (R R G B G G R R G B G R B G G R R G R G R B R R B) 5
34 (B B B G G R G B R G G B G R B B G G R G G G G G B) 8
35 (B R G B G G B R B B R B B G R R G B B R B G R G G) 10
36 (B G B B R R R R G G R G B B R G R G G R R R B G R) 6
37 (G R R R B G G R B B B B B G B G G G B R G B G G B) 10
38 (R R R R G G G B G B B B B R R B R G R B G G R G R) 7
39 (G R R R B R R R R R G G B R R R R R B B G G R G R) 4
40 (R B G R G G B B R R G B B B G R G B B B R R B G R) 10
41 (B R G B R R G G R B R B G B R R R G G G R B R B G) 7
42 (R G G B R R B B R R B R G G R G G B B G R B R G G) 7
43 (R B B G B G R R G R G G R G R B G R R G R R B B B) 7
44 (B R R G G B G R B R R G G B G R B G G R B B B G R) 8
45 (G G G B G B G B R R R R G R G B G B R R G G G R B) 6
46 (R B B R R R R G G B B G G R R G G G B R R R G R B) 6
47 (R G R R G G R G R R G G R G G R G B B B G B B G G) 5
48 (R G G G G G R R B R G B B R R G G B G G B R R B R) 6
49 (G R B B R B G G G B G G B R G G G R G G B G B B B) 9
50 (R R G G G B B G G R G G B G G G R G G R R G B B B) 6
51 (G G R B B B B R R B G B R B R R G B G G G R G R R) 8
52 (G G B B R B B G B B R B G G B R G R B B B B B R R) 13
53 (R B G R G R B G R R R B R R R R G B G G R R G R G) 4
54 (B G R R R G B B G B G G G G R G G R R G G R R G G) 4
55 (R R R R B R G B G R B R G G B G R B G G G R G R R) 5
56 (G R R B B R B B G G B G G G G B G R R R R G B R G) 7
57 (B G G R R B R B G G R R B R B B R R B R G B G G B) 9
58 (B G R B B B B G G B B B G B R R B B R B B R G G R) 13
59 (R G R R B B G G G G G B R R R G R R B G B B B G R) 7
60 (R G G G R G B R R R B G R R G G B R R R R G G B R) 4
61 (R B B B G B G R B B B B G G G G R R R B R G R B B) 11
62 (R G G G R R B R G G B R R R G R G G B G R R B B R) 5
63 (G G B B B G R B G G B B R R B G R G G B G R B B B) 11
64 (G R R B B B G R R R R R G B G R B G G G B R G B R) 7
65 (B B R B R B G R G G G G G R G G G R R G B G G R R) 5
66 (G R R G B G B G R R G R B G G R B G B R G R R B G) 6
67 (B R G B G G B G R G B G G R B G G G G B G G G B B) 8
68 (B R G G B B B G R R G G B R R B B B R G G R G G R) 8
69 (R R R G R G R B B R R G B B G R G G R G B R B B G) 7
70 (R B R G R B R R R B R R R G G B B G B G G G G B R) 7
71 (G B R G B B R B R B B B B G G B G R B R B B B G R) 13
72 (G G R R G B R G B G B R R G B R G R G G B G B B G) 7
73 (G G G G R R B B G G B B R R R R G B B B G R B G G) 8
74 (B G R G G B G G B B R G G B B B B G G B B B R B R) 12
75 (G R B B R G R B G G B B G G R R B R G R G B G B G) 8
76 (B R R G G R B G G B G R G G G R G R G G R G B G G) 4
77 (R R R B G G G G G B R R B B B G B G R G B B G G G) 8
78 (R B G R R R B R G B B G G R R R R G G R R R G B R) 5
79 (B B B G B B B B R R R G B B B G R R B R R R G G G) 11
80 (R G G G G R G R B R B G G R B G G G B G R R R B R) 5
81 (R R B G B B B B B B B R B G R G G G G G B G B G R) 11
82 (R R B R R G R B B B B R R G G B R B B B G B B B R) 12
83 (G B R B G B R G G R G B G R B B R G R G R G B B B) 9
84 (R G G G R G R G B R R B G B G B R B B R G G G R G) 6
85 (G R B R B G R B B G R B B B G R R R R R B B B R G) 10
86 (R R B G B B G R B R B G B B G B R R R R B R B R G) 10
87 (G B B G G R B B R R G G R G R B R G G B G G R B B) 8
88 (G B B G G R B R B B R R B R B G B G B G G R R B R) 10
89 (G R R R B R R B R G R B B B B B R B G B B B R B B) 13
90 (R R R R R G R R R B G B B G B B B R G R G G B R R) 7
91 (B G B B G G R R G G R R B R R G G R R G B B B B G) 8
92 (B B R G G G G B R G G R B B B R B R B G G B G B B) 11
93 (B G R R B R B G R B B G G R B G R B G R B B B B G) 11
94 (G R B R R R G B B B G G B B G R B R G B B G B B G) 11
95 (R B G B R G B B B B G R B R B G G B G G G B B R G) 11
96 (B R R R G B B G G G R G G B G B B R R B B B R B B) 11
97 (R G B R B B B R R G G R B G B G B R B R G G G R G) 8
98 (G G B G R R G G R B B R B B R B R R B B G R B G R) 9
99 (B G G R R G R R G G G R B G B B R R B G R G R B G) 6
100 (R G G R R B R R B B G B R R R G B R G R R R R R B) 6
NIL
[6]> (average p)
8.25
[7]> (select-individual p)
#
[8]> (display (select-individual p))
18 (G B R B B B B B B B B R G R R B G R G B G G G G B) 12
NIL
[9]> (display (select-individual p))
16 (R G R B R B R B B B R B B B G B R R G R R R R B R) 10
NIL
[10]> (display (select-individual p))
57 (B G G R R B R B G G R R B R B B R R B R G B G G B) 9
NIL
[11]> (setf *select-demo* t)
T
[12]> (display (select-individual p))
the sample of individuals ...
9 (R G B R G G B B R R B B R B R R B G R G G G G G B) 8
46 (R B B R R R R G G B B G G R R G G G B R R R G R B) 6
96 (B R R R G B B G G G R G G B G B B R R B B B R B B) 11
47 (R G R R G G R G R R G G R G G R G B B B G B B G G) 5
3 (G G B G R R B B B B B G B G G R B B R R G G B R B) 11
49 (G R B B R B G G G B G G B R G G G R G G B G B B B) 9
72 (G G R R G B R G B G B R R G B R G R G G B G B B G) 7
80 (R G G G G R G R B R B G G R B G G G B G R R R B R) 5
the most fit of the sample ...
96 (B R R R G B B G G G R G G B G B B R R B B B R B B) 11
96 (B R R R G B B G G G R G G B G B B R R B B B R B B) 11
NIL
[13]> (display (select-individual p))
the sample of individuals ...
94 (G R B R R R G B B B G G B B G R B R G B B G B B G) 11
31 (G R B R B R G B B R B G B G G B G G B B B R G G B) 11
56 (G R R B B R B B G G B G G G G B G R R R R G B R G) 7
4 (G R G B R G R B G G B B B R R R G B G R G G R R B) 7
57 (B G G R R B R B G G R R B R B B R R B R G B G G B) 9
69 (R R R G R G R B B R R G B B G R G G R G B R B B G) 7
17 (B B R R B R B G G B B B R B B R R G B B B G G B G) 13
37 (G R R R B G G R B B B B B G B G G G B R G B G G B) 10
the most fit of the sample ...
17 (B B R R B R B G G B B B R B B R R G B B B G G B G) 13
17 (B B R R B R B G G B B B R B B R R G B B B G G B G) 13
NIL
[14]> (display (select-individual p))
the sample of individuals ...
91 (B G B B G G R R G G R R B R R G G R R G B B B B G) 8
38 (R R R R G G G B G B B B B R R B R G R B G G R G R) 7
44 (B R R G G B G R B R R G G B G R B G G R B B B G R) 8
66 (G R R G B G B G R R G R B G G R B G B R G R R B G) 6
27 (R R R B R G R B G R R R R R R B G G R R G G R B R) 4
59 (R G R R B B G G G G G B R R R G R R B G B B B G R) 7
66 (G R R G B G B G R R G R B G G R B G B R G R R B G) 6
62 (R G G G R R B R G G B R R R G R G G B G R R B B R) 5
the most fit of the sample ...
91 (B G B B G G R R G G R R B R R G G R R G B B B B G) 8
91 (B G B B G G R R G G R R B R R G G R R G B B B B G) 8
NIL
[15]> (display (select-individual p))
the sample of individuals ...
11 (G G R B G B G G B B R G B B G G B B R B B B R B G) 12
62 (R G G G R R B R G G B R R R G R G G B G R R B B R) 5
2 (G B R R G G G B R R R G B R G B B G G R G G G G R) 5
35 (B R G B G G B R B B R B B G R R G B B R B G R G G) 10
61 (R B B B G B G R B B B B G G G G R R R B R G R B B) 11
83 (G B R B G B R G G R G B G R B B R G R G R G B B B) 9
94 (G R B R R R G B B B G G B B G R B R G B B G B B G) 11
20 (G B B B R R G R B G G B R G G G G R B R R G R G G) 6
the most fit of the sample ...
11 (G G R B G B G G B B R G B B G G B B R B B B R B G) 12
11 (G G R B G B G G B B R G B B G G B B R B B B R B G) 12
NIL
[16]>