beginchar("r",1.75wedge_len#,let_height#,0); wedgesetup; wcw(1) = wccw(2) = (0, h/2); tback(3) = mid(2); wcw(4) = wpnt(1) = wccw(5); rot(4) := -60; rot(5) := 60; wedgeset(1, 5); endchar;