Create ex_06.tcl