Diwali #metapost-sandbox

main.mp

                    
beginfig(0);
width:=100;
rotation:=-40;

pen calligraphypen;
calligraphypen := makepen((0,0)--(width,0) rotated rotation);

z0 = (300, 500);
z1 =  (x0, y0-150);
z2 = (x0, y1-150);
pickup calligraphypen;
draw z0{dir -45}..{dir 225}z1..{dir -45}z2 withcolor red;


clearxy;
z0 = (175, 200);
z1 = (x0+300, y0);
z2 = ((x0+x1)/2, y0-150);

fill z0--z1{down}..{left}z2..cycle withcolor red;
endfig;
end