Hi,
In the Metafun documentation on page 410, there is a shaded bullet "fill fullcircle shaded cshade".

I tried to reproduce the same effect, but it is not exactly the same result.
Thank you.
Fabrice

\starttext
\startMPcode
fill fullcircle scaled 4cm shaded  withshademethod "circular"
                   withshadevector (1,0)
                   withshadecolors (red, white) ;
\stopMPcode
\stoptext