

%% 
%% This is a LaTeX document generated by automatic conversion of a
%% Mathematica notebook using Mathematica 5.0.
%% 
%% This document uses special macros that are defined in a LaTeX 
%% package file named notebook2e.sty.  Appropriate commands for 
%% loading the package have been included in this document.
%% 
%% The LaTeX package files can be found in a directory with path:
%% 
%% D:\Programme\Wolfram Research\Mathematica\5.0\SystemFiles\IncludeFiles\TeX\
%% 
%% The LaTeX package used in this document may require that your 
%% LaTeX implementation support fonts other than the standard 
%% Computer Modern fonts that are used by LaTeX.  For more
%% information see the Additional Information under TeXSave
%% in the Help Browser, or at
%% 
%% http://documents.wolfram.com/v5/RefGuide/TeXSave.html
%% 
%% Implementation-specific instructions for installing TeX-related 
%% files can be found at
%% 
%% http://support.wolfram.com/mathematica/interface/export/virtualfonts.html
%% 
%% 

\documentclass{article}
\usepackage{notebook2e, latexsym}


\begin{document}

\dispSFinmath{
<<\Mvariable{Graphics`ImplicitPlot`}
}

\dispSFinmath{
\Muserfunction{ImplicitPlot}[(x\RawWedge 2+y\RawWedge 2-1)==0,\{x,-1,1\}];
}

\mathGraphic{zeichnung.tex_gr1.eps}
\dispSFinmath{
\Muserfunction{ImplicitPlot}[(x\RawWedge 2-y)(y-x)(y\RawWedge 2-x)==0,\{x,-0.5,1.3\}];
}

\mathGraphic{zeichnung.tex_gr2.eps}
\dispSFinmath{
\Mfunction{Solve}[(x\RawWedge 2-y)(y\RawWedge 2-x)==0,x]
}

\dispSFoutmath{
\big\{\big\{x\rightarrow -{\sqrt{y}}\big\},\big\{x\rightarrow {\sqrt{y}}\big\},\{x\rightarrow {y^2}\}\big\}
}

\dispSFinmath{
\MathBegin{MathArray}{l}
\Mfunction{Show}[\{\Muserfunction{ImplicitPlot}[(x\RawWedge 2-y)==0,\{x,-0.5,1.3\}],  \\
\noalign{\vspace{0.625ex}}
\hspace{2.em} \Muserfunction{ImplicitPlot}[(y-x)==0,\{x,-0.5,1.3\},  \\
\noalign{\vspace{0.625ex}}
\hspace{3.em} \Mvariable{PlotStyle}\rightarrow \Mfunction{Dashing}[\{0.05,0.05\}]],\IndentingNewLine   \\
\noalign{\vspace{0.625ex}}
\hspace{2.em} \Muserfunction{ImplicitPlot}[(y\RawWedge 2-x)==0,\{x,-0.5,1.3\},  \\
\noalign{\vspace{0.625ex}}
\hspace{3.em} \Mvariable{PlotStyle}\rightarrow \Mfunction{Dashing}[\{0.01,0.01\}]]\IndentingNewLine   \\
\noalign{\vspace{0.625ex}}
\hspace{1.em} \}]\\
\MathEnd{MathArray}
}

\mathGraphic{zeichnung.tex_gr3.eps}
\mathGraphic{zeichnung.tex_gr4.eps}
\mathGraphic{zeichnung.tex_gr5.eps}
\mathGraphic{zeichnung.tex_gr6.eps}
\dispSFoutmath{
\SkeletonIndicator \Mvariable{Graphics}\SkeletonIndicator 
}

\dispSFinmath{
\{ \} 
}

\dispSFinmath{

}

\mathGraphic{zeichnung.tex_gr7.eps}
\dispSFoutmath{
\Mfunction{Notebook}(\{ \Mfunction{Cell}(\SkeletonIndicator \Mvariable{Graphics}\SkeletonIndicator ,Output,{{\Mvariable{CellLabel}}\rightarrow {Out[7]=}})\}
,{{\Mvariable{FrontEndVersion}}\rightarrow {5.0 for Microsoft Windows}},{{\Mvariable{ScreenRectangle}}\rightarrow {\{ \{ 0.,1920.\} ,\{ 0.,1077.\}
\} }},{{\Mvariable{WindowSize}}\rightarrow {\{ 814.,1049.\} }},{{\Mvariable{WindowMargins}}\rightarrow {\{ \{ \Mvariable{Automatic},497.\} ,\{ -2.,\Mvariable{Automatic}\}
\} }},{{\Mvariable{Magnification}}\rightarrow {1.5}},{{\Mvariable{StyleDefinitions}}\rightarrow {ArticleClassic.nb}},{{\Mvariable{PageHeaders}}\rightarrow
{\{ \{ \Mfunction{Cell}(\Mstring{$CounterBox(Page)$}
,PageNumber),\Mfunction{None},\Mfunction{Cell}(\Mstring{$ValueBox(FileName)$}
,Header)\} ,\{ \Mfunction{Cell}(\Mstring{$ValueBox(FileName)$}
,Header),\Mfunction{None},\Mfunction{Cell}(\Mstring{$CounterBox(Page)$}
,PageNumber)\} \} }},{{\Mvariable{PageHeaderLines}}\rightarrow {\{ \Mvariable{True},\Mvariable{True}\} }},{{\Mvariable{PrintingOptions}}\rightarrow
{\{ {{FirstPageHeader}\rightarrow {\Mvariable{False}}},{{FacingPages}\rightarrow {\Mvariable{True}}}\} }},{{\Mvariable{CellLabelAutoDelete}}\rightarrow
{\Mvariable{False}}},{{\Mvariable{CellFrameLabelMargins}}\rightarrow 6},{{\Mvariable{StyleMenuListing}}\rightarrow {\Mvariable{None}}})
}

\dispSFinmath{
\SkeletonIndicator \Mvariable{Graphics}\SkeletonIndicator 
}

\dispSFoutmath{
(x\RawWedge 2+y\RawWedge 2-1)(x\RawWedge 2-y\RawWedge 2+1)(-x\RawWedge 2+y\RawWedge 2+1)//\Mfunction{Expand}
}


\end{document}
