summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/metapost/base/source/grdemo.mp
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/metapost/base/source/grdemo.mp')
-rw-r--r--Master/texmf-dist/doc/metapost/base/source/grdemo.mp37
1 files changed, 37 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/metapost/base/source/grdemo.mp b/Master/texmf-dist/doc/metapost/base/source/grdemo.mp
new file mode 100644
index 00000000000..14fb7609259
--- /dev/null
+++ b/Master/texmf-dist/doc/metapost/base/source/grdemo.mp
@@ -0,0 +1,37 @@
+verbatimtex
+.EQ
+delim $$
+.EN
+\# etex
+
+prologues := 2;
+
+input boxes
+
+beginfig(1);
+ pair shadowshift;
+ shadowshift = (1, -1) * bp;
+
+ def drawshadowed(text t) =
+ forsuffixes $ = t:
+ fill bpath$ shifted shadowshift;
+ unfill bpath$;
+ drawboxed($);
+ endfor
+ enddef;
+
+ boxit.a(btex \[12] \s8A\s+2 \[lh] a etex);
+ circleit.b(btex $e sup {i omega t}$ etex rotated 20);
+
+ b.w - a.e = (10bp, 0);
+
+ drawshadowed(a, b);
+ draw a.e .. b.w;
+
+ label.top(btex \[Cs] \[Po] \[Eu] etex, a.n);
+ label.llft(btex \[Fn] etex, a.s);
+
+ draw bbox currentpicture dashed evenly;
+endfig;
+
+end