sort : ('a -> 'a -> bool) -> 'a list -> 'a list
- sort (curry (op<)) [3, 1, 4, 1, 5, 9, 2, 6, 5, 3, 5, 8, 9, 7, 9]; > val it = [1, 1, 2, 3, 3, 4, 5, 5, 5, 6, 7, 8, 9, 9, 9] : int list
- sort (curry (op< o (fst ## fst))) [(1,3), (7,11), (3,2), (3,4), (7,2), (5,1)]; > val it = [(1,3), (3,4), (3,2), (5,1), (7,2), (7,11)] : (int * int) list