Présentation de 2712.jps

/syracuse/bbgraf/tmp/2712.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' {-1 8} def /B {-5 8} def [B B'] (->) ligne /C' {-4 5} def /C {-5 5} def [C C'] (->) ligne /D' {-1 2} def /D {-5 2} def [D D'] (->) ligne /E' {-2 0} def /E {-5 0} def [E E'] (->) ligne