Présentation de tubeU.jps

Retour Texte non formaté Éditer PostScript

/syracuse/texpng/jpv/guide_jps/labo/tubeU.jpg


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

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

setCourier
   (ConnectIn) ConnectIn cltext
   (ConnectOut) ConnectOut cltext
   (uc) uc dctext
   (In) In dctext
   (Out) Out dctext

bleu
[In Out ConnectIn ConnectOut uc] {times} plot