- z11 = (0.00 wd + 0.6 linethickness / 2, yoffs - 1.1 ht);
- z12 = (0.00 wd + 0.6 linethickness / 2, yoffs);
- draw_rounded_block ((0, yoffs - 1.1 ht -
- linethickness / 2),
- (0.6 linethickness, yoffs),
+ pickup pencircle scaled 0.6 linethickness;
+
+ lft x11 = x1 - linethickness / 2;
+ bot y11 = yoffs - 1.1 ht - linethickness / 2;
+ x12 = x11;
+ y12 = y1;
+
+ draw_rounded_block (bot lft z11, top rt z12,