foreach_tcl_user_script.tcl do_calculation vector