wish < tcl/Banded.tcl | stk-demo BandedWG -or -ip