[pstricks] Ending a psline on pscircle

Herbert Voss Herbert.Voss at FU-Berlin.DE
Wed Feb 12 20:35:43 CET 2014


Am 12.02.2014 19:51, schrieb Rich Shepard:

>    I'll need to play with your code to understand how to use it well.
>
>    Yesterday's figure is what prompted me to write (code modified from what
> worked in previous figures; probably not optimum):

I define only the center and radii for the circles:

\documentclass[12pt,letterpaper]{article}
\usepackage{pst-eucl}
\usepackage[margin=1cm]{geometry}

\begin{document}

   \psset{framesep=2mm,arrowscale=1.75,shortput=nab}
   \begin{pspicture}(-1.0,-0.25)(15,15)
     \pnodes(5,5){A}(10.5,5){B}
     \pscircle(A){4.7cm}
     \pscircle(B){4.0cm}
     \pcline[linewidth=3pt](A)(B)_{2004}
     \psline[linewidth=3pt,origin={A}](0,-0.25)(0,0.25)
     \psline[linewidth=3pt,origin={B}](0,-0.25)(0,0.25)
 
\pstInterCC[RadiusA=\pstDistVal{4.7},RadiusB=\pstDistVal{4}]{A}{}{B}{}{C}{D}
     \psline{->}(C)(D|A)
     \psline[origin={A}]{->}(0,0)(4.7;235)
     \psline[origin={B}]{->}(0,0)(4;-55)
     \uput{15pt}[90](A){2006}
     \uput{15pt}[90](B){2005}
   \end{pspicture}
\end{document}


Herbert



More information about the PSTricks mailing list