wish < tcl/TCLDemo.tcl | syntmono Clarinet -or -ip