blob: 304016b7962e1888fd77d9925f21b1136a11433a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
beginchar(4, (2 + (cosd 60))*wedge_len#,let_height#,0);
wcw(1) = wccw(2) = (0, h/2);
tback(3) = wpnt(2);
tmid(4) = tmid(5); rot(4) := 60; rot(5) := -60;
.5[wccw(4), wcw(5)] = mid(1);
tmid(6) = tmid(7); rot(6) := 60; rot(7) := -60;
.5[wccw(6), wcw(7)] = wpnt(3);
tmid(8) = tmid(9); rot(8) := 60; rot(9) := -60;
mid(9) = mid(6);
wlen(10) := .8wedge_len;
.5[wccw(8), wcw(9)] = wpnt(10);
wedgeset(1, 10);
endchar;
|
