Create ex_05_h.tcl