Présentation de 2713.jps

/syracuse/bbgraf/tmp/2713.jpg
uselabo 20 setxunit -9 3 setxrange -2 12 setyrange 1 setlinewidth /aspectLiquides [{cyan}] def /niveauLiquides [30] def /Tubes [(RefrigerantBoules)] def withbouchon 0 0 (ChauffeBallon) ccpict 0 0 (Bicol) bbpict /troug pictget /A defpoint A {45} (Bouchon) bbpict /Tubes [] def /niveauLiquides [40] def A {45} (AmpouleCoulee) /ConnectIn spict /B' {-0.5 8} def /B {-7 8} def [B B'] (->) ligne /C' {-4.5 5} def /C {-7 5} def [C C'] (->) ligne /D' {-1.5 2} def /D {-7 2} def [D D'] (->) ligne /E' {-2 0} def /E {-7 0} def [E E'] (->) ligne