summaryrefslogtreecommitdiff
path: root/systems/doc/pdftex/samplepdftex/samplepdf.mp
diff options
context:
space:
mode:
Diffstat (limited to 'systems/doc/pdftex/samplepdftex/samplepdf.mp')
-rw-r--r--systems/doc/pdftex/samplepdftex/samplepdf.mp1
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;