From ```R list_check_all_vectors(x, call = error_call) can_simplify <- all(list_sizes(x) == 1L) ``` From https://github.com/tidyverse/purrr/pull/909#discussion_r968896274