Evaluated proc tc tcl tcl