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

beginfig(1)
picture Paaab ;
 Paaab:= nullpicture;
picture Paaac ;
 Paaac:= nullpicture;
Paaab := currentpicture;
 currentpicture := nullpicture;
 numeric xaaad ;
 xaaad = 2.0 * 3mm;
path paaae ;
 paaae:=makepath pencircle ;
path paaaf ;
 paaaf:=paaae scaled xaaad ;
pair zaaag ;
 zaaag = dir 150.0 ;
pair zaaah ;
 zaaah = 3mm * zaaag;
path paaai ;
 paaai:=paaae scaled 3mm ;
path paaaj ;
 paaaj:=paaai shifted zaaah ;
pair zaaak ;
 zaaak = dir 30.0 ;
pair zaaal ;
 zaaal = 3mm * zaaak;
path paaam ;
 paaam:=paaai shifted zaaal ;
color caaan ;
 caaan = 0.79998779296875 * white;
fill paaaf  withcolor caaan    ;
 fill paaaj  withcolor caaan    ;
 fill paaam  withcolor caaan    ;
 Paaac := currentpicture;
 currentpicture :=  Paaab ;
 transform Taaao ;
 pair zaaap ;
 zaaap = ( 0 , 0 ) ;
pair zaaaq ;
 zaaaq = ( 1.0 , 0 ) ;
pair zaaar ;
 zaaar = ( 0 , 1.0 ) ;
pair zaaas ;
 zaaas = ( 1.0 , 1.0 ) ;
pair zaaat ;
 zaaat = zaaap transformed Taaao ;
zaaat = zaaap;
pair zaaau ;
 zaaau = zaaaq transformed Taaao ;
zaaau = zaaas;
pair zaaav ;
 zaaav = zaaar transformed Taaao ;
zaaav = zaaaq;
picture Paaaw ;
 Paaaw:=Paaac transformed Taaao ;
draw Paaaw     ;
 currentpicture := currentpicture shifted 
                      -llcorner currentpicture shifted (1cm,2cm);
    endfig;
     end;