lib for tcl scripts