Create ex_05_c.tcl