[1]> ( load 'rbg.l )
;; Loading file rbg.l ...
;; Loaded file rbg.l
T
[2]> ( fitness-demo )
x= (B G G G R G G G R R R G B R R B R R R B B G G B R)
Directly applying the fitness metrics... 
 fitness-r = 10
 fitness-b = 6
 fitness-g = 9
Indirectly applying the fitness metrics... 
 fitness-r = 10
 fitness-g = 9
 fitness-b = 6
NIL
[3]> ( fitness-demo )
x= (G B B G B R G B G R B G G G B G R R B B B R B R B)
Directly applying the fitness metrics... 
 fitness-r = 6
 fitness-b = 11
 fitness-g = 8
Indirectly applying the fitness metrics... 
 fitness-r = 6
 fitness-g = 8
 fitness-b = 11
NIL
[4]> ( fitness-demo )
x= (G G G R R G G B B G G B G R B G B R B R B G G G G)
Directly applying the fitness metrics... 
 fitness-r = 5
 fitness-b = 7
 fitness-g = 13
Indirectly applying the fitness metrics... 
 fitness-r = 5
 fitness-g = 13
 fitness-b = 7
NIL
[5]>