;; Brandon Druschel
;; 11/16/18
;; RBG GA TASK 3 DEMO

[1]> (load "rbg.l")
;; Loading file rbg.l ...
;; Loaded file rbg.l
T
[2]> (setf m (rbg-string) )
(B R B R B G B B R R G G B R G G G R R G B B R B R)
[3]> ( setf f (rbg-string) )
(B G G B R R R B R R G R R G B B B R B G R R B G R)
[4]> (crossover m f)
(B R B R B G B B R R G G B R G G G R R G B B B G R)
[5]> (crossover m f)
(B R B R B R R B R R G R R G B B B R B G R R B G R)
[6]> (bye)
Bye.