Tangentes extérieurs à deux cercles (mp-geom2d)
Auteur ou autrice : Jean-Michel Sarlat.
Mise en ligne le 19 mai 2025
mp-geom2d a été écrit avec le but de proposer des macros MetaPost permettant de réaliser une figure de géométrie en collant d’assez près à une description impérative :
- Soit $A$ le point de coordonnées $(2,3)$.
- Soit $B$ le point de coordonnées $(4,5)$.
- Trace la droite $(A,B)$.
- ...
Ici, on montre les exemples de la galerie de la documentation à la fois dans l’interface en français et celle en anglais.
Code
input geom2d;
labeloffset := 6;
gddTaillePoint := 2;
gddCouleurPoint := Yellow;
beginfig(1);
Repere(9,9,4,5,0.8,0.8);
Axes;
Debut;
Axes;
Graduations; Unites(1);
C1 = Cercle((1,1),3);
C2 = Cercle((-1,-2),1);
T1 = TangenteCommuneExterieure(C1,C2);
T2 = TangenteCommuneExterieure(C2,C1);
drawoptions(withcolor LightSlateGrey);
trace C1;
trace C2;
drawoptions(withcolor Olive);
trace T1;
trace T2;
drawoptions();
pointe Point(1,1);
pointe Point(-1,-2);
Fin;
endfig;
end
%%% English version
input geom2d;
labeloffset := 6;
SetPointSize(2);
SetPointColor(Yellow);
beginfig(1);
Frame(9,9,4,5,0.8,0.8);
Axis;
gddBegin;
Axis;
Graduations;
Units(1);
C1 = Circle((1,1),3);
C2 = Circle((-1,-2),1);
T1 = ExternalCommonTangent(C1,C2);
T2 = ExternalCommonTangent(C2,C1);
drawoptions(withcolor LightSlateGrey);
gddDraw C1;
gddDraw C2;
drawoptions(withcolor Olive);
gddDraw T1;
gddDraw T2;
gddDraw Xaxis;
drawoptions();
gddDrawPoint Point(1,1);
gddDrawPoint Point(-1,-2);
gddEnd;
endfig;
end
Mots clés : géométrietangentecerclesrepèremp-geom2d
Cet exemple fait partie de la collection d’exemples Documentation de mp-geom2d.