\startbuffer[numbers]
path p,q;
p = unitsquare xyscaled(3,2) superellipsed .85 ;
q := p scaled 1cm;
draw q;
label.bot(textext("\naturalnumbers"), point 2 of q);
q := p scaled 1.5cm shifted (-.75cm,-.2cm);
draw q ;
label.bot(textext("\integers"), point 2 of q);
q := p scaled 2cm shifted (-1.5cm,-.4cm);
draw q;
label.bot(textext("\rationals"), point 2 of q);
q := p scaled 2.5cm shifted (-2.25cm,-.6cm);
draw q;
label.bot(textext("\reals"), point 2 of q);
q := p scaled 3cm shifted (-3cm,-.8cm);
draw q;
label.bot(textext("\Bbb C"), point 2 of q);
\stopbuffer
\starttext
\startplacefigure[location=none,\title=]
{\scale[scale=1400]{\processMPbuffer[numbers]}}
\stopplacefigure
\stoptext