[pstricks] cutting a part of a figure

Luís Lopes qed_texte at hotmail.com
Mon Aug 19 17:36:03 CEST 2013


Dear members, 

In plotting a geometric locus I got a piece of 
a perpendicular bisector that is an extreme 
case that does not belong to the locus and as 
such shouldn't show up in the plot. 

How can I get rid of it? Only the "elipse" should appear. 
Thank you. 
Luis 

\begin{figure}
\begin{center}
\setlength{\fboxrule}{1pt}\setlength{\fboxsep}{2.73mm}
\fbox{%
\psset{xunit=1.0cm,yunit=1.0cm,algebraic=true,dotstyle=o,dotsize=3pt 0,linewidth=0.8pt,arrowsize=3pt 2,arrowinset=0.25}
\begin{pspicture*}(-5.8,-4.6)(5.6,4.6)
\pspolygon[linestyle=none,fillstyle=solid,fillcolor=yellow!20,opacity=0.1](-2.375,3.4977671449)(-2.5,0)(2.5,0)
\psplotImp[algebraic,linecolor=red,linewidth=0.8pt](-5.8,-4.6)(5.6,4.6){%
sqrt(5^4-8*5^2*x^2+16*x^4+8*5^2*y^2+32*x^2*y^2+16*y^4)*(-5^2+sqrt(5^4-8*5^2*x^2+16*x^4+8*5^2*y^2+%
32*x^2*y^2+16*y^4)+4*x^2-4*y^2)-32*3.8965145303^2*x^2}
\parametricplot[linecolor=magenta]{-0.16953679806865107}{3.3101351699722725}{1*4.2278836313*cos(t)+0*4.2278836313*sin(t)+0|0*4.2278836313*cos(t)+1*4.2278836313*sin(t)+0}
\psline[linewidth=1.2pt](-2.5,0)(2.5,0)
\psline[linewidth=1.2pt](-2.375,3.4977671449)(2.5,0)
\psline[linewidth=1.2pt](-2.375,3.4977671449)(-2.5,0)
\psplot{-6.6411207657}{-2.5}{(-0-0*x)/-3.3049159284}
\psplot{2.5}{6.7033147624}{(-0-0*x)/3.1057959135}
\psline[linecolor=blue](-2.375,3.4977671449)(-0.6578947368,0)
\rput[tl](-0.20,-0.12){$\magenta{M_{_a}}$}
\rput[tl](-0.86,-0.12){$\blue{D_{_{\!a}}}$}
\rput[tl](-1.23,1.58){$\blue{\mathfrak{d}_{_{\!a}}}$}
\rput[tl](5.20,-1.95){$\red{\mathfrak{C}}$}
\rput[tl](1.65,4.35){$\magenta{\phi_{_1}}$}
\rput[tl](-3.58,-0.12){$\mathfrak{a}$}
\psdots[dotstyle=*,linecolor=blue](-2.375,3.4977671449)
\rput[bl](-2.52,3.70){$A$}
\psdots[dotstyle=*,linecolor=blue](-2.5,0)
\rput[bl](-2.63,-0.37){$B$}
\psdots[dotstyle=*,linecolor=blue](2.5,0)
\rput[bl](2.36,-0.37){$C$}
\psdots[dotsize=2pt 0,linecolor=blue](-0.6578947368,0)
\psdots[dotsize=2pt 0,linecolor=magenta](0,0)
\rput[tc](-0.1,-4.4){Triangle dados \texttt<$\,a,m_{_a},d_{_a}$\texttt>}
\end{pspicture*}}
\caption{Exercicio 169 --- Quarto procedimento.}
\label{figuraexer169c}
\end{center}
\end{figure}


 		 	   		  
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://tug.org/pipermail/pstricks/attachments/20130819/e3b25193/attachment.html>


More information about the PSTricks mailing list