post Tcl-Cook