size(7cm,0);
// On définit...
pair O=(0,0),A1=(-1,0),A2=(3,0);
real r=4, r1=3, r2=1;
path chemin=buildcycle(arc(O,r,0,180),arc(A1,r1,0,180),arc(A2,r2,0,180));
pen stylo=1bp+blue, pinceau=lightgrey;
// ... puis on dessine.
filldraw(chemin,pinceau,stylo);
draw(A1+r1*W--A2+r2*E,dashed+red);
dot(O);draw(Label("$r$"),O--r*dir(60),Arrow);
dot(A1);draw(Label("$r_1$"),A1--A1+r1*dir(90),Arrow);
dot(A2);draw(Label("$r_2$"),A2--A2+r2*dir(120),Arrow);
// une bordure blanche de 3mm autour de l'image
shipout(bbox(3mm,white));