blob: 1bd8948720a7d737800d7b492981d5e4a972ff97 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
beginchar("z",wedge_len#+2half_big#,let_height#,0);
wedgesetup;
wlenwid(1, h); rot(1) := -90;
wwid(2) := wwid(3) := wwid(4) := wwid(5) := wedge_wid*.6;
wccw(1) = (w, h);
wpnt(2) = .33[wcw(1), mid(1)];
wpnt(3) = .66[wcw(1), mid(1)];
wpnt(4) = mid(1);
wpnt(5) = cen(1);
wmid(6) = .5[wcw(3), wccw(4)];
wedgeset(1, 6);
endchar;
|