diff options
Diffstat (limited to 'Master/texmf-dist/doc/metapost/featpost/example/derivondatriang.mp')
-rw-r--r-- | Master/texmf-dist/doc/metapost/featpost/example/derivondatriang.mp | 82 |
1 files changed, 82 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/metapost/featpost/example/derivondatriang.mp b/Master/texmf-dist/doc/metapost/featpost/example/derivondatriang.mp new file mode 100644 index 00000000000..7081d590437 --- /dev/null +++ b/Master/texmf-dist/doc/metapost/featpost/example/derivondatriang.mp @@ -0,0 +1,82 @@ + +verbatimtex +\documentclass{article} +\usepackage{palatino} +\usepackage{concmath} +\usepackage{ccfonts} +\begin{document} +etex + +def marktic( expr Where, IsVertical, Size ) = + begingroup + pair low, hig; + if IsVertical: + low = ( xpart Where, (ypart Where) - 0.5*Size ); + hig = ( xpart Where, (ypart Where) + 0.5*Size ); + else: + low = ( (xpart Where) - 0.5*Size, ypart Where ); + hig = ( (xpart Where) + 0.5*Size, ypart Where ); + fi; + draw low--hig + endgroup +enddef; + +beginfig(1); + numeric u, xsize, ysize, ticlen, xstep, yamp, yshift; + path o.dtriang, xax, yax; + picture previouspic; + u = 8mm; + xsize = 9u; + ysize = 2.7u; + ticlen = 0.2u; + yamp = 1.8u; + xstep = 1.6u; + yshift = 6.0u; + z0 = origin; + z1 = ( xsize, 0 ); + xax = z0--z1; + z2 = ( 0, -ysize ); + z3 = ( 0, ysize ); + yax = z2--z3; + z4 = ( 0, -yamp ); + z40 = ( 0, yamp ); + z5 = ( xstep, yamp ); + z50 = ( xstep, 0 ); + z6 = ( 2*xstep, -yamp ); + z60 = ( 2*xstep, 0 ); + z7 = ( 3*xstep, yamp ); + z70 = ( 3*xstep, 0 ); + z8 = ( 4*xstep, -yamp ); + z80 = ( 4*xstep, 0 ); + z9 = ( 5*xstep, yamp ); + z90 = ( 5*xstep, 0 ); + o.dtriang = z4--z5--z6--z7--z8--z9; + drawarrow xax; + drawarrow yax; + marktic( z4, false, ticlen ); + marktic( z40, false, ticlen ); + marktic( z50, true, ticlen ); + marktic( z60, true, ticlen ); + marktic( z70, true, ticlen ); + marktic( z80, true, ticlen ); + marktic( z90, true, ticlen ); + label.bot( btex $x$ etex, z1 ); + label.bot( btex 1 etex, z50 ); + label.bot( btex 2 etex, z60 ); + label.bot( btex 3 etex, z70 ); + label.bot( btex 4 etex, z80 ); + label.bot( btex 5 etex, z90 ); + previouspic = currentpicture; + draw previouspic shifted (0,-yshift); + label.lft( btex $\frac{d\, f}{d\, x}$ etex scaled 1.35, (0,ysize-yshift) ); + label.lft( btex $f$ etex, z3 ); + draw o.dtriang withpen pencircle scaled 2pt; + label.lft( btex 2 etex, z40 ); + label.lft( btex -2 etex, z4 ); +endfig; + +verbatimtex +\end{document} +etex + +end. |