6 leftindent := .2 staff_space;
8 set_char_box (0, .5 staff_space# + stafflinethickness#,
9 staff_space#, staff_space#);
14 z2 = (w - stafflinethickness, .5 (h - d));
15 z3 = (leftindent, -d);
17 penpos1 (stafflinethickness, 35);
18 penpos2 (.1 staff_space + stafflinethickness, 0);
19 penpos3 (stafflinethickness, -35);
22 .. simple_serif (z3l, z3r, 90)
24 .. simple_serif (z1r, z1l, 90)
30 fet_beginchar ("Right Parenthesis", "rightparen");
34 draw_staff_if_debugging (-2, 2);
38 fet_beginchar ("Left Parenthesis", "leftparen");
41 currentpicture := currentpicture xscaled -1;
43 set_char_box (charwd, charbp, chardp, charht);