Download raw (813 bytes)

% d

input ../def;


beginchar(100, 16);
    x1 := 7.5 * ox;
    bot y1 := 0.5 * oy + os_bsln;
    x2 := 2.75 * ox;
    y2 := 7.0 * oy;
    x3 := 8.0 * ox;
    top y3 := 14.0 * oy + os_x;
    x4 := 12.0 * ox;
    y4 := 10.0 * oy;
    x5 := 12.0 * ox;
    y5 := 3.0 * oy;
    x6 := 7.0 * ox;
    bot y6 := 0.0 * oy + os_bsln;
    x7 := 2.0 * ox;
    y7 := 6.0 * oy;

    x8 := 12.0 * ox;
    y8 := 12.0 * oy;
    x9 := 13.0 * ox;
    top y9 := 1.0 * oy;
    x10 := 13.0 * ox;
    y10 := 21.0 * oy;

    x11 := 12.0 * ox;
    bot y11 := 20.0 * oy;
    x12 := 12.0 * ox;
    y12 := 0 * oy;

    draw z5 .. z1 {left}.. z2 ..{right} z3 .. z4; 
    draw z5 .. z6 {left}.. z7 ..{right} z3 .. z8; 
    draw z9 -- z10; 
    draw z11 -- z12;
    serif(10,9,11,12,0,1);
    serif(12,11,9,10,2,1);

endchar(12);

end;