testing tcl/tk examples