%% auteur :  

%%tracerepere

/A {0 0} def
/B {3 0} def

/dessin {
1 10 360 {
  10 div sqrt
  /nb exch def
  A nb cercle
} for
} def

{dessin} relief