% 1. Definition of characteristic points
\figinit{cm}
\figpt 0:(-1,0)\figpt 1:(1,0)\figpt 2:(1,1)\figpt 3:(1,-1)
\figvectC 20(0.5,0)\def\VTrans{20}
\figptstra 4=1,2,3/1,\VTrans/
\figptcopy10:/0/
\def\LTrans{10}\figpttra 11:=0/\LTrans,\VTrans/
% 2. Creation of the graphical file
\psbeginfig{}
\psline[2,3]\psline[5,6]
\psset arrowhead(ratio=0.2)\psarrow [0,1]
\psset arrowhead(out=yes)\psarrowhead [1,4]
\figptstra 0=0,1,2,3,4,5,6/\LTrans,\VTrans/\figptstra 4=4,5,6/1,\VTrans/
\psline[2,3]\psline[5,6]
\psreset{arrowhead}
\psset arrowhead(fillmode=yes,length=0.2)\psarrow[0,1]
\psset arrowhead(out=yes)\psarrowhead[1,4]
\psendfig
% 3. Writing text on the figure
\figvisu{\figBoxA}{}{
\figwriten 10:Narrow(0.2)\figwriten 11:Wide(0.2)
}
\centerline{\box\figBoxA}