% node.tex
% 
% Singular curve given by y^2 = x^3 + x^2 over the real numbers
%
% Author: Peter Schwabe
% Public domain

\psset{xunit=4cm, yunit=4cm} 
  \begin{pspicture}(-1,-1)(0.7,1) 
  \psaxes[Dx=.2, Dy=.2]{->}(0,0)(-1,-1)(0.7,1)  
  
\psplot[plotstyle=curve]{0}{0.7}{x x mul x mul x x mul add sqrt neg}
\psplot[plotstyle=curve]{0}{0.7}{x x mul x mul x x mul add sqrt}

\psplot[plotstyle=curve]{-1}{0}{x x mul x mul x x mul add sqrt neg}
\psplot[plotstyle=curve]{-1}{0}{x x mul x mul x x mul add sqrt}
\end{pspicture}