summaryrefslogtreecommitdiff
path: root/info/drawing-with-metapost/src/torn-edge-straight.mp
diff options
context:
space:
mode:
Diffstat (limited to 'info/drawing-with-metapost/src/torn-edge-straight.mp')
-rw-r--r--info/drawing-with-metapost/src/torn-edge-straight.mp14
1 files changed, 14 insertions, 0 deletions
diff --git a/info/drawing-with-metapost/src/torn-edge-straight.mp b/info/drawing-with-metapost/src/torn-edge-straight.mp
new file mode 100644
index 0000000000..18a365c4c2
--- /dev/null
+++ b/info/drawing-with-metapost/src/torn-edge-straight.mp
@@ -0,0 +1,14 @@
+\documentclass{standalone}
+\usepackage{luamplib}
+\begin{document}
+\begin{mplibcode}
+input torn-edge
+beginfig(2);
+path t; numeric x, y;
+x = 0; y=0;
+t = (x, -20) -- (x, y) for i=1 upto 288: -- (incr x, walkr y) endfor -- (x, -20) -- cycle;
+fill t withcolor 1/32(32,32,31);
+draw t withcolor .67 blue;
+endfig;
+\end{mplibcode}
+\end{document}