%% %% Ein Beispiel der DANTE-Edition %% %% 7. Auflage %% %% Beispiel 32-02-48 auf Seite 724. %% %% Copyright (C) 2016 Herbert Voss %% %% It may be distributed and/or modified under the conditions %% of the LaTeX Project Public License, either version 1.3 %% of this license or (at your option) any later version. %% %% See http://www.latex-project.org/lppl.txt for details. %% %% %% ==== % Show page(s) 1 %% %% \documentclass[]{exaarticle} \pagestyle{empty} \setlength\textwidth{352.81416pt} \setlength\parindent{0pt} %StartShownPreambleCommands \usepackage{pst-intersect,multido} %StopShownPreambleCommands \begin{document} \begin{pspicture}(10,2.2)\psset{yunit=0.75} \pssavepath{A}{\psplot[plotpoints=200]{0}{10}{x 180 mul sin 1 add 2 mul}} \pssavepath{B}{\psplot[plotpoints=50]{0}{10}{2 x neg 0.5 mul exp 4 mul}} \psintersect[name=C, showpoints]{A}{B} \multido{\i=1+1}{5}{\uput[210](C\i){\i}} \multido{\i=6+2,\ii=7+2}{3}{\uput[225](C\i){\i}\uput[-45](C\ii){\ii}} \end{pspicture} \end{document}