Update and rename ex_07.tcl to p7.tcl