Présentation de part_002.jps

/syracuse/bbgraf/albums/geometrie_03/part_002.jpg
-4 5 setxrange -6 5 setyrange %% les 3 points de base qui servent a parametrer le dessin /C {-2 .5} def /A {3 -1} def /B {2 3} def %%%% tout ce qui suit ne depend que des points A B et C %% les milieux /A' {B C milieu} def /B' {A C milieu} def /C' {B A milieu} def %% les mediatrices /d {B C C perp} def /d' {A B B perp} def /d'' {A C A perp} def %% le centre du cercle circonscrit /Q {d d' interdroite} def /P {d'' d' interdroite} def /R {d d'' interdroite} def [C A B] polygone [P Q R] polygone rouge C A R angledroit P B A angledroit Q C B angledroit jpegmode noir setTimes (A) A rtext (B) B ltext (C) C dltext (P) P urtext (Q) Q dltext (R) R rtext