const d = 40; w = d*12; h = d*8; x0 = d div 2; y0 = d div 2;
begin setwindowsize(w,h); arc(x0+2*d,h-y0,2*d,180,90); line(x0+2*d,h-y0-2*d,x0+10*d,h-y0-2*d); rectangle(x0+10*d,h-y0-2*d,x0+11*d,h-y0-2*d-d div 4); rectangle(x0+3*d,h-y0-2*d,x0+5*d,h-y0-3*d div 2); rectangle(x0+7*d,h-y0-2*d,x0+9*d,h-y0-3*d div 2); arc(x0+6*d,h-y0-2*d,4*d,180,0); circle(x0+8*d,h-y0-4*d,d div 2); end.