input TEX;
prologues := 1;
%if scantokens(mpversion) < 1.200:
% filenametemplate
%else:
% outputtemplate :=
%fi
% "%j.eps";
beginfig(1)
pair zaaab ;
zaaab = 1cm * right;
pair zaaac ;
zaaac = zaaab rotated 0 ;
pair zaaad ;
zaaad = zaaab rotated 60.0 ;
pair zaaae ;
zaaae = zaaab rotated 120.0 ;
pair zaaaf ;
zaaaf = zaaab rotated 180.0 ;
pair zaaag ;
zaaag = zaaab rotated 240.0 ;
pair zaaah ;
zaaah = zaaab rotated 300.0 ;
pair zaaai ;
zaaai = zaaab rotated 360.0 ;
pair zaaaj ;
zaaaj = 2cm * right;
pair zaaak ;
zaaak = zaaaj rotated 0 ;
pair zaaal ;
zaaal = zaaaj rotated 60.0 ;
pair zaaam ;
zaaam = zaaaj rotated 120.0 ;
pair zaaan ;
zaaan = zaaaj rotated 180.0 ;
pair zaaao ;
zaaao = zaaaj rotated 240.0 ;
pair zaaap ;
zaaap = zaaaj rotated 300.0 ;
pair zaaaq ;
zaaaq = zaaaj rotated 360.0 ;
pen qaaar ;
qaaar = pencircle scaled 4bp ;
draw zaaac withpen qaaar ;
draw zaaad withpen qaaar ;
draw zaaae withpen qaaar ;
draw zaaaf withpen qaaar ;
draw zaaag withpen qaaar ;
draw zaaah withpen qaaar ;
draw zaaai withpen qaaar ;
draw zaaak withpen qaaar ;
draw zaaal withpen qaaar ;
draw zaaam withpen qaaar ;
draw zaaan withpen qaaar ;
draw zaaao withpen qaaar ;
draw zaaap withpen qaaar ;
draw zaaaq withpen qaaar ;
path paaas ;
paaas:=zaaac -- zaaad -- zaaal -- zaaak;
draw paaas ;
path paaat ;
paaat:=zaaad -- zaaae -- zaaam -- zaaal;
draw paaat ;
path paaau ;
paaau:=zaaae -- zaaaf -- zaaan -- zaaam;
draw paaau ;
path paaav ;
paaav:=zaaaf -- zaaag -- zaaao -- zaaan;
draw paaav ;
path paaaw ;
paaaw:=zaaag -- zaaah -- zaaap -- zaaao;
draw paaaw ;
path paaax ;
paaax:=zaaah -- zaaai -- zaaaq -- zaaap;
draw paaax ;
currentpicture := currentpicture shifted
-llcorner currentpicture shifted (1cm,2cm);
endfig;
end;