let
bool_alist_of_matrix =
scalar_alist_of_matrix bool_of_string