diff options
Diffstat (limited to 'Master/texmf-dist/doc/metapost/featpost/example/intersection2D.mp')
-rw-r--r-- | Master/texmf-dist/doc/metapost/featpost/example/intersection2D.mp | 46 |
1 files changed, 46 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/metapost/featpost/example/intersection2D.mp b/Master/texmf-dist/doc/metapost/featpost/example/intersection2D.mp new file mode 100644 index 00000000000..d482fde6ed0 --- /dev/null +++ b/Master/texmf-dist/doc/metapost/featpost/example/intersection2D.mp @@ -0,0 +1,46 @@ +% intersection2D.mp +% L. Nobre G. +% 2004 + +verbatimtex \documentclass{article}\begin{document}{\sffamily etex + +beginfig(1); + numeric u; + pair Aa, Ab, Ba, Bb, Un, Kn, Or; + pen dotpen, penpen; + color knowncolour, notknowncol; + picture kn, un; + u = 4mm; + Aa = (0,8u); + Ab = (15u,0); + Ba = (12u,0.5u); + Bb = (13u,6u); + Kn = (0,1u); + Or = (1.5u,1.5u); + dotpen = pencircle scaled 0.5u; + penpen = pencircle scaled 0.2u; + knowncolour = blue; + notknowncol = red; + kn = btex given etex; + un = btex unknown etex; + draw Aa--Ab; + draw Ba--Bb; + drawoptions( withpen dotpen withcolor knowncolour ); + draw Aa; + draw Ab; + draw Ba; + draw Bb; + draw Kn+Or; + drawoptions( withpen dotpen withcolor notknowncol ); + Un = whatever[Aa,Ab]; + Un = whatever[Ba,Bb]; + draw Un; + draw Or; + drawoptions(); + label.rt( kn, Kn+Or ); + label.rt( un, Or ); +endfig; + +verbatimtex }\end{document} etex + +end; |