Numpy Array Set In Tcl