diff options
Diffstat (limited to 'info/examples/PSTricks_7_de/27-02-38.ltx')
-rw-r--r-- | info/examples/PSTricks_7_de/27-02-38.ltx | 41 |
1 files changed, 41 insertions, 0 deletions
diff --git a/info/examples/PSTricks_7_de/27-02-38.ltx b/info/examples/PSTricks_7_de/27-02-38.ltx new file mode 100644 index 0000000000..ffb3ff18bb --- /dev/null +++ b/info/examples/PSTricks_7_de/27-02-38.ltx @@ -0,0 +1,41 @@ +%% +%% Ein Beispiel der DANTE-Edition +%% +%% 7. Auflage +%% +%% Beispiel 27-02-38 auf Seite 589. +%% +%% 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{169.16928pt} +\setlength\parindent{0pt} +%StartShownPreambleCommands +\usepackage{pst-func} +%StopShownPreambleCommands +\begin{document} +\begin{pspicture*}(-3,-2.2)(3.5,2.5) +\psaxes{->}(0,0)(-3,-2)(3.2,2) +\psplotImp[linewidth=2pt](-5,-2.2)(5,2.4){ + /xqu x dup mul def /yqu y dup mul def + xqu yqu add dup mul 2 dup + add 2 mul xqu yqu sub mul sub } +\rput*(2,1.5){% + $\left(x^2+y^2\right)^2-8(x^2-y^2)=0$} +\psplotImp[linewidth=1pt,linecolor=red, + algebraic](-5,-2.2)(5,2.4){% + (x^2+y^2)^2-4*(x^2-y^2) }% Lemniskate a=2 +\end{pspicture*} +\end{document} |