bind variables to tcl