It seems that I should do something like

fill fullcircle scaled 4in withshade
define_circular_shade(origin,origin,0   ,2in,white,red);

Sorry for the premature question.

Troy