(define canvas (image.new 200 200))
(image.select-rectangle! canvas selection.replace
                         0 0 100 200)
(image.select-ellipse! canvas selection.subtract
                       80 100 50 40)
(image.select-ellipse! canvas selection.add
                       80 30 60 50)
(image.show canvas)