blob: 2b1bf40906a4e7aec0f508b7a36c6c1edc3f0d59 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
beginchar("G",half_big# + wedge_len#,let_height#,0);
wlenwid(1, h);
wccw(1) = (w, h);
rot(1) := -90;
wpnt(2) = cen(1);
rot(2) := -30;
wpnt(3) = mstem(1);
rot(3) := -30;
wlenwid(3, 3/4*wedge_len);
wcw(4) = mid(2);
rot(4) := 90;
wlenwid(4, 3/4*wedge_len);
wedgeset(1, 4);
endchar;
|