diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /info/examples/lgc2/4-1-21.mp |
Initial commit
Diffstat (limited to 'info/examples/lgc2/4-1-21.mp')
-rw-r--r-- | info/examples/lgc2/4-1-21.mp | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/info/examples/lgc2/4-1-21.mp b/info/examples/lgc2/4-1-21.mp new file mode 100644 index 0000000000..9ed420e6b3 --- /dev/null +++ b/info/examples/lgc2/4-1-21.mp @@ -0,0 +1,24 @@ +% --- start of displayed preamble in the book --- + +% --- end of displayed preamble in the book --- +defaultfont:="ptmr8r"; +warningcheck:=0; +beginfig(1) + numeric u; + u=3cm; + special("0 0.5 dtransform truncate " & + "idtransform setlinewidth pop []"); + special("0 setdash"); + special("1 setlinecap 1 setlinejoin "); + special("10 setmiterlimit"); + special("newpath 0 0 moveto"); + special("-67.28128 56.4566 28.58275 " & + "152.32063 85.03935 85.03935 curveto"); + special("138.11453 21.78784 18.75612 " & + "-37.89137 0 42.51967"); + special("curveto stroke"); + setbounds currentpicture + to ((-24,-1)--(256,-1) + --(256,109)--(-24,109)--cycle); +endfig; +end; |