beginchar("c",(1 + cosd 60)*wedge_len#,let_height#,0); wcw(1) = wccw(2) = (0, h/2); wcw(3) = wmid(2); wcw(4) = wccw(3); wcw(5) = wccw(4); tmid(5) = tmid(6); wcw(7) = wpnt(3); rot(3) := rot(4) := rot(5) := rot(7) := -60; rot(6) := 60; wlenwid(3, wedge_len*.66); wlenwid(4, wedge_len*.66); wlenwid(5, wedge_len*.66); wlenwid(6, wedge_len*.66); wlen(7) := wedge_len*.66; wwid(7) := 2*wwid(3); wedgeset(1, 7); endchar;