Fichier rect_004.jps — Modifié le 26 Juin 2006 à 14 h 59
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