summaryrefslogtreecommitdiff
path: root/graphics/metapost/contrib/macros/mp-geom2d/doc/exemples/triangles/triangles.mp
blob: 882335af1fd346a042e5fd594b581c4e0734e6c6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
input geom2d;

beginfig(1);

    A = Point(0,0);
    B = Point(7,0.3);
    C = Point(1,3);
    TABC = Triangle(A,B,C);
    D = Orthocentre(TABC);
    C_C = CercleCirconscrit(TABC);
    C_E = CercleEuler(TABC);
    trace TABC;
    trace C_C withcolor DarkBlue;
    trace C_E withcolor DarkRed;
    pointe A;
    pointe B;
    pointe C;
    pointe D;
    pointe Centre(C_C);
    pointe Centre(C_E);
    marque.lft "A";
    marque.rt "B";
    marque.lft "C";
    marque.rt "D";
endfig;

end.