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