procedure (circle säde tyyli väri) → kuva

säde : positiivinen-reaaliluku

tyyli : mode?

väri : image-color?

> (circle 50 "solid" "violet")

> (circle 40 "outline" "tomato")

procedure (ellipse leveys korkeus tyyli väri) → kuva

leveys : positiivinen-reaaliluku

korkeus : positiivinen-reaaliluku

tyyli : mode?

väri : image-color?

> (ellipse 110 60 "outline" "slateblue")

> (ellipse 40 90 "solid" "maroon")