let iter_reverse t ~f =     List.iter (List.rev t) ~f