let
int_alist_of_matrix =
scalar_alist_of_matrix int_of_string