size(7.5cm,0);
// ~~~~~~~~~ DEFINITIONS ~~~~~~~~~
path droite=(-5,5)--(-1,1),
     cercle=circle((1,0),3);
pair pA=intersectionpoint(droite,cercle);
// ~~~~~~~~~ CONSTRUCTIONS ~~~~~~~~~
draw(droite,blue);
draw(cercle,orange);
dot("$A$",pA,2W,4bp+brown);

shipout(bbox(3mm,white));