%28.4527 setxunit %% 10 mm 60 setxunit -1.5 1.5 setxrange -1.5 1.5 setyrange %[1 1 .5 .5 .1 .1] {orange} Quadrillage traceaxes axesarrow /O {0 0} def /r 1 def %% rayon du cercle /cerc {O r} def %% on nomme le cercle /A0 {0 cerc cpoint} def %% A = point du cercle d'angle 0 /A1 {72 cerc cpoint} def %% B = point du cercle d'angle 72 /A2 {144 cerc cpoint} def /A3 {216 cerc cpoint} def /A4 {288 cerc cpoint} def cerc cercle [A0 A1 A2 A3 A4] polygone A0 point A1 point A2 point A3 point A4 point