It would be enough (and more efficient) to just say `(seq-max (first a-seq) (longest-sequence (rest a-seq)))`.