1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
beginchar("T",2*wedge_wid#+wedge_len#,let_height#,0); wccw(1) = wcw(2); wccw(2) = (w, h); wccw(3) = wcw(4); tback(3) = mid(1); rot(1) := -90; rot(2) := -90; rot(3) := -90; rot(4) := -90; wpnt(5) = wcw(3); wpnt(6) = mid(3); wedgeset(1, 6); endchar;