1 2 3 4 5 6 7 8
beginchar("R",2*half_big#,let_height#,0); wlenwid(1, h); rot(1) := -90; wcw(1) = (0, h); wedgeset(1, 1); endchar;