aesthetics-of-the-commons
clone your own copy | download snapshot

Snapshots | iceberg

No images in this repository’s iceberg at this time

Inside this repository

109.mp
text/plain

Download raw (1.2 KB)

% m
input ../def;
beginchar(109, 27);
    x1 := 3.0 * ox;
    y1 := 13.0 * oy;
    x2 := 3.0 * ox;
    bot y2 := 0.0 * oy;
    x3 := 4.0 * ox;
    bot y3 := 0.0 * oy;
    x4 := 4.0 * ox;
    y4 := 14.0 * oy;
    x5 := 1.0 * ox;
    y5 := 13.0 * oy;
    x6 := 3.0 * ox;
    y6 := 12.0 * oy;
    x7 := 4.0 * ox;
    y7 := 10.0 * oy;
    x8 := 9.5 * ox;
    top y8 := 14.0 * oy + os_x;
    x9 := 14.0 * ox;
    y9 := 11.0 * oy;
    x10 := 14.0 * ox;
    bot y10 := 0.0 * oy;

    x11 := 13.0 * ox;
    y11 := 11.0 * oy;
    x12 := 13.0 * ox;
    bot y12 := 0.0 * oy;


    x13 := 14.0 * ox;
    y13 := 10.0 * oy;
    x14 := 19.5 * ox;
    y14 :=y8;
    x15 := 24.0 * ox;
    y15 := 11.0 * oy;
    x16 := 24.0 * ox;
    bot y16 := 0.0 * oy;

    x17 := 23.0 * ox;
    y17 := 11.0 * oy;
    x18 := 23.0 * ox;
    bot y18 := 0.0 * oy;

    draw z1 -- z2; 
    draw z3 -- z4; 
    draw z7 .. z8 {right} .. {down} z9 -- z10; 
    draw z8 {right}..{down} z11 -- z12; 
    draw z13 .. z14 {right}..{down} z15 -- z16; 
    draw z14 {right}..{down} z17 -- z18; 
    
    serif(1,2,4,3,0);
    serif(11,12,9,10,0);
    serif(17,18,15,16,0);
    serif(2,1,3,4,1,1);

    
endchar(18);
end;