I am very new for TCL. Just I want to know that how to write TCL procedures without argument and how to call and how to execute it.