beginchar(10,1.33wedge_len# + .5wedge_wid#,let_height#,0); wedgesetup; tback(2) = mid(1); tback(4) = mid(3); wccw(3) = wcw(1); tback(6) = mid(5); rot(5) := rot(6) := -90; wpnt(2) = mid(6); xpart tback(1) = xpart tback(3) = 0; ypart wpnt(6) = 0; wlenwid(7, .6wedge_len); wlenwid(8, .6wedge_len); wlenwid(9, .6wedge_len); wlenwid(10, .6wedge_len); rot(7) := rot(9) := 60; rot(8) := rot(10) := -60; tmid(7) = tmid(8); tmid(9) = tmid(10); .5[wccw(9), wcw(10)] = .5[mid(7), mid(8)]; wpnt(8) = mid(2); wedgeset(1, 10); endchar;