autocrop
-10 10 setxrange
-10 10 setyrange
uselabo
20 setxunit
8 setfontsize
/arrowscale {.8 dup} def

1 dict begin
   1 setlinewidth
   0 0 (Eprouvette) bbpict
end

Pictdic currentdict copy 

setCourier
   (bb) bb dctext

bleu
[bb] {times} plot