diff options
Diffstat (limited to 'systems/doc/pdftex/samplepdftex/samplepdf.mp')
-rw-r--r-- | systems/doc/pdftex/samplepdftex/samplepdf.mp | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/systems/doc/pdftex/samplepdftex/samplepdf.mp b/systems/doc/pdftex/samplepdftex/samplepdf.mp new file mode 100644 index 0000000000..bb5788f37a --- /dev/null +++ b/systems/doc/pdftex/samplepdftex/samplepdf.mp @@ -0,0 +1 @@ +prologues := 1; def drawleaf(expr A, B, C) = pickup pencircle scaled 4bp; draw (0, 0) {dir 60} .. A .. {dir 60} B withcolor C; pickup pencircle scaled 2bp; draw A {dir 75} .. {dir 45} B withcolor C; draw A {right} .. {dir 75} B withcolor C; enddef; beginfig(0); drawleaf((50, 50), (400, 250), .6green); d := .5 xpart (400, 250); currentpicture := currentpicture reflectedabout ((d, 0), (d, 1)); endfig; beginfig(1); drawleaf((50, 50), (400, 250), .6blue); currentpicture := currentpicture reflectedabout ((50, 50), (400, 250)); endfig; end; |