diff options
Diffstat (limited to 'metapost')
| -rw-r--r-- | metapost/context/base/mp-base.mpiv | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/metapost/context/base/mp-base.mpiv b/metapost/context/base/mp-base.mpiv index d5c7b8c21..638be4628 100644 --- a/metapost/context/base/mp-base.mpiv +++ b/metapost/context/base/mp-base.mpiv @@ -607,7 +607,16 @@ enddef ; % drawdot (10j,10); % endfor ; % -% so ... +% or: +% +%\startMPpage +% +% def drawdot expr z = +% addto currentpicture contour (makepath currentpen shifted z) _op_ +% enddef; +% +% drawdot origin shifted (0,-3cm) withpen pencircle scaled 2cm ; +% pickup pencircle scaled 2cm ; drawdot origin withcolor red ; def drawdot expr p = if pair p : |