+$ split
  [%dead [!! @t]]
  [%live @t]
++ select |= x=split
  ?- x
    [%dead impossible] "dead"