Présentation de star.jps

15 setxunit
8 setfontsize
/hstep 4 def
/hwidth .4 def
traceaxes
marks

/fillstyle {hachure} def
/A {0 2} def     /D {3 -2} def 
/B {-3 -3} def	 /E {-4 -4} def
/C {3 -3} def	 /F {4 -4} def 

A 2 cercle*
[B C O] polygone*
0 135 D 2 1 Ellipse*

/fillstyle {jaune fill} def
-45 -135 A 1 wedge*
E 2 1 (bl) cframe*
F 2 1 (ur) cframe*

[O A B C D E F] points