Présentation de bainmarie_02.jps

/syracuse/bbgraf/albums/chimie_02/bainmarie_02.jpg
autocrop uselabo usecolor 20 setxunit -7 9 setxrange -1 15 setyrange 0 0 (BunsenGrille) bbpict /uc pictget /A defpoint /niveauLiquides [80] def /aspectLiquides [{bisque}] def A [1.7 .7] (Becher) bbpict /aspectLiquides [{rouge}] def withbouchon /Tubes [(TubeDroit)] def A .5 0 addv [.6 dup] (TubeEssais) bbpict /aspectLiquides [{{bleu} {blanc} 0}] def A -.3 0 addv [.6 dup] (TubeEssais) bbpict /aspectLiquides [{cyan}] def A -.9 0 addv [.6 dup] {13} (TubeEssais) bbpict A .9 0 addv [.6 dup] {-13} (TubeEssais) bbpict