Download raw (968 bytes)

% R
input ../def;
beginchar(82, 19);
    x1 := 4.0 * ox;
    top y1 := 21.0 * oy;
    x2 := 4.0 * ox;
    bot y2 := 0.0 * oy;
    x3 := 5.0 * ox;
    top y3 := 21.0 * oy;
    x4 := 5.0 * ox;
    bot y4 := 0.0 * oy;
    
    x5 := 10.0 * ox;
    top y5 := 21.0 * oy;
    x6 := 16.0 * ox;
    y6 := 15.0 * oy;
    x7 := 10.0 * ox;
    y7 := 10.0 * oy;
    
    x8 := 5.0 * ox;
    y8 := 10.0 * oy;
    x9 := 10.0 * ox;
    y9 := 10.0 * oy;
    x10 := 17.0 * ox;
    y10 := 15.0 * oy;
    x11 := 10.0 * ox;
    top y11 := 21.0 * oy;
    
    
    x12 := 11.0 * ox;
    y12 := 10.0 * oy;
    x13 := 17.0 * ox;
    y13 := 0.0 * oy;
    x14 := 17 * ox;
    y14 := 0 * oy;
    x15 := 10.0 * ox;
    y15 := 10.0 * oy; 

    draw z1 -- z2; 
    draw z3 -- z4; 
    draw z5 {right}.. z6 ..{left} z7; 
    draw z8 -- z9 {right}.. z10 ..{left} z11 -- z1; 
    draw z12 ..{dir303.75} z13 -- z14 {up-right}.. z15; 

serif(2,1,4,3,2,1);
serif(1,2,3,4,0);

endchar(15);
end;