/* Cercle défini par centre et rayon
   et une troisième façon de définir une tangente
*/
// import geometry_dev; // extension devenue l'extension geometry officielle
import geometry;        // le 12/05/09, dans la version 1.71 d'asymptote. :-))

unitsize(1cm);
// On définit...
circle cerc=circle((0,0),3);

line T0=tangent(cerc,angabscissa(0)),
     T45=tangent(cerc,angabscissa(45)),
     T120=tangent(cerc,angabscissa(120)),
     T60=tangent(cerc,angabscissa(-60)),
     T150=tangent(cerc,angabscissa(-150));	 	 
// angabscissa(real) renvoie une abscisse angulaire
point pT120=point(cerc,angabscissa(120));

// ... et on dessine :
draw(cerc);
dot("$\Omega$",cerc.C,S,blue);
distance("$R=3$",cerc.C,point(cerc,0),0);
draw(Label("$T_0$",Relative(0.9),align=E),T0,.8bp+red);
draw(Label("$T_{45}$",Relative(0.7),align=NE),T45,.8bp+green);
draw(Label("$T_{120}$",Relative(0.9),align=NW),T120,.8bp+blue);
draw(Label("$T_{-60}$",Relative(0.2),align=SE),T60,.8bp+blue);
draw(Label("$T_{-150}$",Relative(0.9),align=SW),T150,.8bp+green);
dot("$A$",pT120,S);
// Ajout d'une marge
addMargins(.5cm,.5cm);