input TEX;
prologues := 1;
%if scantokens(mpversion) < 1.200:
%   filenametemplate
%else:
%   outputtemplate :=
%fi
% "%j.eps";

beginfig(1)
pair zaaab ;
 zaaab = ( 0 , 0 ) ;
pair zaaac ;
 zaaac = ( 2cm , 2cm ) ;
numeric xaaad ;
 xaaad = angle zaaac ;
numeric xaaae ;
 xaaae = 0 * xaaad;
path paaaf ;
 paaaf:=zaaab -- zaaac;
path paaag ;
 paaag:=paaaf rotated xaaae ;
drawarrow paaag     ;
 numeric xaaah ;
 xaaah = -0.3333282470703125 * xaaad;
path paaai ;
 paaai:=paaaf rotated xaaah ;
drawarrow paaai     ;
 numeric xaaaj ;
 xaaaj = -0.666656494140625 * xaaad;
path paaak ;
 paaak:=paaaf rotated xaaaj ;
drawarrow paaak     ;
 numeric xaaal ;
 xaaal = -1.0 * xaaad;
path paaam ;
 paaam:=paaaf rotated xaaal ;
drawarrow paaam     ;
 currentpicture := currentpicture shifted 
                      -llcorner currentpicture shifted (1cm,2cm);
    endfig;
     end;