source base.tcl set w .line set graph [bltLineGraph $w] #set graph [bltBarGraph $w] #echo "done" #bltPlotDestroy $w