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