;; Loaded file C:\Users\Tara\Desktop\416\rbg6.l
T
[9]> (setf rbg (rbg-string))
(R R R B G G R R B B R R B G G R B B B B R B R B B)
[10]> rbg
(R R R B G G R R B B R R B G G R B B B B R B R B B)
[11]> (setf rbg-i (new-individual 1 rbg))
#<INDIVIDUAL #x1A45DF71>
[12]> (individual-number rbg-i)
1
[13]> (individual-rbg-string rbg-i)
(R R R B G G R R B B R R B G G R B B B B R B R B B)
[14]> (display rbg-i)
1       (R R R B G G R R B B R R B G G R B B B B R B R B B)    11
NIL
[15]> (funcall *fitness* rbg)
11
[16]> (setf r (random-individual))
#<INDIVIDUAL #x1A4822D1>
[17]> (display r)
0       (B B B R B R G B R G R R B R R G B R R B B B B B B)    13
NIL
[18]> (individual-demo)
0       (B B R R B R B R B G B B G B R B B R G B G B B R B)    7
1       (B R R B B B G R R G B B B G R R G R G G G R G B B)    8
2       (R B R B B G R R G B R R B B B R G G G G R R R R R)    12
3       (G G B B B G R B G B G R G G B B G R R G G B G G G)    4
Fitness of i0 = 7
Fitness of i1 = 8
Fitness of i2 = 12
Fitness of i3 = 4
NIL
[19]>