input TEX; prologues := 1; %if scantokens(mpversion) < 1.200: % filenametemplate %else: % outputtemplate := %fi % "%j.eps"; beginfig(1) pair zaaab ; zaaab = ( 1cm , 0 ) ; pair zaaac ; zaaac = zaaab rotated 72.0 ; pair zaaad ; zaaad = zaaac rotated 72.0 ; pair zaaae ; zaaae = zaaad rotated 72.0 ; pair zaaaf ; zaaaf = zaaae rotated 72.0 ; pair zaaag ; pair zaaah ; pair zaaai ; pair zaaaj ; pair zaaak ; numeric xaaal ; pair zaaam ; zaaam = ( xaaal ) [ zaaab , zaaad ] ; zaaag = zaaam; numeric xaaan ; pair zaaao ; zaaao = ( xaaan ) [ zaaac , zaaae ] ; zaaag = zaaao; numeric xaaap ; pair zaaaq ; zaaaq = ( xaaap ) [ zaaac , zaaae ] ; zaaah = zaaaq; numeric xaaar ; pair zaaas ; zaaas = ( xaaar ) [ zaaad , zaaaf ] ; zaaah = zaaas; numeric xaaat ; pair zaaau ; zaaau = ( xaaat ) [ zaaad , zaaaf ] ; zaaai = zaaau; numeric xaaav ; pair zaaaw ; zaaaw = ( xaaav ) [ zaaae , zaaab ] ; zaaai = zaaaw; numeric xaaax ; pair zaaay ; zaaay = ( xaaax ) [ zaaae , zaaab ] ; zaaaj = zaaay; numeric xaaaz ; pair zaaba ; zaaba = ( xaaaz ) [ zaaaf , zaaac ] ; zaaaj = zaaba; numeric xaabb ; pair zaabc ; zaabc = ( xaabb ) [ zaaaf , zaaac ] ; zaaak = zaabc; numeric xaabd ; pair zaabe ; zaabe = ( xaabd ) [ zaaab , zaaad ] ; zaaak = zaabe; path paabf ; paabf:=zaaab -- zaaad -- zaaaf -- zaaac -- zaaae -- cycle; color caabg ; caabg = 0.79998779296875 * white; fill paabf withcolor caabg ; path paabh ; paabh:=zaaag -- zaaah -- zaaai -- zaaaj -- zaaak -- cycle; fill paabh withcolor white ; draw paabf ; currentpicture := currentpicture shifted -llcorner currentpicture shifted (1cm,2cm); endfig; end;