diff options
Diffstat (limited to 'Master/texmf-dist/doc/metapost/featpost/example/tug04/cone.mp')
-rw-r--r-- | Master/texmf-dist/doc/metapost/featpost/example/tug04/cone.mp | 37 |
1 files changed, 37 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/metapost/featpost/example/tug04/cone.mp b/Master/texmf-dist/doc/metapost/featpost/example/tug04/cone.mp new file mode 100644 index 00000000000..883f01ff625 --- /dev/null +++ b/Master/texmf-dist/doc/metapost/featpost/example/tug04/cone.mp @@ -0,0 +1,37 @@ +% cone.mp +% L. Nobre G. +% 2004 + +verbatimtex \documentclass{article}\begin{document}{\sffamily etex + +beginfig(1); + f := (5,3,4); + numeric labscal; + picture labr, labc, laba, labv; + labscal = 2; + ahlength := 8pt; + ahangle := 30; + labc = btex $\vec{c}$ etex scaled labscal; + laba = btex $\vec{A}$ etex scaled labscal; + labr = btex $R$ etex scaled labscal; + labv = btex $\vec{v}$ etex scaled labscal; + drawoptions( withpen pencircle scaled 1.7pt withcolor 0.65blue ); + verygoodcone(true,black,blue,0.8,blue+green); + drawoptions( withpen pencircle scaled 1.3pt ); + draw rp(black)--rp(green)--rp(blue+green) dashed evenly; + drawdblarrow rp(black)--rp(0.8green); + label.urt( labr, rp(0.4green) ); + drawarrow rp(black)--rp(0.45*blue); + label.rt( laba, rp((0,0,0.25)) ); + dotlabel.llft( labc, rp(black) ); + dotlabel.rt( labv, rp(blue+green) ); + +endfig; + +verbatimtex +\end{document} +etex + +end. + + |