/axeOyarrow {
   %%% la fleche de l'axe Oy
   gsave 
      Ox ymax stranslate
      angle_repere rotate
      .6 .6 scale
      arrow
   grestore
} def