autocrop
-10 10 setxrange
-10 10 setyrange
uselabo
20 setxunit
8 setfontsize

/arrowscale {.8 dup} def
1 dict begin
   1 setlinewidth
   0 0 (TubeCoudeUB) bbpict
end
Pictdic currentdict copy 

setCourier
   (In) In dctext
   (Out) Out dctext

bleu
[In Out] {times} plot