uselabo autocrop 20 setxunit -2 4 setxrange -1 4 setyrange /Gazs [{30 BullesChampagne}] def /niveauLiquides [80] def /aspectLiquides [{cyan}] def 2 0 (TubeEssais) bcpict 0 0 (Ballon) bcpict