case-deadline-set-2.tcl