Présentation de rect_004.jps

/syracuse/bbgraf/albums/geometrie_02/rect_004.jpg
autocrop 30 setxunit /A {O} def /H {0 -3} def A H 90 rotatepoint /B defpoint %% la droite (AC) A A -60 dir addv B H interdroite /C defpoint [A H] ligne [A B C] polygone A H C angledroit B A H 1 (-) tripointarc H A C 1.2 (=) tripointarc setTimesItalic (A) A uctext (B) B dltext (C) C drtext (H) H dctext 10 setfontsize setTimes (45) -112.5 A 1.3 cpoint cctext (30) -75 A 1.5 cpoint cctext