summaryrefslogtreecommitdiff
path: root/info/examples/lgc2/3-1-7.mp
diff options
context:
space:
mode:
Diffstat (limited to 'info/examples/lgc2/3-1-7.mp')
-rw-r--r--info/examples/lgc2/3-1-7.mp20
1 files changed, 20 insertions, 0 deletions
diff --git a/info/examples/lgc2/3-1-7.mp b/info/examples/lgc2/3-1-7.mp
new file mode 100644
index 0000000000..bfc529ea44
--- /dev/null
+++ b/info/examples/lgc2/3-1-7.mp
@@ -0,0 +1,20 @@
+% --- start of displayed preamble in the book ---
+
+% --- end of displayed preamble in the book ---
+defaultfont:="ptmr8r";
+warningcheck:=0;
+beginfig(1)
+u=1cm;
+path p[];
+p1:=(.5u,.5u)--(1.5u,.5u)--(.5u,1.5u)
+ --(1.5u,1.5u)--(.5u,.5u)--cycle;
+fill (p1 shifted (0,2.5u))
+ rotatedaround ((u,3.5u),90);
+draw p1 shifted (u,4u);
+fill p1 shifted (3.5u,3u);
+p2 =(2u,2u)..(u,3.5u)..(2u,5u)
+ ..(4.5u,4u)..(7u,5u);
+pickup pencircle scaled 4pt;
+draw p2;
+endfig;
+end;