Parent Directory | Revision Log | Patch
revision 1.10 by humppake, Mon May 26 16:20:20 2003 UTC | revision 1.11 by tjl, Fri Jun 6 20:04:24 2003 UTC | |
---|---|---|
# | Line 475 vardef drawRoughEdge(expr p, q, scale) = | Line 475 vardef drawRoughEdge(expr p, q, scale) = |
475 | np := jitterpath(np, round(40+uniformdeviate(30)), .025 / scale * j); | np := jitterpath(np, round(40+uniformdeviate(30)), .025 / scale * j); |
476 | ||
477 | draw np withpen pencircle scaled (4pt/scale) xscaled .4 rotated -37; | draw np withpen pencircle scaled (4pt/scale) xscaled .4 rotated -37; |
478 | clip currentpicture to q;; | if known(q): |
479 | clip currentpicture to q;; | |
480 | fi; | |
481 | ||
482 | enddef; | enddef; |
483 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |