Question: How to smooth the figure

Dear all,

 I want to plot  one figure,  the codes in Maple 11 is as follows

>eq1 := K*exp(-sqrt(2*sigma^2*tau*u));
> u := -xi-ln(-xi)-(ln(-xi)-3/2)/xi-((5/2)*ln(-xi)-21/4)/(xi*xi);
> xi := ln(sqrt(8*Pi*(r-D)^2*tau/sigma^2));
> plot(subs(r = 0.5e-1, D = 0, sigma = .3, K = 100, eq1), tau = 0.1e-7 .. 1/3, thickness = 1, color = black, numpoints = 30, style = patch);
The resulting figure is not smooth. If I set numpoints smaller, the figure near the start point seems not smooth. If I set numpoints larger, then jags appear. This problem puzzled me very much. I need your help urgently ! Thanks a lot !

Please Wait...