prog: pth_cancel1