#lang planet dyoo/whalesong (require (planet dyoo/whalesong/image)) (color 3 4 5 0) (make-color 3 5 7 0) (define c1 (color 3 1 4 5)) (color-red c1) (color-green c1) (color-blue c1) (color-alpha c1)