put cbr at the end of tcl file