Create ex_05_g.tcl