link-add-4.tcl