-- if one value is left, we have nothing to compare
compareAllList (email:list) = compareOneToList email list ++ compareAllList list
compareAllList (email:list) = compareOneToList email list ++ compareAllList list
compareAllList (email:list) = compareOneToList email list ++ compareAllList list