\input fig4tex.tex
%
% 1. Definition of characteristic points
\figinit{cm}
\def\rotangle{38}
\figpt 1:(-3,0)\figpt 2:(3,0)\figpt 0:(0,0)
\figptsrot 3=1,2/0,\rotangle/\figpt 5:(-3,1)
% 2. Creation of the graphical file
\psbeginfig{}
\psline[1,2]\psline[3,4]
\psarrowcirc 0;1.7(0,\rotangle)\psset arrowhead(angle=30)
\psarrowcircP 0;-1[2,3]
\psset arrowhead(angle=\defaultarrowheadangle,fillmode=yes)
\psset(width=2)
\psarrowcircP 0;1[4,1]\psarrowcircP 0;-2[3,1]
\psset(width=\defaultwidth)\psset arrowhead(length=0.3)
\psarrowcircP 0;-1.4[2,3]\psarrowBezier[4,5,1,3]
\psendfig
% 3. Writing text on the figure
\figvisu{\figBoxA}{\bf Circular and curved arrows}{
\figwritew 1:(0.2)\figwritee 2:(0.2)
\figwritesw 3:(0.2)\figwritene 4:(0.2)}
%
\centerline{\box\figBoxA}
\bye