summaryrefslogtreecommitdiff
path: root/Master/texmf/asymptote/plain_filldraw.asy
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf/asymptote/plain_filldraw.asy')
-rw-r--r--Master/texmf/asymptote/plain_filldraw.asy14
1 files changed, 14 insertions, 0 deletions
diff --git a/Master/texmf/asymptote/plain_filldraw.asy b/Master/texmf/asymptote/plain_filldraw.asy
index b9cd191e075..a5eea35ef25 100644
--- a/Master/texmf/asymptote/plain_filldraw.asy
+++ b/Master/texmf/asymptote/plain_filldraw.asy
@@ -186,6 +186,20 @@ filltype RadialShade(pen penc, pen penr)
});
}
+filltype RadialShadeDraw(real xmargin=0, real ymargin=xmargin,
+ pen penc, pen penr, pen drawpen=nullpen)
+{
+ return filltype(new void(frame f, path[] g, pen Drawpen) {
+ if(drawpen != nullpen) Drawpen=drawpen;
+ if(Drawpen == nullpen) Drawpen=penc;
+ pair c=(min(g)+max(g))/2;
+ if(cyclic(g[0]))
+ radialshade(f,margin(g,xmargin,ymargin),penc,c,0,penr,c,
+ abs(max(g)-min(g))/2);
+ draw(f,margin(g,xmargin,ymargin),Drawpen);
+ });
+}
+
// Fill the region in frame dest underneath frame src and return the
// boundary of src.
path fill(frame dest, frame src, filltype filltype=NoFill,