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 ; pair zaaaf ; zaaaf = dir 30.0 ; pair zaaag ; zaaag = 3mm * zaaaf; path paaah ; paaah:=paaae shifted zaaag ; pair zaaai ; zaaai = dir 150.0 ; pair zaaaj ; zaaaj = 3mm * zaaai; path paaak ; paaak:=paaae shifted zaaaj ; color caaal ; caaal = 0.79998779296875 * white; fill paaad withcolor caaal ; color caaam ; fill paaah withcolor caaal ; color caaan ; fill paaak withcolor caaal ; currentpicture := currentpicture shifted -llcorner currentpicture shifted (1cm,2cm); endfig; end;