Présentation de cerc_empil_2.jps

/syracuse/bbgraf/albums/cercles/cerc_empil_2.jpg
%% auteur : -5 5 setxrange -3.2 3.2 setyrange O 1 /C1 defcercle /O2 {2 0} def /u {2 0} def /v {-2 0} def O2 1 /C2 defcercle /O3 {O2 O 60 rotatepoint} def /C3 {C2 O 60 rotatecercle} def /O4 {O3 O 60 rotatepoint} def /C4 {C3 O 60 rotatecercle} def /O5 {O4 O 60 rotatepoint} def /C5 {C4 O 60 rotatecercle} def /O6 {O5 O 60 rotatepoint} def /C6 {C5 O 60 rotatecercle} def /O7 {O6 O 60 rotatepoint} def /C7 {C6 O 60 rotatecercle} def /C8 {C7 u translatecercle} def /C9 {C2 u translatecercle} def /C10 {C3 u translatecercle} def /C11 {C4 v translatecercle} def /C12 {C5 v translatecercle} def /C13 {C6 v translatecercle} def C1 cercle C2 cercle C3 cercle C4 cercle C5 cercle C6 cercle C7 cercle C8 cercle C9 cercle C10 cercle C11 cercle C12 cercle C13 cercle /fillstyle{hachure}def -60 60 O 1 wedge* -120 -60 O3 1 wedge* 120 240 O2 1 wedge* 60 120 O7 1 wedge*