input TEX; prologues := 1; %if scantokens(mpversion) < 1.200: % filenametemplate %else: % outputtemplate := %fi % "%j.eps"; beginfig(1) numeric xaaab ; xaaab = 0.1999969482421875 * 1cm; numeric xaaac ; xaaac = 0.04998779296875 * 1cm; pair zaaad ; zaaad = ( xaaab , xaaac ) ; numeric xaaae ; numeric xaaaf ; xaaaf = -0.04998779296875 * 1cm; pair zaaag ; zaaag = ( xaaab , xaaaf ) ; numeric xaaah ; xaaah = 1.0 * 1cm; numeric xaaai ; pair zaaaj ; zaaaj = ( xaaah , xaaac ) ; numeric xaaak ; numeric xaaal ; pair zaaam ; zaaam = ( xaaah , xaaaf ) ; numeric xaaan ; xaaan = -0.1999969482421875 * 1cm; numeric xaaao ; xaaao = 0 * 0; pair zaaap ; zaaap = ( xaaan , xaaao ) ; numeric xaaaq ; xaaaq = -1.0 * 1cm; numeric xaaar ; pair zaaas ; zaaas = ( xaaaq , xaaao ) ; path paaat ; paaat:=zaaaj { up } .. zaaas { down } .. zaaam { up } -- zaaag { down } .. zaaap { up } .. zaaad { down } -- cycle ; color caaau ; caaau = 0.79998779296875 * white; fill paaat withcolor caaau ; pen qaaav ; qaaav = pencircle scaled 1bp ; draw paaat withpen qaaav ; currentpicture := currentpicture shifted -llcorner currentpicture shifted (1cm,2cm); endfig; end;