uselabo
usecolor
autocrop
-7 10  setxrange
-4 15 setyrange
20 setxunit
%quadrillage marks

/niveauLiquides [80] def
/aspectLiquides [{cyan}] def
/Gazs [{30 BullesChampagne}] def
0 3 {-70} (TubeEssais) ccpict
0 3 (-20 -10) (Bunsen) /uc spict