autocrop
uselabo
/aspectLiquides [{{orange} {rouge} 0}] def
/niveauLiquides [40] def
withbouchon
/Tubes [(TubeDroit)] def
0 -3 (Tricol) bbpict
noir
/troug pictget /A defpoint
/troud pictget /B defpoint
B {-45} (Bouchon) bbpict
/Tubes [] def
A {45} (Bouchon) bbpict
/aspectLiquides [{rouge}] def
/niveauLiquides [70] def
B {-45} (AmpouleCoulee) /ConnectIn spict