Présentation de tubes.jps

uselabo
-12 23  setxrange
-10 11.3 setyrange
20 setxunit
/dx_boxit 2 def
/dy_boxit 2 def

setTimesBold
-2 9 (TubeRecourbe) bbpict
circleit
   (1) -2 7 cctext

5 9 (TubeCoude) bbpict
circleit
   (2) 5 7 cctext

9 9 (Bouchon) bbpict
circleit
   (3) 9 7 cctext

1 4 (TubeDroit) bbpict
circleit
   (4) 1 2 cctext

7 2.5 (TubeCoudeUB) bbpict
circleit
   (5) 7 .5 cctext

15 2.5 (RefrigerantBoules) bbpict
circleit
   (6) 15 .5 cctext

19 3.5 (Refrigerant) bbpict
circleit
   (7) 19 1.5 cctext

-1 -3 (TubeRecourbeCourt) bbpict
circleit
   (8) -1 -5 cctext

5 -6 (TubeCoudeU) bbpict
circleit
   (9) 5 -8 cctext

13.5 -4 (EntonnoirRobinet) bbpict
circleit
   (10) 13.5 -8 cctext

17 -6 (RefrigerantLiebig) bbpict
circleit
   (11) 17 -8 cctext

21 -6 (ColonneVigreux) bbpict
circleit
   (12) 21 -8 cctext



circleit_all

setCourierBold
   (1) -11 8 bctext
   (   TubeRecourbe) show
   (2) -11 7 bctext
   (   TubeCoude) show
   (3) -11 6 bctext
   (   Bouchon) show
   (4) -11 5 bctext
   (   TubeDroit) show
   (5) -11 4 bctext
   (   TubeCoudeUB) show
   (6) -11 3 bctext
   (   RefrigerantBoules) show
   (7) -11 2 bctext
   (   Refrigerant) show
   (8) -11 1 bctext
   (   TubeRecourbeCourt) show
   (9) -11 0 bctext
   (   TubeCoudeU) show
/dx_boxit 1 def
/dy_boxit 1 def
   (10) -11 -1 bctext
   (   EntonnoirRobinet) show
   (11) -11 -2 bctext
   (   RefrigerantLiebig) show
   (12) -11 -3 bctext
   (   ColonneVigreux) show