Conditional Content Generation

forall [ $p is-a person
        bn @ sort : $bn ] in $m return {
     if fn:count (sharedAuthorship ($p)) = 0 then
        {$bn}
   }