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

beginfig(1)
numeric xaaab ;
 xaaab = 3.0 * 1cm;
numeric xaaac ;
 xaaac = -1.0 * 1cm;
path paaad ;
 paaad:=fullcircle xscaled xaaac ;
path paaae ;
 paaae:=paaad yscaled xaaab ;
draw paaae     ;
 pair zaaaf ;
 zaaaf = point 2.0 of paaae ;
path paaag ;
 paaag:=zaaaf { down }  .. zaaaf ;
draw paaag     ;
 pair zaaah ;
 zaaah = point 2.5 of paaae ;
path paaai ;
 paaai:=zaaaf { down }  .. zaaah ;
draw paaai     ;
 pair zaaaj ;
 zaaaj = point 3.0 of paaae ;
path paaak ;
 paaak:=zaaaf { down }  .. zaaaj ;
draw paaak     ;
 pair zaaal ;
 zaaal = point 3.5 of paaae ;
path paaam ;
 paaam:=zaaaf { down }  .. zaaal ;
draw paaam     ;
 pair zaaan ;
 zaaan = point 4.0 of paaae ;
path paaao ;
 paaao:=zaaaf { down }  .. zaaan ;
draw paaao     ;
 pair zaaap ;
 zaaap = point 4.5 of paaae ;
path paaaq ;
 paaaq:=zaaaf { down }  .. zaaap ;
draw paaaq     ;
 pair zaaar ;
 zaaar = point 5.0 of paaae ;
path paaas ;
 paaas:=zaaaf { down }  .. zaaar ;
draw paaas     ;
 pair zaaat ;
 zaaat = point 5.5 of paaae ;
path paaau ;
 paaau:=zaaaf { down }  .. zaaat ;
draw paaau     ;
 pair zaaav ;
 zaaav = point 6.0 of paaae ;
path paaaw ;
 paaaw:=zaaaf { down }  .. zaaav ;
draw paaaw     ;
 currentpicture := currentpicture shifted 
                      -llcorner currentpicture shifted (1cm,2cm);
    endfig;
     end;