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

beginfig(1)
numeric xaaab ;
 xaaab = 2.0 * 3mm;
path paaac ;
 paaac:=makepath pencircle ;
path paaad ;
 paaad:=paaac scaled xaaab ;
path paaae ;
 paaae:=paaad scaled 0.5 ;
transform Taaaf ;
 pair zaaag ;
 zaaag = ( 0 , 0 ) ;
pair zaaah ;
 zaaah = zaaag transformed Taaaf ;
pair zaaai ;
 zaaah = zaaag;
pair zaaaj ;
 zaaaj = ( 1.0 , 0 ) ;
pair zaaak ;
 zaaak = zaaaj transformed Taaaf ;
pair zaaal ;
 zaaal = ( 1.0 , 1.0 ) ;
zaaak = zaaal;
pair zaaam ;
 zaaam = ( 0 , 1.0 ) ;
pair zaaan ;
 zaaan = zaaam transformed Taaaf ;
pair zaaao ;
 zaaan = zaaaj;
pair zaaap ;
 zaaap = dir 30.0 ;
pair zaaaq ;
 zaaaq = 3mm * zaaap;
path paaar ;
 paaar:=paaae shifted zaaaq ;
pair zaaas ;
 zaaas = dir 150.0 ;
pair zaaat ;
 zaaat = 3mm * zaaas;
path paaau ;
 paaau:=paaae shifted zaaat ;
path paaav ;
 paaav:=paaad transformed Taaaf ;
color caaaw ;
 caaaw = 0.79998779296875 * white;
fill paaav  withcolor caaaw    ;
 path paaax ;
 paaax:=paaar transformed Taaaf ;
color caaay ;
 fill paaax  withcolor caaaw    ;
 path paaaz ;
 paaaz:=paaau transformed Taaaf ;
color caaba ;
 fill paaaz  withcolor caaaw    ;
 currentpicture := currentpicture shifted 
                      -llcorner currentpicture shifted (1cm,2cm);
    endfig;
     end;