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 ; zaaah = zaaag; pair zaaai ; zaaai = ( 1.0 , 0 ) ; pair zaaaj ; zaaaj = zaaai transformed Taaaf ; pair zaaak ; zaaak = ( 1.0 , 1.0 ) ; zaaaj = zaaak; pair zaaal ; zaaal = ( 0 , 1.0 ) ; pair zaaam ; zaaam = zaaal transformed Taaaf ; zaaam = zaaai; pair zaaan ; zaaan = dir 30.0 ; pair zaaao ; zaaao = 3mm * zaaan; path paaap ; paaap:=paaae shifted zaaao ; pair zaaaq ; zaaaq = dir 150.0 ; pair zaaar ; zaaar = 3mm * zaaaq; path paaas ; paaas:=paaae shifted zaaar ; path paaat ; paaat:=paaad transformed Taaaf ; color caaau ; caaau = 0.79998779296875 * white; fill paaat withcolor caaau ; path paaav ; paaav:=paaap transformed Taaaf ; fill paaav withcolor caaau ; path paaaw ; paaaw:=paaas transformed Taaaf ; fill paaaw withcolor caaau ; currentpicture := currentpicture shifted -llcorner currentpicture shifted (1cm,2cm); endfig; end;