list.fold_right example Example: list.fold_right val fold_right : ('a -> 'b -> 'b) -> 'a list -> 'b -> 'b