Returns a condorcet loser in
(find-condorcet-loser xs) → *
Function:
(defun find-condorcet-loser (xs) (declare (xargs :guard (irv-ballot-p xs))) (let ((__function__ 'find-condorcet-loser)) (declare (ignorable __function__)) (find-condorcet-loser-aux (candidate-ids xs) (candidate-ids xs) xs)))