size(7cm,0);
import math;
// On définit un style de stylo par défaut
currentpen=.8bp+.3blue;
// On définit trois réels
real r1=3, r2=sqrt(19), r3=7;
pair O=(0,0);
// On définit un cercle, on en trace trois.
path cercle1=circle(O,r1);
draw(cercle1);
draw(circle(O,r2),lightred);
draw(circle(O,r3),currentpen+.8green);
// A point de cercle3 d'abscisse positive dont l'ordonnée est r1
pair A=(sqrt(r3^2-r1^2),r1);
// B point de cercle3 d'abscisse négative dont l'ordonnée est -r2
pair B=(-sqrt(r3^2-r2^2),-r2);
// C point de cercle2 d'ordonnée négative dont l'abscisse est r1
pair C=(r1,-sqrt(r2^2-r1^2));
// D point de cercle3 tel que vec{OD} colinéaire et de même sens que vec{CA} 
pair D=r3*dir(C--A);
// On trace le triangle ABC
draw(A--B--C--cycle);
// on trace la droite (OD) en traçant en fait le segment [MN]
// tel que \vec{OM}=-.5\vec{OD} et \vec{ON}=1.5\vec{OD}
draw(interp(O,D,-0.5)--interp(O,D,1.5),blue);
// On place les points O, A, B, C, D
dot("$O$",O,N,red);
dot("$A$",A,dir(C--A,B--A),red);
dot("$B$",B,dir(C--B,A--B),red);
dot("$C$",C,dir(A--C,B--C),red);
dot("$D$",D,E,red);

shipout(bbox(3mm,white));