SICP 2.49: Defining Primitive Painters