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

beginfig(1)
picture Paaab ;
 Paaab:= nullpicture;
numeric xaaac ;
 xaaac = 2.0 * 3mm;
path paaad ;
 paaad:=makepath pencircle ;
path paaae ;
 paaae:=paaad scaled xaaac ;
color caaaf ;
 caaaf = 0.79998779296875 * white;
addto Paaab contour paaae  withcolor caaaf    ;
 pair zaaag ;
 zaaag = dir 150.0 ;
pair zaaah ;
 zaaah = 3mm * zaaag;
path paaai ;
 paaai:=paaad scaled 3mm ;
path paaaj ;
 paaaj:=paaai shifted zaaah ;
addto Paaab contour paaaj  withcolor caaaf    ;
 pair zaaak ;
 zaaak = dir 30.0 ;
pair zaaal ;
 zaaal = 3mm * zaaak;
path paaam ;
 paaam:=paaai shifted zaaal ;
addto Paaab contour paaam  withcolor caaaf    ;
 draw Paaab     ;
 currentpicture := currentpicture shifted 
                      -llcorner currentpicture shifted (1cm,2cm);
    endfig;
     end;