end_itlist : ('a -> 'a -> 'a) -> 'a list -> 'a)
- end_itlist (curry op+) [1,2,3,4]; > val it = 10 : int