How to call one tcl script by other script and pass argument?

Question

I would like to call one TCL script inside the other? I tried the following command:

exec tclsh print.tcl

Inside of print.tcl is written: