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

beginfig(1)
pair zaaab ;
 zaaab = ( 0 , 1cm ) ;
pair zaaac ;
 zaaac = zaaab rotated 144.0 ;
pair zaaad ;
 zaaad = dir 180.0 ;
pair zaaae ;
 zaaae = dir 324.0 ;
path paaaf ;
 paaaf:=zaaab { zaaad }  .. tension 4.0 .. zaaac { zaaae }  ;
draw paaaf  withcolor red    ;
 path paaag ;
 paaag:=paaaf rotated 72.0 ;
draw paaag     ;
 path paaah ;
 paaah:=paaaf rotated 144.0 ;
draw paaah     ;
 path paaai ;
 paaai:=paaaf rotated 216.0 ;
draw paaai     ;
 path paaaj ;
 paaaj:=paaaf rotated 288.0 ;
draw paaaj     ;
 currentpicture := currentpicture shifted 
                      -llcorner currentpicture shifted (1cm,2cm);
    endfig;
     end;