blob: c29daac170a84427e8ad17a91ea628c6f20a4bce (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
beginchar("c",(1 + cosd 60)*wedge_len#,let_height#,0);
wcw(1) = wccw(2) = (0, h/2);
wcw(3) = wmid(2);
wcw(4) = wccw(3);
wcw(5) = wccw(4);
tmid(5) = tmid(6);
wcw(7) = wpnt(3);
rot(3) := rot(4) := rot(5) := rot(7) := -60;
rot(6) := 60;
wlenwid(3, wedge_len*.66);
wlenwid(4, wedge_len*.66);
wlenwid(5, wedge_len*.66);
wlenwid(6, wedge_len*.66);
wlen(7) := wedge_len*.66;
wwid(7) := 2*wwid(3);
wedgeset(1, 7);
endchar;
|
