diff options
Diffstat (limited to 'systems/doc/metapost/source-manual/figs.mp')
-rw-r--r-- | systems/doc/metapost/source-manual/figs.mp | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/systems/doc/metapost/source-manual/figs.mp b/systems/doc/metapost/source-manual/figs.mp new file mode 100644 index 0000000000..c8e87ba562 --- /dev/null +++ b/systems/doc/metapost/source-manual/figs.mp @@ -0,0 +1,24 @@ +% Examples for MetaPost doc, by John Hobby. Public domain. + +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 \s8A\s+2 \(lh a etex); +circleit.b(btex $e sup {i omega t}$ etex rotated 20); +b.w - a.e = (10,0)*bp; +drawshadowed(a,b); +draw a.e..b.w; + +draw bbox currentpicture dashed evenly; +endfig; + +end |