beginchar("N",5wedge_wid#,let_height#,0); wlen(1) := h; rot(1) := -90; wlen(2) := h; rot(2) := -90; wlen(3) := h; rot(3) := -90; wlen(4) := h; rot(4) := -90; wlen(5) := w; wccw(1) = wcw(2); wccw(2) = wcw(3); wccw(3) = wcw(4); wccw(4) = (w, h); wpnt(5) = (w, h/2); wedgeset(1, 5); endchar;