blob: 5c7dab5079d58756e2ac121afc654c8f815890c8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
beginchar(3, 1.5wedge_wid# + .66wedge_len# + half_big#,let_height#,0);
rot(1) := rot(2) := rot(5) := -90;
wcw(1) = (0, h);
wcw(2) = wccw(1);
mstem(3) = mstem(2);
wlen(3) := .8wedge_len;
tmid(4) = wpnt(1);
wlenwid(5, h);
xpart wpnt(5) = xpart wpnt(3);
ypart wpnt(5) = 0;
wedgeset(1, 5);
endchar;
|