Update AnimVerre.sce

AnimVerre.sce

-tab= read("polystyrene",100,101)
+tab= read("verre",100,101)
 for i=1:100
     clf
     a=string(double(i*16/100))
-    plot2d(tab(i,:),rect=[0,280,101,450])
-    xtitle("Température à "+a+" sec, barre de polystyrenee","x","T(K)")
+    plot2d(tab(i,:),rect=[0,280,101,380])
+    xtitle("Température à "+a+" sec, barre de verre","x","T(K)")
     sleep(100)
 end
-plot2d(tab(100,:),rect=[0,280,101,450])
-xtitle("Température à "+string(16)+" sec, barre de polystyrene","x","T(K)")
+plot2d(tab(100,:),rect=[0,280,101,380])
+xtitle("Température à "+string(16)+" sec, barre de verre","x","T(K)")