uselabo usecolor autocrop -8 10 setxrange -4 15 setyrange 20 setxunit %quadrillage marks /niveauLiquides [80] def /aspectLiquides [{cyan}] def 2 0 (Cristallisoir) bcpict /Gazs [{40 Bulles}] def 2 0 (TubeRenverse) bbpict 2 0 (ReposeTube) bcpict withbouchon /niveauLiquides [40] def /Gazs [] def /Solides [{rouge 30 Cuivre}] def /Tubes [(TubeRecourbe)] def -5 6 (Erlen) bbpict /bb pictget (0 2) (BunsenGrille) dcpict