Create passing_array.tcl