\startMPpage StartPage ; numeric row, col, unit; pair middle; row := 1; col := 1; unit := 2 * cm ; picture p, q ; p := nullpicture; q := nullpicture; string l[]; l[0] := "2" ; l[1] := " 4"; for i= 0 upto row : middle := (i * unit, 5cm); p := thelabel( l[i], middle); draw p; %q := p reflectedabout (0.5[urcorner p, ulcorner p], 0.5[lrcorner p, llcorner p]); %draw q endfor StopPage ; \stopMPpage \stoptext