testcase fix. 8.2.3 reveals bug:
<(&/,(^go-to,$1),<(*,Self,{t003}) --> at>,(^pick,{t002}),(^go-to,{t001}),(^open,{t001})) =/> <{t001} --> [opened]>>.