\begin{picture}(110.41,95)
\put(54.58,0){\vector(0,1){95}}
\put(51.64,47.59){\makebox(0,0)[cc]{0}}
\put(0.41,45.14){\vector(1,0){110}}
%\circle(54.68,45.03){79.53}
\lI(54.68,84.8,60.35,84.39)\lI(60.35,84.39,65.91,83.18)\lI(65.91,83.18,71.24,81.18)
\lI(71.24,81.18,76.23,78.45)\lI(76.23,78.45,80.78,75.03)\lI(80.78,75.03,84.79,71.0)
\lI(84.79,71.0,88.19,66.44)\lI(88.19,66.44,90.9,61.44)\lI(90.9,61.44,92.87,56.1)
\lI(92.87,56.1,94.06,50.54)\lI(94.06,50.54,94.44,44.86)\lI(94.44,44.86,94.01,39.19)
\lI(94.01,39.19,92.78,33.64)\lI(92.78,33.64,90.76,28.32)\lI(90.76,28.32,88.01,23.34)
\lI(88.01,23.34,84.57,18.81)\lI(84.57,18.81,80.52,14.81)\lI(80.52,14.81,75.95,11.43)
\lI(75.95,11.43,70.94,8.74)\lI(70.94,8.74,65.59,6.79)\lI(65.59,6.79,60.02,5.63)
\lI(60.02,5.63,54.35,5.27)\lI(54.35,5.27,48.67,5.72)\lI(48.67,5.72,43.13,6.98)
\lI(43.13,6.98,37.82,9.02)\lI(37.82,9.02,32.85,11.79)\lI(32.85,11.79,28.33,15.25)
\lI(28.33,15.25,24.35,19.31)\lI(24.35,19.31,20.99,23.9)\lI(20.99,23.9,18.32,28.93)
\lI(18.32,28.93,16.4,34.28)\lI(16.4,34.28,15.25,39.85)\lI(15.25,39.85,14.92,45.53)
\lI(14.92,45.53,15.4,51.2)\lI(15.4,51.2,16.68,56.74)\lI(16.68,56.74,18.74,62.05)
\lI(18.74,62.05,21.54,67.0)\lI(21.54,67.0,25.01,71.5)\lI(25.01,71.5,29.09,75.47)
\lI(29.09,75.47,33.7,78.81)\lI(33.7,78.81,38.73,81.46)\lI(38.73,81.46,44.09,83.36)
\lI(44.09,83.36,54.68,84.8)
%\end
%\marker(70.47,45.03,|,3,1)
\put(70.47,45.03){\makebox(0,0)[cc]{$\vrule height 5pt$}}
%\end
\put(110,40.81){\makebox(0,0)[cc]{$x$}}
\put(71.16,42.5){\makebox(0,0)[cc]{$A$}}
\put(70.47,45.03){\circle{10.54}}
\lI(49.42,5.5,77.41,77.48)
\lI(77.41,77.48,54.63,45.14)
\lI(54.63,45.14,49.42,5.5)
%\marker(49.42,5.5,.,3,1)
\put(49.42,5.5){\makebox(0,0)[cc]{$\bullet$}}
%\end
%\marker(77.41,77.48,.,3,1)
\put(77.41,77.48){\makebox(0,0)[cc]{$\bullet$}}
%\end
\put(81,81){\makebox(0,0)[cc]{$P_\varphi$}}
\put(46.98,3.24){\makebox(0,0)[cc]{$P_{\varphi'}$}}
\put(97,48){\makebox(0,0)[cc]{$R$}}
\put(47.33,42.08){\makebox(0,0)[rc]{$\scriptstyle-2\varphi'$}}
\put(26.92,69.36){\makebox(0,0)[cc]{$C$}}
\put(78,50){\makebox(0,0)[cc]{$C'$}}
\thicklines
%\bezier{36}(49.67,45)(50.33,40)(53.67,39)
\lI(49.67,45,50.24,42.53)\lI(50.24,42.53,51.23,40.68)\lI(51.23,40.68,53.67,39)
%\end
\end{picture}