beginchar("z",wedge_len#+2half_big#,let_height#,0); wedgesetup; wlenwid(1, h); rot(1) := -90; wwid(2) := wwid(3) := wwid(4) := wwid(5) := wedge_wid*.6; wccw(1) = (w, h); wpnt(2) = .33[wcw(1), mid(1)]; wpnt(3) = .66[wcw(1), mid(1)]; wpnt(4) = mid(1); wpnt(5) = cen(1); wmid(6) = .5[wcw(3), wccw(4)]; wedgeset(1, 6); endchar;