Quelques exemples de plus : cercles
[mp-gdd.git] / exemples / cercles / cercles1.mp
1 input gdd;
2 input gdd-rep;
3 input gdd-lbl;
4 input gdd-tra;
5 input svgnames;
6
7 lblPreambule := "\usepackage[frenchb]{babel}"       &
8                 "\usepackage[garamond]{mathdesign}" &
9                 "\usepackage{amsmath}";
10
11
12 labeloffset := 6;
13
14 gddTaillePoint := 3;
15 gddCouleurPoint := Yellow;
16
17
18
19
20 beginfig(1);
21
22
23  Repere(9,9,4,5,0.8,0.8);
24  Axes; 
25  Debut;
26   Axes;
27   Graduations; Unites(1);
28
29   C1 = Cercle((1,1),3);
30   C2 = Cercle((-1,-2),1);
31
32   P1 = IntersectionCercles(C1,C2);
33   P2 = IntersectionCercles(C2,C1);
34
35   drawoptions(withcolor LightSlateGrey);
36   trace C1;
37   trace C2;
38
39   drawoptions();
40   pointe Point(1,1);
41   pointe Point(-1,-2);
42   pointe P1;
43   pointe P2;
44   label.urt(TEX("\(P_1\)"),PtR(P1));
45   label.top(TEX("\(P_2\)"),PtR(P2));
46
47  Fin;
48
49
50 endfig;
51
52 end

Licence Creative Commons Les fichiers de Syracuse sont mis à disposition (sauf mention contraire) selon les termes de la
Licence Creative Commons Attribution - Pas d’Utilisation Commerciale - Partage dans les Mêmes Conditions 4.0 International.