TCL scripts successfully generate and run