diff options
Diffstat (limited to 'Master/texmf-dist/doc/metapost/featpost/example/borderframetest.mp')
-rw-r--r-- | Master/texmf-dist/doc/metapost/featpost/example/borderframetest.mp | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/metapost/featpost/example/borderframetest.mp b/Master/texmf-dist/doc/metapost/featpost/example/borderframetest.mp new file mode 100644 index 00000000000..4d81af39d76 --- /dev/null +++ b/Master/texmf-dist/doc/metapost/featpost/example/borderframetest.mp @@ -0,0 +1,28 @@ +% borderframetest.mp +% L. Nobre G. +% 2003 + +input featpost3Dplus2D; + +beginfig(0); + Spread := 45; + + numeric theframefrach, theframefracw, Shifts; + path theframebord; + Shifts := 105mm; + theframefrach = 0.2927; + theframefracw = 0.39; + z1 = Shifts*(1-theframefracw,1-theframefrach); + z2 = Shifts*(1+theframefracw,1-theframefrach); + z3 = Shifts*(1+theframefracw,1+theframefrach); + z4 = Shifts*(1-theframefracw,1+theframefrach); + theframebord = z1--z2--z3--z4--cycle; + show z1; + show z2; + show z3; + show z4; + draw theframebord withcolor background withpen pencircle scaled 0; + clip currentpicture to theframebord; +endfig; + +end; |