\begin{center} \begin{pspicture}(-6,-4.2)(6,4) \psclip{\pscircle{4}} \multido{\rTheta=70+-20}{8}{% \parametricplot[plotpoints=3600]{-.16}{0.16}{% /R 4 def /T 1 def /a 6.28 R mul def /X a t mul T div def /Angle \rTheta\space 360 t mul T div add def Angle 89 gt {/Angle 89 def} if Angle -89 lt {/Angle -89 def} if /Y X Angle dup sin exch cos div mul def X Y} \psline[linestyle=dashed](4;\rTheta)(-4;\rTheta) } \endpsclip \psarc[arrowsize=0.2,arrowinset=0.1]{->}(0,0){4.5}{220}{240} \psframe[linestyle=none,fillstyle=hlines](-6,-4.2)(6,-4) \psline[arrowsize=0.2,arrowinset=0.1]{->}(-2,0) \psline(-6,-4)(6,-4) \psline(0,-4)(0,4) \end{pspicture} \end{center}