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

beginfig(1)
pair zaaab ;
 zaaab = ( 0 , 0 ) ;
pair zaaac ;
 zaaac = ( -1cm , 2cm ) ;
pair zaaad ;
 zaaad = ( 2cm , 1cm ) ;
pair zaaae ;
 zaaae = ( 1cm , 0 ) ;
path paaaf ;
 paaaf:=zaaab .. zaaac .. zaaad .. zaaae;
numeric xaaag ;
 xaaag = length paaaf ;
draw paaaf     ;
 numeric xaaah ;
 xaaah = 0 * xaaag;
pair zaaai ;
 zaaai = point xaaah of paaaf ;
pen qaaaj ;
 qaaaj = pencircle scaled 4bp ;
draw zaaai   withpen qaaaj   ;
 numeric xaaak ;
 xaaak = 0.0999908447265625 * xaaag;
pair zaaal ;
 zaaal = point xaaak of paaaf ;
pen qaaam ;
 draw zaaal   withpen qaaaj   ;
 numeric xaaan ;
 xaaan = 0.1999969482421875 * xaaag;
pair zaaao ;
 zaaao = point xaaan of paaaf ;
pen qaaap ;
 draw zaaao   withpen qaaaj   ;
 numeric xaaaq ;
 xaaaq = 0.29998779296875 * xaaag;
pair zaaar ;
 zaaar = point xaaaq of paaaf ;
pen qaaas ;
 draw zaaar   withpen qaaaj   ;
 numeric xaaat ;
 xaaat = 0.399993896484375 * xaaag;
pair zaaau ;
 zaaau = point xaaat of paaaf ;
pen qaaav ;
 draw zaaau   withpen qaaaj   ;
 numeric xaaaw ;
 xaaaw = 0.5 * xaaag;
pair zaaax ;
 zaaax = point xaaaw of paaaf ;
pen qaaay ;
 draw zaaax   withpen qaaaj   ;
 numeric xaaaz ;
 xaaaz = 0.5999908447265625 * xaaag;
pair zaaba ;
 zaaba = point xaaaz of paaaf ;
pen qaabb ;
 draw zaaba   withpen qaaaj   ;
 numeric xaabc ;
 xaabc = 0.6999969482421875 * xaaag;
pair zaabd ;
 zaabd = point xaabc of paaaf ;
pen qaabe ;
 draw zaabd   withpen qaaaj   ;
 numeric xaabf ;
 xaabf = 0.79998779296875 * xaaag;
pair zaabg ;
 zaabg = point xaabf of paaaf ;
pen qaabh ;
 draw zaabg   withpen qaaaj   ;
 numeric xaabi ;
 xaabi = 0.899993896484375 * xaaag;
pair zaabj ;
 zaabj = point xaabi of paaaf ;
pen qaabk ;
 draw zaabj   withpen qaaaj   ;
 numeric xaabl ;
 xaabl = 1.0 * xaaag;
pair zaabm ;
 zaabm = point xaabl of paaaf ;
pen qaabn ;
 draw zaabm   withpen qaaaj   ;
 currentpicture := currentpicture shifted 
                      -llcorner currentpicture shifted (1cm,2cm);
    endfig;
     end;